2.8.46 JMN9125I-W

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

埋め込みの説明

@1@ : STD
@2@ : AND，OR，NOT

例題

[C9125.cob]
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: JMN9127I-W (STD)複合条件は共通範囲外です．処理を続行します．

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

C9125.cob 12: JMN9127I-W (STD)複合条件は共通範囲外です．処理を続行します．