ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.5.161 JMN3259I-S

@1@文に指定された整列併合用ファイルのレコード長は,@2@指定に記述されたファイル@3@の最大レコード長以下であり,かつ最小レコード長以上でなければなりません.

埋め込みの説明

@1@ : SORT/MERGE
@2@ : USING/GIVING
@3@ : ファイル名

例題

[C3259.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.  C3259.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT US-FILE   ASSIGN TO SYS001-DA-S-SYS001.
000007     SELECT GV-FILE   ASSIGN TO SYS002-DA-S-SYS002.
000008     SELECT SD-FILE   ASSIGN TO SYS003-DA-S-SYS003.
000009 DATA DIVISION.
000010 FILE SECTION.
000011 FD   US-FILE.
000012  01 US-REC1    PIC X(80).
000013 FD   GV-FILE.
000014  01 GV-REC1    PIC X(75).
000015 SD   SD-FILE.
000016  01 SD-REC.
000017     02 SD-KEY1    PIC X(5).
000018     02 FILLER     PIC X(75).
000019 PROCEDURE DIVISION.
000020     SORT SD-FILE ASCENDING KEY SD-KEY1
000021          USING   US-FILE
000022          GIVING  GV-FILE.
000023     STOP RUN.

C3259.cob 20: JMN3259I-S SORT文に指定された整列併合用ファイルのレコード長は,GIVING指定に記述されたファイル'GV-FILE'の最大レコード長以下であり,かつ最小レコード長以上でなければなりません.