例題
[C3163.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3163. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 GRP. 000007 02 TBL OCCURS 10 TIMES ASCENDING KEY IS A B C 000008 INDEXED BY INX. 000009 03 A PIC 9. 000010 03 B PIC X. 000011 03 C PIC X. 000012 PROCEDURE DIVISION. 000013 SEARCH ALL TBL 000014 WHEN C(INX) = "A" 000015 AND A(INX) = 9 000016 STOP RUN.
C3163.cob 14: JMN3163I-S SEARCH ALL文のWHEN指定のデータ名または条件名は，KEY IS指定中でそれより前に記述されたデータ名または条件名をすべて指定しなければなりません．
詳細な説明
SEARCH ALL文のWHEN指定の条件に，検索対象である表に指定されたKEY IS指定の全ての項目を含める必要はありません．しかしKEY IS指定に指定した順序において，途中を省略した形での指定は許されません．例えば「KEY IS A B C」の場合，WHEN指定の条件には「Aのみ」「AとB」「A, B, Cの全て」のいずれかの形でKEY項目を指定可能です．しかし「AとC」のような形では指定できません．
