How to move data between variables in COBOL

1 Answer

0 votes
IDENTIFICATION DIVISION.
PROGRAM-ID. INPUT_NUMBERS.
DATA DIVISION.
    WORKING-STORAGE SECTION.
        77 PINNUM1 PIC 9(5) VALUE 90324.                   
        77 PINNUM2 PIC 9(5).                             
PROCEDURE DIVISION.
    MOVE PINNUM1 TO PINNUM2.                       
    DISPLAY PINNUM1.                              
    DISPLAY PINNUM2.                             
STOP RUN.


*> run:
*>
*> 90324
*> 90324
*>

 



answered Oct 25, 2024 by avibootz

Related questions

2 answers 629 views
629 views asked Sep 18, 2020 by avibootz
2 answers 338 views
338 views asked Sep 18, 2020 by avibootz
2 answers 370 views
370 views asked Sep 17, 2020 by avibootz
2 answers 359 views
359 views asked Sep 17, 2020 by avibootz
1 answer 299 views
299 views asked Sep 17, 2020 by avibootz
1 answer 293 views
293 views asked Sep 17, 2020 by avibootz
1 answer 297 views
...