引数の説明
SIA |
ACM,CMD,TRM,WST,DATA-NAME |
例
000001 @OPTIONS FLAGSW(SIA)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. C9384.
000004 ENVIRONMENT DIVISION.
000005 INPUT-OUTPUT SECTION.
000006 FILE-CONTROL.
000007 SELECT MED01
000008 ASSIGN TO GS-FILE
000009 SYMBOLIC DESTINATION IS DATA1.
000010 DATA DIVISION.
000011 FILE SECTION.
000012 FD MED01.
000013 01 REC01 PIC 9(5).
000014 01 REC02 PIC 9(5).
000015 WORKING-STORAGE SECTION.
000016 01 DATA1 PIC X(3).
000017 PROCEDURE DIVISION.
000018 P-START.
000019 OPEN INPUT MED01.
000020 CLOSE MED01.
000021 STOP RUN.
C9384.cob (12) : JMN9384I-W (SIA)SYMBOLIC DESTINATION句のDATA-NAMEは共通範囲外です.処理を続行します.