Язык программирования КОБОЛ

—

2 КОМ

Оператор SET (УСТАНОВИТЬ)

1 ТАБ

1 ЯДР

Имя-индекса/идентификатор ТО (НА)

Имя-индекса UP BY/DOWN BY (имя-индекса

1 ТАБ

1 ЯДР

ПРИБАВЛЯЯ/ВЫЧИТАЯ)

1 ТАБ

1 ЯДР

г.',^пе\!?нт

•гост

Насти а ший стандарт

Мнемоническое имя ТО ON/OFF (мнемоничес-

кое имя НА ВКЛЮЧЕНО/ВЫКЛЮЧЕНО)

—

1 ЯДР

Имя-условия ТО TRUE (НА ИСТИНА)

——

2 ЯДР

Оператор SORT (СОРТИРОВАТЬ)

1 СРТ

1 СРТ

Вариант ASCENDING/DESCENDING KEY (ПО

ВОЗРАСТАНИЮ/УБЫВАНИЮ КЛЮЧА)

1 СРТ

1 СРТ

Вариант DUPLICATES (С ДУБЛИРОВАНИ-

ЕМ)

—

1 СРТ

Вариант COLLATING SEQUENCE (АЛФА-

ВИТ)

2 СРТ

1 СРТ

Вариант INPUT PROCEDURE (ПРОЦЕДУРА

ВВОДА)

1 СРТ

1 СРТ

Имя-секции

1 СРТ

—

Имя-процедуры

—

1 СРТ

Вариант USING (ИСПОЛЬЗУЯ)

1 СРТ

1 СРТ

Несколько имен-файлов

2 СРТ

1 СРТ

Вариант OUTPUT PROCEDURE (ПРОЦЕДУРА

ВЫВОДА)

Т СРТ

1 СРТ

Имя-секции

І1- СРТ

—

Имя-процедуры

—

1 СРТ

Вариант GIVING (ПОЛУЧАЯ)

1 СРТ

1 СРТ

Несколько имен-файлов

«■в

1 СРТ

Оператор START (ПОДВЕСТИ)

2 ОТД

2 ОТД

2 ИПД

2 ИПД

Вариант KEY (КЛЮЧ)

2 ОТД

2 ОТД

2 ИПД

2 ИПД

EQUAL ТО (РАВНО)

2 ОТД

2 ОТД

2 ИПД

2 ИПД

=

2 ОТД

2 ОТД

2 ИПД

2 ИПД

GREATER THAN (БОЛЬШЕ)

2 ОТД

2 ОТД

2 ИПД

2 ИПД

2 ОТД

2 ОТД

2 ИПД

2 ИПД

NOT LESS THAN (НЕ МЕНЬШЕ)

2 ОТД

2 ОТД

2 ИПД

2 ИПД

НЕ <

2 ОТД

2 ОТД

2 ИПД

2 ИПД

GREATER THAN OR EQUAL TO (БОЛЬШЕ

ИЛИ РАВНО)

—•

2 ОТД

2 ИПД

2 ОТД

2 ИПД

Вариант INVALID KEY (ПРИ ОШИБКЕ КЛЮ-

ЧА)

2 ОТД

2 ОТД

2 ИПД

2 ИПД

Вариант NOT INVALID KEY (БЕЗ ОШИБКИ

КЛЮЧА)

—

2 ОТД

2 ИПД

Вариант END-START (КОНЕЦ-ПОДВЕСТИ)

—

2 ОТД

2 ИПД,

Оператор STOP (ОСТАНОВИТЬ)

1 ЯДР

1 ЯДР

ОдеМРИГ 1

ГОСТ 225'8

Настоящий

RUN (РАБОТУ)

1 ЯДР

I ЯДР

Литерал

1 ЯДР

1 ЯДР 4-

‘Оператор STRING (СОБРАТЬ)

Несколько DELIMITED BY (ОГРАНИЧИВА-

2 ЯДР

2 ЯДР

ЯСЬ)

2 ЯДР

2 ЯДР

Вариант WITH POINTER (УКАЗАТЕЛЬ)

Вариант ON OVERFLOW (ПРИ ПЕРЕПОЛІТЕ-

2 ЯДР

2 ЯДР

НИИ)

Вариант NOT ON OVERFLOW (БЕЗ ПЕРЕ-

2 ЯДР

2 ЯДР

ПОЛНЕНИЯ)

—

2 ЯДР

Вариант END-STRING (КОНЕЦ-СОррАТЫ

—

2 ЯДР

«Оператор SUB TRACT (ОТНЯТЬ)

1 ЯДР

т ядр

Идентификатор/литерал

1 ЯДР

1 ЯДР

Несколько идентификаторов,литералов

1 ЯДР

I ЯДР

FROM идентификатор (ОТ идентификатор) FROM несколько идентификаторов (ОТ песколь-

1 ЯДР

т ядр

ко идентификаторов)

GIVING идентификатор (ПОЛУЧАЯ идентифи-

2 ЯДР

1 ЯДР

катор)

GIVING несколько идентификаторов (ПОЛУ-

1 ЯДР

ЯДР

■ЧАЯ несколько идентификаторов)

2 ЯДР

1 ЯДР

Вариант ROUNDED (ОКРУГЛЯЯ)

Вариант ON SIZE ERROR (ПРИ ПЕРЕПОЛ-

1 ЯДР

1 ЯДР

НЕНИИ)

Вариант NOT ON SIZE ERROR (БЕЗ ПЕРЕ-

1 ЯДР

1 ЯДР

ПОЛНЕНИЯ)

—

'1 ЯДР

Вариант END-SUBTRACT (КОНЕЦ-ОТНЯТЬ)

Вариант CORRESPONDING (СООТВЕТСТВЕН-

—

1 ЯДР

НО)

2 ЯДР

2 ЯДР

’Оператор SUPPRESS (ПОДАВИТЬ)

1 гот

1 ГОГ

'Оператор TERMINATE (ЗАКОНЧИТЬ)

«Оператор UNSTRING (РАЗОБРАТЬ)

2 ЯДР

2 ЯДР

2 ЯДР

2 ЯДР

Вариант DELIMITED BY (ОГРАНИЧИВАЯСЬ)