引数の説明
エラーの原因となったデータ名. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2174.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001
000007 ORGANIZATION IS SEQUENTIAL.
000008 I-O-CONTROL.
000009 APPLY SAVED-AREA TO WSVAR ON SQFILE1.
000010 DATA DIVISION.
000011 FILE SECTION.
000012 FD SQFILE1.
000013 01 SQF1REC.
000014 02 PIC X(80).
000015 WORKING-STORAGE SECTION.
000016 01.
000017 02 WSVAR PIC X(80).
000018 PROCEDURE DIVISION.
000019 END PROGRAM P2174.
P2174.cob (9) : JMN2174I-S APPLY SAVED-AREA句のデータ名'WSVAR'は,レベル番号01または77で定義されていなければなりません.データ名は,無効になります.