例題
[C1469.cob] 000001 @OPTIONS FLAGSW(GSS) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C1469. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT IN-F ASSIGN TO SP-00-FILE. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD IN-F. 000011 01 IN-R PIC X(80). 000012 END PROGRAM C1469.
C1469.cob 7: JMN1469I-S ファイル識別名の装置クラスがSPの場合,編成に'S'を指定しなければなりません.ファイル識別名は無効になります.