2.4.87 JMN3124I-S

CHARACTER TYPE句またはPRINTING POSITION句指定のあるレコード記述項を持つファイルは，@2@文のUSINGまたはGIVING指定に記述できません．
ファイル名@1@は，無効になります．

引数の説明

@1@:

ファイル名

@2@:

'SORT'，'MERGE'

例

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID. C3124.
      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-S-SYS002.
      000008     SELECT FILE-3  ASSIGN TO DA-S-SYS003.
      000009 DATA  DIVISION.
      000010 FILE SECTION.
      000011 SD  FILE-1 LABEL RECORD IS STANDARD.
      000012    01 REC-1.
      000013     02 KEY-REC PIC XX.
      000014     02 FILLER  PIC X(78).
      000015 FD  FILE-2 LABEL RECORD IS STANDARD.
      000016    01 REC-2 PIC N(40) CHARACTER TYPE IS MODE-2.
      000017 FD  FILE-3 LABEL RECORD IS STANDARD.
      000018    01 REC-3 PIC X(80).
      000019 PROCEDURE  DIVISION.
      000020     SORT FILE-1 ON ASCENDING KEY KEY-REC
      000021       USING  FILE-2
      000022       GIVING FILE-3.
      000023     STOP RUN.

C3124.cob (21) : JMN3124I-S CHARACTER TYPE句またはPRINTING POSITION句指定のあるレコード記述項を持つファイルは，SORT文のUSINGまたはGIVING指定に記述できません．ファイル名'FILE-2'は，無効になります．