例題
[C1324.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1324. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT IN-F ASSIGN SYS001 000007 ACTUAL KEY IS FKEY1 000008 . 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD IN-F. 000012 01 INFILED. 000013 02 FKEY1 PIC 9(4). 000014 02 IN-R PIC X(80). 000015 END PROGRAM C1324.
C1324.cob 7: JMN1324I-S ACTUAL KEY句は，直接編成ファイル以外に指定できません．
