引数の説明
プログラム名 |
例
000001 PROGRAM-ID. C3414S.
000002 DATA DIVISION.
000003 LINKAGE SECTION.
000004 01 R PIC S9(09) COMP-5.
000005 PROCEDURE DIVISION
000006 RETURNING R.
000007 EXIT PROGRAM.
000008 END PROGRAM C3414S.
000001 PROGRAM-ID. C3414.
000002 DATA DIVISION.
000003 WORKING-STORAGE SECTION.
000004 PROCEDURE DIVISION.
000005 CALL "C3414S".
000006 EXIT PROGRAM.
000007 END PROGRAM C3414.
C3414.cob (5) : JMN3414I-S 'C3414S'を呼ぶCALL文にはRETURNING指定を記述しなければなりません.プログラム'C3414S'のPROCEDURE DIVISIONにRETURNING指定があります.