引数の説明
SAME,APPLYまたはMULTIPLE FILE TAPE. |
エラーの原因となった利用者語. |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2083. 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 SQFILE2. 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 P2083.
P2083.cob (10) : JMN2083I-S SAME句のファイル名'SQFILE2'が未定義または多重定義です.