VMS Help
COBOL, PROCEDURE_DIVISION, SEARCH, 1format_serial
*Conan The Librarian
|
The SEARCH statement searches for a table element that satisfies a
condition. It sets the value of the associated index to point to the
table element.
Format 1 -
SEARCH src-table [ VARYING pointr ] [ AT END stment ]
{ {WHEN cond stment} ... END-SEARCH }
{ }
{ {WHEN cond { stment } } }
{ { { NEXT SENTENCE } } ... }
is a table identifier.
is an index-name or the identifier of a data item described as USAGE
INDEX, or an elementary numeric data item with no positions to the
right of the assumed decimal point.
is any conditional expression.
is an imperative statement.