埋め込みの説明
@1@ : プログラム名
例題
[C3508.cob] 000001 @OPTIONS CHECK(PRM) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C3508. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 R PIC S9(09) COMP-5. 000007 PROCEDURE DIVISION. 000008 CALL "C3508S" RETURNING R. 000009 EXIT PROGRAM. 000010 IDENTIFICATION DIVISION. 000011 PROGRAM-ID. C3508S. 000012 DATA DIVISION. 000013 LINKAGE SECTION. 000014 PROCEDURE DIVISION. 000015 EXIT PROGRAM. 000016 END PROGRAM C3508S. 000017 END PROGRAM C3508.
C3508.cob 8: JMN3508I-S 'C3508S'を呼ぶCALL文にはRETURNING指定を記述することはできません.プログラム'C3508S'のPROCEDURE DIVISIONにRETURNING指定がありません.
詳細な説明
RETURNING指定の有無を一致するようにプログラムを修正してください.