引数の説明
SIA,STD |
ACCEPT,DISPLAY,MERGE,SORT,WRITE |
例
000001 @OPTIONS FLAGSW(STDM)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. C9004.
000004 ENVIRONMENT DIVISION.
000005 CONFIGURATION SECTION.
000006 SPECIAL-NAMES.
000007 SYSIN IS NYURYOKU.
000008 DATA DIVISION.
000009 WORKING-STORAGE SECTION.
000010 01 REC01 PIC X(80).
000011 PROCEDURE DIVISION.
000012 P-START.
000013 ACCEPT REC01 FROM NYURYOKU.
000014 STOP RUN.
C9004.cob (13) : JMN9004I-W (STD)ACCEPT文中の呼び名は共通範囲外です.処理を続行します.