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

2.7.44 JMN9125I-W

(@1@)論理演算子@2@は共通範囲外です.
処理を続行します.

引数の説明

@1@:

STD

@2@:

AND,OR,NOT

      000001 @OPTIONS FLAGSW(STDM)
      000002 IDENTIFICATION  DIVISION.
      000003 PROGRAM-ID.     C9125.
      000004 ENVIRONMENT     DIVISION.
      000005 DATA            DIVISION.
      000006 WORKING-STORAGE SECTION.
      000007   01  REC01      PIC S9(2) VALUE 0.
      000008   01  REC02      PIC S9(2) VALUE 0.
      000009   01  REC03      PIC S9(2) VALUE 0.
      000010 PROCEDURE       DIVISION.
      000011 P-START.
      000012     IF REC01 IS GREATER REC02 AND
      000013        NOT REC03 IS GREATER REC01 THEN
      000014       MOVE 1 TO REC02.
      000015     STOP RUN.
    

C9125.cob (12) : JMN9125I-W (STD)論理演算子ANDは共通範囲外です.処理を続行します.

C9125.cob (12) : JMN9125I-W (STD)論理演算子NOTは共通範囲外です.処理を続行します.