adspace
Answer Posted / Durgesh Kumar Jha
Here's a simple COBOL program that uses the MOVE CORRESPONDING statement:nnIDENTIFICATION DIVISION.nPROGRAM-ID. move-corresponding.nENVIRONMENT DIVISION.nINPUT-OUTPUT SECTION.nDATA DIVISION.n01 first-record.n 05 field1 PIC X(20).n 05 field2 PIC S9(4).n01 second-record.n 05 copy-field1 PIC X(20) VALUE SPACE.n 05 copy-field2 PIC S9(4) VALUE ZERO.nWORKING-STORAGE SECTION.nPROCEDURE DIVISION.n READ first-record INTO field1, field2.n MOVE CORRESPONDING field1 TO copy-field1.n MOVE CORRESPONDING field2 TO copy-field2.n WRITE second-record.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers