埋め込みの説明
@1@ : ファイル識別名
例題
[C1159.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1159. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT MSGFILE ASSIGN TO INFILE. 000007 I-O-CONTROL. 000008 RERUN ON A1-DB-1. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD MSGFILE. 000012 01 INFDAT. 000013 02 INFNUM PIC S9(8) BINARY. 000014 02 INFMSG PIC X(50). 000015 END PROGRAM C1159.
C1159.cob 8: JMN1159I-S RERUN句中のファイル識別名'A1-DB-1'の名前に誤りがあります.