例題
[P2420.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2420. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT REPFILE ASSIGN TO SYS001 000007 ORGANIZATION IS RELATIVE. 000008 I-O-CONTROL. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD REPFILE 000012 REPORT IS REP1. 000013 WORKING-STORAGE SECTION. 000014 01 CTLD PIC 9(2). 000015 REPORT SECTION. 000016 RD REP1 PAGE 66 000017 CONTROL CTLD. 000018 01 TYPE CF CTLD. 000019 PROCEDURE DIVISION. 000020 END PROGRAM P2420.
P2420.cob 11: JMN2001I-S ファイル記述項または整列併合用ファイル記述項には,レコード記述項が従属しなければなりません.ファイル記述項または整列併合用ファイル記述項は,無効になります.
P2420.cob 12: JMN2420I-S 報告書ファイルは順ファイルでなければなりません.この報告書ファイルは無効となります.
P2420.cob 16: JMN2411I-S 報告書記述項の報告書名が,REPORT句に指定されていません.この報告書記述項および報告集団記述項は,無効となります.