cobol

START statement

Remarks#

The START statement provides a way to position a read in a file for subsequent sequential retrieval (by key).

START statement syntax diagram

The key relational can include (but is not limited to):

  • KEY IS GREATER THAN

  • KEY IS >

  • KEY IS LESS THAN

  • KEY IS <

  • KEY IS EQUAL TO

  • KEY IS =

  • KEY IS NOT GREATER THAN

  • KEY IS NOT >

  • KEY IS NOT LESS THAN

  • KEY IS NOT <

  • KEY IS NOT EQUAL TO

  • KEY IS NOT =

  • KEY IS <>

  • KEY IS GREATER THAN OR EQUAL TO

  • KEY IS >=

  • KEY IS LESS THAN OR EQUAL TO

  • KEY IS <=

START example

start indexing
   key is less than
       keyfield of indexing-record
   invalid key
       display "bad start: " keyfield of indexing-record
       set no-more-records to true
   not invalid key
       read indexing previous record
           at end set no-more-records to true
       end-read
end-start

This modified text is an extract of the original Stack Overflow Documentation created by the contributors and released under CC BY-SA 3.0 This website is not affiliated with Stack Overflow