cobol => Заявление START

замечания

Оператор START предоставляет возможность позиционировать чтение в файле для последующего последовательного поиска (по ключу).

Ключевая реляционная связь может включать (но не ограничивается):

КЛЮЧ ДОЛЖЕН БОЛЕЕ
KEY IS>
КЛЮЧ НЕ МЕНЕЕ
KEY IS <
КЛЮЧЕВОЙ РАВНО
KEY IS =
КЛЮЧ НЕ БОЛЬШЕ, ЧЕМ
КЛЮЧ НЕ>
КЛЮЧ НЕ МЕНЕЕ
КЛЮЧ НЕ НЕ <
КЛЮЧ НЕ РАВНО
КЛЮЧ НЕ =
KEY IS <>
КЛЮЧ ДОЛЖЕН БОЛЬШЕ ИЛИ РАВНО
KEY IS> =
КЛЮЧ НЕ МЕНЕЕ ИЛИ РАВНО
KEY IS <=

Пример START

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

Modified text is an extract of the original Stack Overflow Documentation

Лицензировано согласно CC BY-SA 3.0

Не связан с Stack Overflow

cobol
Заявление START

Поиск…

замечания

Пример START