引数の説明
STD |
USE |
例
000001 @OPTIONS FLAGSW(STDI)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. C9005.
000004 ENVIRONMENT DIVISION.
000005 INPUT-OUTPUT SECTION.
000006 FILE-CONTROL.
000007 SELECT IN-FILE ASSIGN TO INFL1.
000008 SELECT OUT-FILE ASSIGN TO INFL2.
000009 DATA DIVISION.
000010 FILE SECTION.
000011 FD IN-FILE.
000012 01 INREC PIC X(80).
000013 FD OUT-FILE.
000014 01 OTREC PIC X(80).
000015 PROCEDURE DIVISION.
000016 DECLARATIVES.
000017 USE-PROCESS SECTION.
000018 USE AFTER STANDARD
000019 EXCEPTION PROCEDURE ON IN-FILE
000020 OUT-FILE.
000021 END DECLARATIVES.
000022 P-START.
000023 STOP RUN.
C9005.cob (18) : JMN9005I-W (STD)USE文中の複数のファイル名は共通範囲外です.処理を続行します.