例題
[C1591.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1591. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT AFILE ASSIGN TO R-DD1 000007 ACCESS MODE IS RANDOM 000008 RELATIVE KEY IS RK1 000009 LOCK MODE IS EXCLUSIVE. 000010 DATA DIVISION. 000011 FILE SECTION. 000012 FD AFILE. 000013 01 AREC PIC X(8). 000014 WORKING-STORAGE SECTION. 000015 01 RK1 PIC 9(8) BINARY. 000016 END PROGRAM C1591.
C1591.cob 6: JMN1481I-E '相対編成ファイル'はMSPまたはXSPシステムの固有機能です．
C1591.cob 8: JMN1481I-E 'RELATIVE KEY'はMSPまたはXSPシステムの固有機能です．
C1591.cob 9: JMN1591I-S LOCK MODE句は順ファイル，相対ファイルまたは索引ファイル以外に指定できません．
