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

2.3.428 JMN2710I-S

昇順指定のSTART文には,REVERSED ORDER指定は記述できません.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2710.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT IXFILE1 ASSIGN TO SYS001
      000007       ORGANIZATION   IS INDEXED
      000008       RECORD KEY     IS WRKY1.
      000009 I-O-CONTROL.
      000010 DATA           DIVISION.
      000011 FILE            SECTION.
      000012 FD IXFILE1.
      000013 01 IXF1REC.
      000014   02 WRKY1     PIC 9(2).
      000015   02           PIC X(80).
      000016 WORKING-STORAGE SECTION.
      000017 PROCEDURE      DIVISION.
      000018     START IXFILE1
      000019       KEY IS GREATER THAN WRKY1
      000020       WITH REVERSED ORDER
      000021 END PROGRAM    P2710.
    

P2710.cob (20) : JMN2710I-S 昇順指定のSTART文には,REVERSED ORDER指定は記述できません.

詳細な説明

REVERSED ORDER指定付きのSTART文が実行されると,レコードの末尾からレコードの先頭に向かって,逆順にレコードを呼び出します.このとき,KEY 指定にIS GREATER THAN/IS GREATER OR EQUAL TOが指定されている(昇順指定)と,呼び出されるレコードが存在しません.