埋め込みの説明
@1@ : EXTENDまたはI-O.
@2@ : エラーの原因となったファイル名.
例題
[P2515.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2515. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001 000007 ORGANIZATION IS SEQUENTIAL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD SQFILE1. 000011 01 SQF1REC. 000012 02 PIC X(80). 000013 WORKING-STORAGE SECTION. 000014 PROCEDURE DIVISION. 000015 OPEN EXTEND SQFILE1 WITH NO REWIND 000016 END PROGRAM P2515.
P2515.cob 15: JMN2515I-S NO REWINDは,EXTEND指定の'SQFILE1'ファイルに指定できません.NO REWINDは,無効となります.
詳細な説明
NO REWIND指定は注釈とみなされます.ただし句の解析は行われます.