例題
[P2896.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2896. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SRTFILE ASSIGN TO "D:\TMPFILE". 000007 I-O-CONTROL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 SD SRTFILE. 000011 01 SRTFREC. 000012 02 PIC X(80). 000013 WORKING-STORAGE SECTION. 000014 PROCEDURE DIVISION. 000015 END PROGRAM P2896.
P2896.cob 10: JMN2896I-I 整列併合用ファイルは,ASSIGN句にファイル識別名指定以外記述できません.書かれた通りに受け入れます.