Interested to Buy Any Domain ? << Click Here >> for more details...
How do you fetch current date in normal cobol pgm and in
cobol-db2 pgm?
- 3 Answers
- 21338 Views
- Cap Gemini, CTS, I also Faced
- E-Mail Answers
Answer Posted / sharath
Normal program
--------------
WORKING-STORAGE SECTION..
01 WS-DATE PIC X(6).
01 CURDATE.
05 WS-DATE-20 PIC X(2) VALUE '20'.
05 WS-DATE-YR PIC X(2).
05 FILLER PIC X(1) VALUE '/'.
05 WS-DATE-MT PIC X(2).
05 FILLER PIC X(1) VALUE '/'.
05 WS-DATE-DT PIC X(2).
PROCEDURE DIVISON..
ACCEPT WS-DATE FROM DATE
MOVE WS-DATE(1:2) TO WS-DATE-YR
MOVE WS-DATE(3:2) TO WS-DATE-MT
MOVE WS-DATE(5:2) TO WS-DATE-DT
DISPLAY CURDATE
Cobol-DB2
--------
Just writing the query..
Select CURRENT DATE into
:ws-date
from SYSIBM.SYSDUMMY
| Is This Answer Correct ? | 14 Yes | 0 No |
Post New Answer View All Answers
Name some of the examples of COBOl 11?
Explain sorting techniques in cobol program? Provide the sort file definition, the sort statement, its syntax and meaning
How to know whether the module is dynamical or statistical?
Differentiate between structured cobol programming and object-oriented cobol programming.
If you are current on the owner of a set, what is the difference between obtain next and obtain first?
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
Mention the guidelines to write a structured cobol program?
Difference between array and sub-script ?
What is the difference between external and global variables in COBOL?
What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?
What the difference is between continue and next sentence?
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What is difference between static and dynamic call in cobol?
What are all the divisions of a COBOL program?
What is static and dynamic call in cobol?
