例題
[P2916.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2916. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT RLFILE1 ASSIGN TO SYS001 000007 ORGANIZATION IS RELATIVE 000008 RELATIVE KEY IS WRKY. 000009 I-O-CONTROL. 000010 DATA DIVISION. 000011 FILE SECTION. 000012 FD RLFILE1 IS EXTERNAL. 000013 01 RLF1REC. 000014 02 PIC X(80). 000015 WORKING-STORAGE SECTION. 000016 01 WRKY PIC 9(8) BINARY. 000017 PROCEDURE DIVISION. 000018 END PROGRAM P2916.
P2916.cob 8: JMN2916I-S RELATIVE KEY句の指定されているファイルが外部属性を持つ場合，RELATIVE KEY句に指定されたデータ名は外部属性を持つ項目でなければなりません．
詳細な説明
外部属性を持つファイル(ファイル記述項にEXTERNAL句を指定したファイル)には，実行単位中で1つの記憶領域が割り当てられ，実行単位中のすべてのプログラムから参照することができます．
相対ファイル中のレコードは，RELATIVE KEYに指定した項目(相対キー)の比較によって処理されるので，ファイルが外部属性を持つならば，そのファイルに関連付けた相対キー項目も外部属性(EXTERNAL句)を持たなければなりません．
