引数の説明
STD |
例
000001 @OPTIONS FLAGSW(STDM)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. C9128.
000004 ENVIRONMENT DIVISION.
000005 DATA DIVISION.
000006 WORKING-STORAGE SECTION.
000007 01 SIGNAL PIC X.
000008 88 BLUE VALUE "B".
000009 PROCEDURE DIVISION.
000010 MOVE "B" TO SIGNAL.
000011 IF BLUE THEN
000012 DISPLAY "*** GO ***"
000013 END-IF.
000014 STOP RUN.
C9128.cob (11) : JMN9128I-W (STD)条件名条件は共通範囲外です.処理を続行します.