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

2.4.139 JMN3236I-S

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

引数の説明

@1@:

SORT/MERGE

@2@:

USING/GIVING

@3@:

ファイル名

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID.  C3236.
      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(100).
      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.
    

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