例題
[P2948.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2948. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO DA_SYS001 000007 ORGANIZATION IS SEQUENTIAL 000008 FILE STATUS IS WFS1. 000009 I-O-CONTROL. 000010 DATA DIVISION. 000011 FILE SECTION. 000012 FD SQFILE1. 000013 01 SQF1REC. 000014 02 PIC X(80). 000015 WORKING-STORAGE SECTION. 000016 01 WFS1 PIC X(2). 000017 PROCEDURE DIVISION. 000018 END PROGRAM P2948.
P2948.cob 6: JMN2948I-E ファイル識別名の構成文字に誤りがあります.またはファイル識別名の名前が8文字を超えています.ファイル識別名の名前を有効とします.ただし,8文字を超えている場合は,先頭8文字とします.
詳細な説明
ファイル識別名は,記憶媒体上のファイルを識別するための名前です.ファイルを使う場合,環境部のファイル管理記述項で,ファイル識別名をファイル名に関係付けなければなりません.ファイル識別名は,英字と数字だけから構成される,8文字以下の文字列でなければなりません.名前の最初の文字は,英字でなければなりません.