引数の説明
エラーの原因となったフィールド名. |
例
000001 IDENTIFICATION DIVISION. 000002 ENUM-ID. E5723. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 V1 VALUE 0. 000006 01 V2 VALUE AUTO. 000007 01 V3 VALUE AUTO. 000008 END ENUM E5723.
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5723. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 ENUM E5723. 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 WOBRDT1 OBJECT REFERENCE E5723. 000010 01 WOBRDT2 OBJECT REFERENCE E5723. 000011 PROCEDURE DIVISION. 000012 SET WOBRDT1 TO V1 OF E5723. 000013 SET WOBRDT2 TO V2 OF WOBRDT1. 000014 END PROGRAM P5723.
P5723.cob (13) : JMN5723I-S 定数フィールドV2を参照するためには,オブジェクトの型を指定しなければなりません.
詳細な説明
ENUMフィールドやC#などの言語でconst属性を付けて定義したフィールドは,その型のオブジェクト参照からではなく,型名からしか参照できません.