引数の説明
SIA |
例
000001 @OPTIONS FLAGSW(SIA)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. P9507.
000004 ENVIRONMENT DIVISION.
000005 INPUT-OUTPUT SECTION.
000006 FILE-CONTROL.
000007 SELECT IN-FILE
000008 ASSIGN TO AS-IND.
000009 DATA DIVISION.
000010 FILE SECTION.
000011 FD IN-FILE.
000012 01 REC01 PIC 9(5).
000013 01 REC02 PIC 9(5).
000014 PROCEDURE DIVISION.
000015 P-START.
000016 OPEN INPUT IN-FILE.
000017 CLOSE IN-FILE.
000018 STOP RUN.
P9507.cob (8) : JMN9507I-W (SIA)ファイル識別名のASは共通範囲外です.処理を続行します.