例
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句は注釈とみなされます．