引数の説明
エラーの原因となったデータ名. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2906.
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 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(80) IS EXTERNAL.
000017 PROCEDURE DIVISION.
000018 END PROGRAM P2906.
P2906.cob (9) : JMN2906I-S APPLY SAVED-AREA句のデータ名'WSVAR'は,外部データ項目であってはなりません.データ名は,無効になります.
詳細な説明
APPLY SAVED-AREA句は,指定したデータ項目の値を,複数の会話にまたがって保証することを指定します.
ただし,データ項目が外部属性を持つ(EXTERNAL句を指定したデータ項目またはそれに従属するデータ項目である)場合は,保証できません.