例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2001.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001
000007 ORGANIZATION IS SEQUENTIAL
000008 FILE STATUS IS WFS1.
000009 I-O-CONTROL.
000010 DATA DIVISION.
000011 FILE SECTION.
000012 FD SQFILE1.
000013 WORKING-STORAGE SECTION.
000014 01 WFS1 PIC X(2).
000015 PROCEDURE DIVISION.
000016 END PROGRAM P2001.
P2001.cob (12) : JMN2001I-S ファイル記述項または整列併合用ファイル記述項には，レコード記述項が従属しなければなりません．ファイル記述項または整列併合用ファイル記述項は，無効になります．
詳細な説明
この診断メッセージが出力されるのは，ファイル記述項(FD記述項)に続いて，レコード記述項が指定されていないことが原因です．
レコード記述項はレコードの構造を指定するための一連のデータ記述項です．