例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2616.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WGRP.
000007 02 WDATA OCCURS 10 INDEXED BY IX1
000008 ASCENDING KEY IS WITM1.
000009 03 WITM1 PIC X.
000010 88 XVAL VALUE "X".
000011 03 WITM2 PIC X.
000012 PROCEDURE DIVISION.
000013 SEARCH ALL WDATA
000014 WHEN XVAL(IX1))
000015 DISPLAY "OK"
000016 END-SEARCH
000017 END PROGRAM P2616.
P2616.cob (14) : JMN2616I-S 右括弧に対応する左括弧が指定されていません．余分な右括弧は，無効になります．