例題
[C1320.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1320. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT INFILE ASSIGN TO SYS001 000007 ORGANIZATION IS RELATIVE 000008 ACCESS MODE IS DYNAMIC. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD INFILE. 000012 01 INREC. 000013 02 KEY1 PIC X(80). 000014 END PROGRAM C1320.
C1320.cob 6: JMN1320I-S 乱呼出しまたは動的呼出しの相対ファイルには，RELATIVE KEY句を指定しなければなりません．
