例題
[C1318.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1318. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT IN-F ASSIGN SYS000 000007 NOMINAL KEY IS K1 000008 . 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD IN-F. 000012 01 IN-R PIC X(80). 000013 WORKING-STORAGE SECTION. 000014 01 K1 PIC XX. 000015 END PROGRAM C1318.
C1318.cob 7: JMN1318I-S NOMINAL KEY句は，インデックスつき編成ファイル以外に指定できません．
C1318.cob 7: JMN1481I-E 'NOMINAL KEY'はMSPまたはXSPシステムの固有機能です．
