例題
[P2400.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2400. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT REPFILE1 ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD REPFILE1 REPORT REP1. 000010 WORKING-STORAGE SECTION. 000011 REPORT SECTION. 000012 RD REP1 PAGE 46 000013 HEADING 1 000014 FIRST DETAIL 7 000015 LAST DETAIL 44. 000016 01 TYPE PAGE HEADING. 000017 02 LINE 01 COLUMN 35 000018 PIC S9(6) SOURCE LINE-COUNTER OF REPFILE. 000019 PROCEDURE DIVISION. 000020 END PROGRAM P2400.
P2400.cob 19: JMN2400I-S SOURCE句に修飾付きのPAGE-COUNTERまたはLINE-COUNTERを指定する場合，一意な報告書名で修飾しなければなりません．
詳細な説明
PAGE-COUNTER(ページカウンタ)またはLINE-COUNTER(行カウンタ)は，報告書作成機能で使用される特殊レジスタです．これらの特殊レジスタは，報告書ごとに生成されます．PAGE-COUNTERまたはLINE-COUNTERを修飾する場合は，報告書名(レベル指示語RDに続く名標)で修飾しなければなりません．
