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

2.4.33 JMN3046I-S

EVALUATE文の選択主体に算術式，一意名または定数を指定した場合，選択対象は算術式，一意名，定数またはANYでなければなりません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.  C3046.
      000003 ENVIRONMENT  DIVISION.
      000004 DATA  DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01  A        PIC 9(2).
      000007 PROCEDURE  DIVISION.
      000008     EVALUATE A
      000009     WHEN 0
      000010       MOVE 0 TO A
      000011     WHEN TRUE
      000012       MOVE 1 TO A
      000013     END-EVALUATE.
      000014 END PROGRAM  C3046.
    

C3046.cob (11) : JMN3046I-S EVALUATE文の選択主体に算術式，一意名または定数を指定した場合，選択対象は算術式，一意名，定数またはANYでなければなりません．