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
- 9153 Views
- I also Faced
- E-Mail Answers
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
INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
how do you reference the ksds vsam file formats from cobol programs
What are the pertinent COBOL
What is the local-storage section?
What is rmode(any) ?
What is Pic 9v99 Indicates in COBOL?
) how do u code after getting data?
What is inspect in cobol ?
What is the difference between PIC 9.99 and PIC9v99?
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 do you reference the following file formats from cobol programs?
) How do u handle errors in BMS macro
I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
What is the default value(s) for an initialize and what keyword allows for an override of the default?
