引数の説明
SIA,STD |
ACCEPT,DISPLAY |
例
000001 @OPTIONS FLAGSW(STDM)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. C9003.
000004 ENVIRONMENT DIVISION.
000005 DATA DIVISION.
000006 WORKING-STORAGE SECTION.
000007 01 REC01 PIC X(80).
000008 PROCEDURE DIVISION.
000009 P-START.
000010 ACCEPT REC01 FROM SYSIN.
000011 STOP RUN.
C9003.cob (10) : JMN9003I-W (STD)ACCEPT文中の機能名は共通範囲外です.処理を続行します.