例題
[C1520.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1520. 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. 000012 01 HEAD01 TYPE IS RH USAGE PACKED-DECIMAL. 000013 01 FOOT01 TYPE IS RF. 000014 END PROGRAM C1520.
C1520.cob 12: JMN1520I-S 報告集団記述項のUSAGE句には,DISPLAYを指定しなければなりません.DISPLAYとみなします.