埋め込みの説明
@1@ : SORT/MERGE
例題
[C3265.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3265. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 ALPHABET ABN-1 IS "A" THRU "Z". 000007 INPUT-OUTPUT SECTION. 000008 FILE-CONTROL. 000009 SELECT US-FILE ASSIGN TO SYS001-DA-S-SYS001. 000010 SELECT GV-FILE ASSIGN TO SYS002-DA-S-SYS002. 000011 SELECT SD-FILE ASSIGN TO SYS003-DA-S-SYS003. 000012 DATA DIVISION. 000013 FILE SECTION. 000014 FD US-FILE. 000015 01 US-REC1 PIC X(80). 000016 FD GV-FILE. 000017 01 GV-REC1 PIC X(80). 000018 SD SD-FILE. 000019 01 SD-REC1. 000020 02 SD-KEY1 PIC NN. 000021 02 FILLER PIC X(76). 000022 PROCEDURE DIVISION. 000023 SORT SD-FILE ASCENDING KEY SD-KEY1 000024 COLLATING SEQUENCE IS ABN-1 000025 USING US-FILE 000026 GIVING GV-FILE. 000027 STOP RUN.
C3265.cob 23: JMN3265I-S SORT文のKEY指定に日本語または日本語編集項目を指定したとき，COLLATING SEQUENCE指定を記述してはなりません．
