Let's understand Mainframe
Home Tutorials Interview Q&A Quiz Mainframe Memes Contact us About us

Module 6: Procedure Division


De-editing

  • COBOL-85 allows to move numeric-edited data item to numeric data item using MOVE verb
  • Such move results in de-editing of value
  • Example:-
    Data item declaration,

    05 EDITED-DATA PIC ZZ9.99. 05 UNEDITED–DATA PIC 9(3)V99.

    In PROCEDURE DIVISION,

    MOVE 81.90 TO EDITED-DATA. MOVE EDITED-DATA TO UNEDITED-DATA.

  • On completion of both move statements, EDITED-DATA will contain b81.90 and UNEDITED-DATA will contain 081^90.



Advertisements






© copyright mainframebug.com
Privacy Policy