例題
[P2442.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2442. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT REPFILE ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD REPFILE 000010 REPORT IS REP1. 000011 WORKING-STORAGE SECTION. 000012 01 WSO1 PIC X(10). 000013 01 WSO2 PIC X(10). 000014 REPORT SECTION. 000015 RD REP1 PAGE 66 000016 HEADING 2 000017 FIRST DETAIL 6. 000018 01 TYPE PH. 000019 02 LINE 2. 000020 03 COLUMN 10 PIC X(10) SOURCE WSO1. 000021 01 TYPE PH. 000022 02 LINE 4. 000023 03 COLUMN 10 PIC X(10) SOURCE WSO1. 000024 PROCEDURE DIVISION. 000025 END PROGRAM P2442.
P2442.cob 21: JMN2442I-S 同一タイプ(RH,PH,CH FINAL,CF FINAL,RF,PF)の報告集団は,一つの報告書に複数指定できません.そのまま処理を続行します.
詳細な説明
報告書頭書き報告集団(REPORT HEADING:RH),ページ頭書き報告集団(PAGE HEADING:PH),FINALを指定した制御頭書き報告集団(CONTROL HEADING:CH FINAL),FINALを指定した制御脚書き報告集団(CONTROL FOOTING:CF FINAL),ページ脚書き報告集団(PAGE FOOTING:PF)および報告書脚書き報告集団(REPORT FOOTING:RF)は,1つの報告書にそれぞれ1つだけ書くことができます.