ページの先頭行へ戻る
NetCOBOL for .NET V8.0 メッセージ集
FUJITSU Software

2.5.178 JMN5723I-S

定数フィールド@1@を参照するためには,オブジェクトの型を指定しなければなりません.

引数の説明

@1@:

エラーの原因となったフィールド名.

      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属性を付けて定義したフィールドは,その型のオブジェクト参照からではなく,型名からしか参照できません.