HOW TO MOVE REDEFINES CLAUSE FROM INPUT TO OUTPUT ?
Answer Posted / adarsha
01 ws-misc-vars.
05 system-date pic x(06) value spaces.
05 system-date-rede redefines system-date
10 system-dt-yy pic x(02) value spaces.
10 system-dt-mm pic x(02) value spaces.
10 system-dt-dd pic x(02) value spaces.
01 ws-rep-dt-frmt pic x(06) value space.
.
.
.
procedure division.
move system-date to ws-rep-dt-frmt.
*** when you want any particular variable to be recevied or
stored in a particular format you can redefine them in the
way you want.. here system-date-rede has the same value as
system-date !
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
Discuss about changing dataset name in proc.
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
1.give the details about WHEN OTHER. 2. how many form are available in evaluate.
What is the difference between binary search and sequential search?
What is Pic 9v99 Indicates in COBOL?
What is report-item in COBOL?
For rewrite, why is it mandatory that file needs to be opened?
Can you please let me know the centre name of INS certification in Kolkata.
What is static and dynamic call in cobol?
Which is not true about evaluate statement
what are decleratives in cobol?
What is the difference between next sentence and continue in cobol programing language?
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need
In COBOL programming, what is PERFORM? What is VARYING?