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 } } ...  }

  1 - src-table

  is a table identifier.

  2 - pointr

  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.

  3 - cond

  is any conditional expression.

  4 - stment

  is an imperative statement.
  Close     Help