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 610 views
610 views asked Sep 18, 2020 by avibootz
2 answers 312 views
312 views asked Sep 18, 2020 by avibootz
2 answers 351 views
351 views asked Sep 17, 2020 by avibootz
2 answers 336 views
336 views asked Sep 17, 2020 by avibootz
1 answer 274 views
274 views asked Sep 17, 2020 by avibootz
1 answer 278 views
278 views asked Sep 17, 2020 by avibootz
1 answer 277 views
...