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)
Answer Posted / tata
id division.
program-id. exe.
data division.
working-storage section.
01 idate pic 9(8) value 10032010.
01 rdate pic 9(8).
procedure division.
move idate (1:2) to rdate (7:2).
move idate (3:2) to rdate(5:2).
move idate (5:4) to rdate(1:4).
display rdate.
stop run.
| Is This Answer Correct ? | 10 Yes | 0 No |
Post New Answer View All Answers
What is link edit in cobol?
Explain how you can characterize tables in cobol?
Difference between array and sub-script ?
What are the different rules to perform a Search?
What is amode(24)?
State the various causes of s0c1, s0c5 and s0c7.
What is Pic 9v99 Indicates in COBOL?
What is difference between static and dynamic call in cobol?
What is the LINKAGE SECTION used in COBOL?
What are the cobol coding sheets?
what is the use of outrecord?
how do you define single dimensional array and multidimensional array in your cobol?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
How do you get the data to code the BMS macro?
What is cobol?