引数の説明
'表示ファイル','図表ファイル' |
ファイル名 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3142.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT FILE-1 ASSIGN TO GS-SYS001
000007 SYMBOLIC DESTINATION IS "ACM".
000008 DATA DIVISION.
000009 FILE SECTION.
000010 FD FILE-1.
000011 01 REC-1 PIC X(121).
000012 PROCEDURE DIVISION.
000013 REWRITE REC-1.
000014 STOP RUN.
C3142.cob (13) : JMN3142I-S 表示ファイル'FILE-1'は,REWRITE文に指定できません.