VMS Help  —  COBOL  PROCEDURE_DIVISION, SEARCH  2format_binary
  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         }

1  –  src-table

  is a table identifier.

2  –  stment

  is an imperative statement.

3  –  elemnt

  is an indexed data-name.  It refers to the table element against
  which the argument is compared.

4  –  arg

  is the argument tested against each element (elemnt) in the search.
  It is an identifier, a literal, or an arithmetic expression.

5  –  cond-name

  is a condition-name.
Close Help