引数の説明
エラーの原因となったデータ名. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2176.
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 WSVAR PIC X(32764).
000017 PROCEDURE DIVISION.
000018 END PROGRAM P2176.
P2176.cob (9) : JMN2176I-S APPLY SAVED-AREA句のデータ名'WSVAR'の項目長は,32763バイト以下でなければなりません.データ名は,無効になります.