例
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が指定されている(昇順指定)と,呼び出されるレコードが存在しません.