例題
[P2239.cob] 000001 @OPTIONS FLAGSW(GSS) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P2239. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT SQFILE1 ASSIGN TO SYS001. 000008 I-O-CONTROL. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD SQFILE1 000012 RECORDING MODE IS V 000013 BLOCK CONTAINS 80 CHARACTERS. 000014 01 SQF1REC. 000015 02 PIC X(79). 000016 WORKING-STORAGE SECTION. 000017 01 WFS1 PIC X(2). 000018 PROCEDURE DIVISION. 000019 END PROGRAM P2239.
P2239.cob 11: JMN2239I-S RECORDING MODE句にFまたはVを指定したファイルのレコード長は，CHARACTERS指定のBLOCK CONTAINS句の整数以下でなければなりません．BLOCK CONTAINS句は，無効になります．
詳細な説明
RECORDING MODE句は，OSIV系システムの固有機能です．
