cobol START statement START example
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
