SEARCH

Format 1

SEARCH table-name [ VARYING index-item ]

 [ AT END statement-1 ]

 { WHEN srch-cond {statement-2   }   } ...
                  {NEXT SENTENCE }

 [ END-SEARCH ]

Format 2

SEARCH ALL table-name

 [ AT END statement-1 ]

 WHEN { tbl-item   {IS EQUAL TO} value    }
      {            {IS =       }          }
      { cond-name                         }

      [ AND { tbl-item   {IS EQUAL TO} value } ] ...
            {            {IS =       }       }
            { cond-name                      }

            { statement-2   }
            { NEXT SENTENCE }

 [ END-SEARCH ]