Interested to Buy Any Domain ? << Click Here >> for more details...
how to display date in reverse order if the pic clause of
the is numeric
suppose date is 09032010 ==> need to print in 20100309
(pic clause is numeric)
- 6 Answers
- 8935 Views
- I also Faced
- E-Mail Answers
Answer Posted / reshma j.
INPUT-DATE has value of 09032010.
In working storage:
01 INPUT-DATE.
03 MM1 PIC 9(2).
03 DD1 PIC 9(2).
03 CCYY1 PIC 9(4).
01 PRINT-DATE.
03 CCYY2 PIC 9(4).
03 DD2 PIC 9(2).
03 MM2 PIC 9(2).
In Procedure Division:
MOVE MM1 TO MM2.
MOVE DD1 TO DD2.
MOVE CCYY1 TO CCYY2.
After Moving values,PRINT-DATE value will be 20100309.
In this cond,Its totally depend on how we declare format in
working storage section.
plz let me know,if i m wrong.
| Is This Answer Correct ? | 14 Yes | 1 No |
Post New Answer View All Answers
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
What is static and dynamic call in cobol?
Are you comfortable in cobol or jcl?
What is amode(31)
how can we apply for HSBC exam(Mainframe) in India??? i went to their site and was told to submit my CV ,. etc..( totally confusing...)
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?
What is the difference between comp and comp-3 usage?
What is the Purpose of POINTER Phrase in STRING command in COBOL?
What is amode(24)?
What is the difference between binary search and sequential search?
How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)
what is search and searchall?what is the diffrence between them?give an best example?
How do get the result of your program directly on your pc?
In which area will you utilize 88 level items in cobol?
