例
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文字以下の文字列でなければなりません.名前の最初の文字は,英字でなければなりません.