埋め込みの説明
@1@ : SAME,MULTIPLE FILE TAPEまたはAPPLY.
@2@ : エラーの原因となった利用者語.
例題
[P2084.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2084. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001 000007 ORGANIZATION IS SEQUENTIAL 000008 FILE STATUS IS WFS1. 000009 I-O-CONTROL. 000010 SAME AREA SQFILE1 SQF1REC. 000011 DATA DIVISION. 000012 FILE SECTION. 000013 FD SQFILE1. 000014 01 SQF1REC. 000015 02 PIC X(80). 000016 WORKING-STORAGE SECTION. 000017 01 WFS1 PIC X(2). 000018 PROCEDURE DIVISION. 000019 END PROGRAM P2084.
P2084.cob 10: JMN2084I-S SAME句の名標'SQF1REC'はファイル名でなければなりません.その指定は,無効になります.