埋め込みの説明
@1@ : SORT/MERGE
@2@ : ファイル名
@3@ : データ名
例題
[C3264.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3264. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SD-FILE ASSIGN TO SYS001-DA-S-SYS001. 000007 SELECT US-FILE ASSIGN TO SYS002-DA-S-SYS002. 000008 SELECT GV-FILE ASSIGN TO SYS003 000009 ORGANIZATION IS INDEXED 000010 RECORD KEY IS RKEY-1 000011 ALTERNATE RECORD KEY IS AKEY-1 000012 ALTERNATE RECORD KEY IS AKEY-2 000013 ALTERNATE RECORD KEY IS AKEY-3 000014 ACCESS MODE IS SEQUENTIAL. 000015 DATA DIVISION. 000016 FILE SECTION. 000017 FD US-FILE. 000018 01 US-REC1 PIC X(80). 000019 FD GV-FILE. 000020 01 GV-REC1. 000021 02 RKEY-1 PIC XX. 000022 02 AKEY-1 PIC XX. 000023 02 AKEY-2 PIC XX. 000024 02 AKEY-3 PIC XX. 000025 02 FILLER PIC X(72). 000026 SD SD-FILE. 000027 01 SD-REC1. 000028 02 SD-KEY1 PIC XX. 000029 02 SD-KEY2 PIC XX. 000030 02 FILLER PIC X(74). 000031 02 SD-KEY3 PIC XX. 000032 PROCEDURE DIVISION. 000033 SORT SD-FILE ASCENDING KEY SD-KEY3 000034 USING US-FILE 000035 GIVING GV-FILE. 000036 STOP RUN.
C3264.cob 33: JMN3264I-S SORT文のGIVING指定に索引ファイル'GV-FILE'が指定されたとき，KEY指定に記述されたデータ名'SD-KEY3'は，そのファイルの主レコードキーに関連付けられるデータ項目とそのレコード中で同じ文字位置を占めなければなりません．
