埋め込みの説明
@1@ : 編成種別
@2@ : ファイル名
@3@ : SORTまたはMERGE
@4@ : USINGまたはGIVING
例題
[C3056.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3056. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT FILE-1 ASSIGN TO DA-S-SYS001. 000007 SELECT FILE-2 ASSIGN TO DA-D-SYS002. 000008 SELECT FILE-3 ASSIGN TO DA-I-SYS003 000009 ACCESS MODE IS RANDOM 000010 INDEXED RECORD KEY IS KEY-3-1. 000011 DATA DIVISION. 000012 FILE SECTION. 000013 SD FILE-1 LABEL RECORD STANDARD. 000014 01 REC-1. 000015 02 KEY-1 PIC 9(2). 000016 02 KEY-2 PIC 9(2). 000017 02 KEY-3 PIC 9(2). 000018 02 FILLER PIC X(74). 000019 FD FILE-2 LABEL RECORD STANDARD. 000020 01 REC-2 PIC X(80). 000021 FD FILE-3 LABEL RECORD STANDARD. 000022 01 REC-3. 000023 02 KEY-3-1 PIC 9(2). 000024 02 KEY-3-2 PIC X(78). 000025 PROCEDURE DIVISION. 000026 P-START. 000027 SORT FILE-1 ON ASCENDING KEY KEY-1 KEY-2 000028 USING FILE-2 000029 GIVING FILE-3. 000030 STOP RUN.
C3056.cob 27: JMN3056I-S 索引ファイル'FILE-3'は,SORT文のGIVING指定に記述できません.
詳細な説明
メッセージが示すファイルは,SORT文およびMERGE文のUSING指定およびGIVING指定に指定できる種別ではありません.指定できるのは,以下に示す種別のファイルのみです.
大記憶装置またはフロッピィディスク装置の順ファイル
順呼出し法の相対ファイル
順呼出し法の索引ファイル