NetCOBOL for .NET V8.0 メッセージ集

2.5.194 JMN5740I-S

TYPE OF特殊レジスタに指定する名前は，クラス名，インタフェース名，デリゲート名またはENUM名でなければなりません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P5740.
      000003 ENVIRONMENT    DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 REPOSITORY.
      000006     CLASS SYSTYP AS "System.Type"
      000007     CLASS SYSSTR AS "System.String".
      000008 DATA           DIVISION.
      000009 WORKING-STORAGE SECTION.
      000010 01 WTYP        OBJECT REFERENCE SYSTYP.
      000011 01 WSTR        OBJECT REFERENCE SYSSTR.
      000012 PROCEDURE      DIVISION.
      000013     SET WTYP TO TYPE OF SYSSTR
      000014     SET WTYP TO TYPE OF WSTR
      000015 END PROGRAM    P5740.
    

P5740.cob (14) : JMN5740I-S TYPE OF特殊レジスタに指定する名前は，クラス名，インタフェース名，デリゲート名またはENUM名でなければなりません．

詳細な説明

TYPE OF特殊レジスタには，クラス，インタフェース，デリゲートまたはENUMの名前を指定します．これらの型を参照しているオブジェクト参照項目であったとしても，データ名は指定できません．