引数の説明
STD |
例
000001 @OPTIONS FLAGSW(STDM)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. P9181.
000004 ENVIRONMENT DIVISION.
000005 DATA DIVISION.
000006 WORKING-STORAGE SECTION.
000007 01 REC01.
000008 02 REC02 PIC X.
000009 88 REC03 VALUE "A".
000010 PROCEDURE DIVISION.
000011 P-START.
000012 SET REC03 TO TRUE.
000013 STOP RUN.
P9181.cob (12) : JMN9181I-W (STD)SET文中のTO TRUE句は共通範囲外です.処理を続行します.