例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1188.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT IN-F ASSIGN GS-DISP
000007 SYMBOLIC DESTINATION IS "DSP"
000008 PROCESSING MODE IS SEQUENTIAL
000009 .
000010 DATA DIVISION.
000011 FILE SECTION.
000012 FD IN-F.
000013 01 IN-R PIC X(80).
000014 WORKING-STORAGE SECTION.
000015 END PROGRAM C1188.
C1188.cob (8) : JMN1188I-S 表示ファイルの場合,PROCESSING MODE句はデータ名を指定しなければなりません.