VMS Help
COBOL, PROCEDURE_DIVISION, SEARCH, 2format_binary
*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 2 -
SEARCH ALL src-table [ AT END stment ]
WHEN { elemnt { IS EQUAL TO } arg }
{ { IS = } }
{ cond-name }
[ AND { elemnt { IS EQUAL TO } arg } ] ...
[ { { IS = } } ]
[ { cond-name } ]
{ stment [ END-SEARCH ] }
{ NEXT SENTENCE }
is a table identifier.
is an imperative statement.
is an indexed data-name. It refers to the table element against
which the argument is compared.
is the argument tested against each element (elemnt) in the search.
It is an identifier, a literal, or an arithmetic expression.
is a condition-name.