例題
[P2244.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2244. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD SQFILE1 000010 RECORDING MODE IS F 000011 BLOCK CONTAINS 40 TO 80. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 PROCEDURE DIVISION. 000016 END PROGRAM P2244.
P2244.cob 9: JMN2244I-S 整数TO整数指定のBLOCK CONTAINS句は，固定長形式のファイルに指定できません．
詳細な説明
このコンパイラでは，BLOCK CONTAINS句は注釈とみなされます．
