例題
[P2903.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2903. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SRTFILE1 ASSIGN TO SYS001. 000007 I-O-CONTROL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 SD SRTFILE1 000011 RECORD CONTAINS 0. 000012 01 SRTF1REC. 000013 02 PIC N(80). 000014 WORKING-STORAGE SECTION. 000015 01 WFS1 PIC X(2). 000016 PROCEDURE DIVISION. 000017 END PROGRAM P2903.
P2903.cob 11: JMN2903I-S 'RECORD CONTAINS 0'は,整列併合用ファイル記述項に指定できません.