RCSNUSP/COBOL: Difference between revisions

Content added Content deleted
(Modularised code.)
m (Corrected copybook name.)
Line 410: Line 410:
01 Write-Num-Flag-Char CONSTANT "w".</lang>
01 Write-Num-Flag-Char CONSTANT "w".</lang>


dd-programs-arguments.cpy:
dd-program-arguments.cpy:
<lang cobol>01 program-arguments.
<lang cobol>01 program-arguments.
03 code-file-path PIC X(100).
03 code-file-path PIC X(100).