埋め込みの説明
@1@ : RELATIVE KEY．
例題
[P2163.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2163. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT RLFILE1 ASSIGN TO R-SYS001 000007 RELATIVE KEY IS RKEY. 000008 I-O-CONTROL. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD RLFILE1. 000012 01 RLF1REC. 000013 02 PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 01 RKEY PIC X(8). 000016 PROCEDURE DIVISION. 000017 END PROGRAM P2163.
P2163.cob 7: JMN2163I-W RELATIVE KEY句のデータ名は，8けたの2進項目でなければなりません．8けたの2進項目が指定されたものとみなします．
詳細な説明
ACCESS MODE句のRELATIVE KEYで指定したデータ項目は，プログラムと入出力管理システムの間で相対レコード番号を連絡するために使用されるので，所定の属性である必要があります．
