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

2.3.366 JMN2597I-S

EVALUATE文の選択主体または選択対象に,正負条件は指定できません.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2597.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 WNUM1       PIC S9(4) BINARY.
      000007 01 WNUM2       PIC S9(4) BINARY.
      000008 PROCEDURE      DIVISION.
      000009     EVALUATE WNUM1
      000010              TRUE
      000011     WHEN 13
      000012          WNUM2 IS NEGATIVE
      000013       DISPLAY "OK"
      000014     END-EVALUATE
      000015 END PROGRAM    P2597.
    

P2597.cob (12) : JMN2597I-S EVALUATE文の選択主体または選択対象に,正負条件は指定できません.