例題
[C1512.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1512. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT IN-F ASSIGN INFILE. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD IN-F REPORT RPT-F. 000010 REPORT SECTION. 000011 RD RPT-F PAGE LIMIT 10 HEADING 1 000012 FIRST DETAIL 5 000013 LAST DETAIL 3 000014 FOOTING 10. 000015 01 HEAD01 TYPE IS RH. 000016 01 FOOT01 TYPE IS RF. 000017 END PROGRAM C1512.
C1512.cob 11: JMN1512I-S PAGE句の各整数の値は,HEADING,FIRST DETAIL,LAST DETAIL,FOOTINGおよびPAGE LIMITの順に昇順でなければなりません.PAGE LIMITで指定された整数のみ有効とします.