例題
[C1187.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1187. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SORTFILE ASSIGN TO S-FILE. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 SD 1234. 000010 01 SORTREC PIC X(80). 000011 END PROGRAM C1187.
C1187.cob 9: JMN1187I-S レベル指示語SDの直後は,ファイル名でなければなりません.この記述項は無効にし,次の部,節,レベル指示語,またはレベル番号まで読み飛ばします.