---

Фраза JUSTIFIED (СДВИНУТО) ... X

Фраза номер-уровня X

от 01 до 49; одна или две цифры ... X

66 —

77 X

«6 —

Фраза OCCURS (ПОВТОРЯЕТСЯ) • X

целое TIMES (целое РАЗ) .... X

фраза ASCENDING/DESCENDING KEY (ПО ВОЗРАСТАНИЮ/УБЫВАНИЮ КЛЮ­ЧА) —

фраза INDEXED BY (ИНДЕКСИРУЕТСЯ) . X

фраза целое-1 ТО целое-2 TIMES DEPENDING

ON (целое-1 ДО целое-2 РАЗ В ЗАВИСИМОС­ТИ ОТ) —

Фраза PICTURE (ШАБЛОН) .... X

строка-литер содержит не более 30 литер . X литеры данных: X 9 А X

операционные символы: S(3) V(T) Р(М) . X литеры фиксированной вставки В . 0

$ ⁽ П ) ^CR <^КР> DB (ДБ) / • • X

литеры замещения или плавающей вставки •

+ - z(nj $ ( пу ) . - . . X

замена валютного знака X

замена десятичной точки X

Фраза REDEFINES (ПЕРЕОПРЕДЕЛЯЕТ) . . X

не может быть вложенной X

может быть вложенной —

Фраза RENAMES (ПЕРЕИМЕНОВЫВАЕТ) . —

Фраза SIGN (ЗНАК) X

Ф

Знаки операций отношения

[NOT] GREATER THAN ([НЕ] БОЛЬШЕ)

NOT NOT NOT NOT

раза SYNCHRONIZED (ВЫДЕЛЕНО) .

РАЗДЕЛ ПРОЦЕДУ

Комбинированное условие —

Условие в скобках X

Сокращенные комбинированные условия отно­шений —

Арифметические операторы X

Арифметические операнды имеют длину до 18 цифр X

Композиция операндов содержит не более 18 цифр X

Оператор ACCEPT (ПРИНЯТЬ) .... х

идентификатор ....... X

только одна передача данных .... х

число передач данных не ограничивается . .

фраза FROM мнемоническое-имя (С мнемониче- ское-имя) —

фраза FROM DATE/DAY/DAY-OF-WEEK/TIME (ДАТУ/ДЕНЬ/ДЕНЬ/-НЕДЕЛИ/ВРЕМЯ) . _

Оператор ADD (СЛОЖИТЬ) X

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

несколько идентификаторов/литералов . . х

ТО идентификатор (С идентификатор) . . х

ТО несколько идентификаторов (С несколько, идентификаторов) X

ТО идентификатор/литерал GIVING идентифи­катор (С идентификатор/литерал ПОЛУЧАЯ идентификатор X

ТО идентификатор/литерал GIVING несколько идентификаторов (С идентификатор/литерал ПО­ЛУЧАЯ несколько идентификаторов ... X

фраза ROUNDED (ОКРУГЛЯЯ) ... X

фраза ON SIZE ERROR (ПРИ ПЕРЕПОЛНЕ­НИИ) X

фраза NOT ON SIZE ERROR (БЕЗ ПЕРЕПОЛ­НЕНИЯ) - X

фраза END-ADD (КОНЕЦ-СЛОЖИТЬ) X

фраза CORRESPONDING (СООТВЕТСТВЕН­

НО) _

Оператор ALTER (ИЗМЕНИТЬ) . +

только одно имя-процедуры .

несколько имен-процедур

Оператор COMPUTE (ВЫЧИСЛИТЬ) ’ ’ ’ -

арифметическое выражение —

несколько идентификаторов . —

фраза ROUNDED (ОКРУГЛЯЯ) . —

фраза ON SIZE ERROR (ПРИ ПЕРЕПОЛНЕ­НИИ) _

фраза NOT ON SIZE ERROR (БЕЗ ПЕРЕПОЛ­НЕНИЯ) .... _

фраза END-COMPUTE (КОНЕЦ-ВЫЧЙСЛЙТЬ) _

Оператор CONTINUE (ПРОДОЛЖИТЬ) X

Оператор DISPLAY (ВЫДАТЬ) . . х

только одна передача данных .... X

число передач данных не ограничено идентификатор/литерал

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

фраза UPON мнемоническое-имя (НА мнемони- ческое-имя)

фраза WITH NO ADVANCING (БЕЗ ПРО­ДВИЖЕНИЯ)

Оператор DIVIDE (РАЗДЕЛИТЬ)

BY идентификатор/литерал (НА идентифика­тор/литерал) . . ....

INTO идентификатор/литерал (НА идентифика­тор/литерал)

INTO несколько делимых (НА несколько дели­мых)

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

GIVING несколько идентификаторов (ПОЛУ­ЧАЯ несколько идентификаторов) фраза ROUNDED (ОКРУГЛЯЯ) фраза REMAINDER (ОСТАТОК)

ф

X

X

X

+

раза ON SIZE ERROR (ПРИ ПЕРЕПОЛНЕ­НИИ)

фраза NOT ON SIZE ERROR (БЕЗ ПЕРЕПОЛ­НЕНИЯ)

фраза END-DIVIDE (КОНЕЦ-РАЗДЕЛИТЬ) .

Оператор ENTER (ВОЙТИ)

Оператор EVALUATE (ОЦЕНИТЬ) идентификатор/литерал

арифметическое выражение . . . . .

условное выражение ...... TRUE/FALSE (ИСТИНА/ЛОЖЬ)

фраза ALSO (ТАКЖЕ)

фраза WHEN (КОГДА)

фраза ALSO (ТАКЖЕ)

фраза WHEN OTHER (ИНАЧЕ)

фраза END-EVALUATE (КОНЕЦ-ОЦЕНИТЬ) .

Оператор EXIT (ВЫИТИ)

Оператор GO ТО (ПЕРЕЙТИ К) . . і '

имя-процедуры обязательно

имя-процедуры необязательно фраза DEPENDING ON (В ЗАВИСИМОСТИ ОТ)

Оператор IF (ЕСЛИ) . . .

только повелительные операторы повелительные и(или) условные операторы вложенные операторы 1р (ЕСЛИ) необязательное слово THEN (ТО) фраза NEXT SENTENCE (СЛЕДУЮЩЕЕ ПРЕДЛОЖЕНИЕ)

фраза ELSE (ИНАЧЕ)

фраза END-IF (КОНЕЦ-ЕСЛИ)Оператор INITIALIZE (ИНИЦИИРОВАТЬ) несколько идентификаторов . . .

фраза REPLACING (ЗАМЕНЯЯ) несколько REPLACING (ЗАМЕНЯЯ)

Оператор INSPECT (ПРОСМОТРЕТЬ) на вхождение одной литеры .... на вхождение нескольких литер . . .

фраза TALLYING (СЧИТАЯ) ....

фраза BEFORE/AFTER (ДО/ПОСЛЕ) .

несколько фраз BEFORE/AFTER (ДО/ПОС­ЛЕ)

несколько фраз TALLYING (СЧИТАЯ) фраза REPLACING (ЗАМЕНЯЯ)

фраза BEFORE/AFTER (ДО/ПОСЛЕ) .

несколько фраз BEFORE/AFTER (ДО/ПОС­

ЛЕ)

несколько фраз REPLACING (ЗАМЕНЯЯ) фразы TALLYING (СЧИТАЯ) и REPLACING (ЗАМЕНЯЯ) •

фраза CONVERTING (ПРЕВРАЩАЯ)

Оператор MOVE (ПОМЕСТИТЬ) .... ТО идентификатор (В идентификатор)

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

дередактирование цифровых редактируемых дан­ных ■

фраза CORRESPONDING (СООТВЕТСТВЕН­

НО)

Оператор MULTIPLY (УМНОЖИТЬ)

BY идентификатор (НА идентификатор)

BY несколько идентификаторов (НА несколько идентификаторов) . . . . .

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

GIVING несколько идентификаторов (ПОЛУ­ЧАЯ несколько идентификаторов)

фраза ROUNDED (ОКРУГЛЯЯ) . .

фраза ON SIZE ERROR (ПРИ ПЕРЕПОЛНЕ- ’■

НИИ)

фраза NOT ON SIZE ERROR (БЕЗ ПЕРЕПОЛ­НЕНИЯ)

фраза END-MULTIPLY (КОНЕЦ-УМНОЖИТЬ)

Оператор PERFORM (ВЫПОЛНИТЬ) имя-процедуры необязательно .... фраза THROUGH имя-процедуры (ПО имя-про- цедуры)

вариант повелительный-оператор .

фраза END-PERFORM (КОНЕЦ-ВЫПОЛ-

НИТЬ) ... ....

фраза TIMES (РАЗ)

фраза UNTIL (ДО)

фраза TEST BEFORE/AFTER (С ПРОВЕР-
КОЙ В НАЧАЛЕ/В КОНЦЕ) ....

фраза VARYING (МЕНЯЯ) . . . .

фраза TEST BEFORE/AFTER (С ПРОВЕР­КОЙ В НАЧАЛЕ/В КОНЦЕ) . . . .

фраза AFTER (ЗАТЕМ)

допускаются по крайней мере 6 фраз AFTER (ЗАТЕМ)

Оператор SEARCH (ИСКАТЬ) .... фраза VARYING (МЕНЯЯ) . . . .

фраза AT END (В КОНЦЕ) . . . .

фраза WHEN (КОГДА)

несколько фраз WHEN (КОГДА) фраза END-SEARCH (КОНЕЦ-ИСКАТЬ)

Оператор SEARCH ALL (ИСКАТЬ ОСОБО) фраза AT END (В КОНЦЕ) . . . .

фраза WHEN (КОГДА)

фраза END-SEARCH (КОНЕЦ-ИСКАТЬ)

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

имя-индекса/идентификатор ТО (НА) имя-индекса UP BY/DOWN BY (имя-индекса ПРИБАВЛЯЯ/ВЫЧИТАЯ) . . . .

мнемоническое-имя ТО ON/OFF (мнемоническое- имя НА ВКЛЮЧЕНО/ВЫКЛЮЧЕНО) имя-условия ТО TRUE (имя-условия НА ИСТИ­НА)

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

RUN (РАБОТУ)

литерал

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

несколько DELIMITED BY (ОГРАНИЧИ­ВАЯСЬ)

фраза WITH POINTER (УКАЗАТЕЛЬ) фраза ON OVERFLOW (ПРИ ПЕРЕПОЛНЕ­НИИ)

фраза NOT ON OVERFLOW (БЕЗ ПЕРЕПОЛ­НЕНИЯ)

фраза END-STRING (КОНЕЦ-СОБРАТЬ)

Оператор SUBTRACT (ОТНЯТЬ) . . . .

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

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

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

GIVING несколько идентификаторов (ПОЛУ­ЧАЯ несколько идентификаторов) фраза ROUNDED (ОКРУГЛЯЯ) фраза ON SIZE ERROR (ПРИ ПЕРЕПОЛНЕ­НИИ) .... ...

фраза NOT ON SIZE ERROR (БЕЗ ПЕРЕПОЛ­НЕНИЯ)

фраза END-SUBTRACT (КОНЕЦ-ОТНЯТЬ)фраза CORRESPONDING (СООТВЕТСТВЕН­

НО)

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

фраза DELIMITED BY (ОГРАНИЧИВАЯСЬ) . фраза DELIMITER IN (ОГРАНИЧИТЕЛЬ В) . фраза COUNT IN (СЧЕТ В)

фраза WITH POINTER (УКАЗАТЕЛЬ) фраза TALLYING (СЧИТАЯ В)

фраза ON OVERFLOW (ПРИ ПЕРЕПОЛНЕ­

НИИ)

фраза NOT ON OVERFLOW (БЕЗ ПЕРЕПОЛ­НЕНИЯ)

фраза END-UNSTRING (КОНЕЦ-РАЗОБРАТЬ)

У

Элемент

ровень! Уровень 2

понятия ЯЗЫКА

Слова, определенные пользователем имя-файла

имя-записи

Зарезервированные слова

Специальный регистр LINAGE-COUNTER (СЧЕТЧИК-ВЕРСТКИ)

Состояние ввода-вывода

РАЗДЕЛ ОБОРУДОВАНИЯ Секция ввода-вывода

Параграф FILE-CONTROL (УПРАВЛЕНИЕ-ФАИ- ЛАМИ)

Статья управления файлом

фраза SELECT (ДЛЯ)

фраза OPTIONAL (НЕОБЯЗАТЕЛЬНОГО) . только входной, входной-выходной и дополняе­мый

фраза ACCESS MODE IS SEQUENTIAL (ДОС­

ТУП ПОСЛЕДОВАТЕЛЬНЫЙ)

фраза ASSIGN (НАЗНАЧИТЬ) . . . .

имя-реализации

литерал

фраза FILE STATUS (СОСТОЯНИЕ ФАЙЛА)’ фраза ORGANIZATION IS SEQUENTIAL (ОР­ГАНИЗАЦИЯ ПОСЛЕДОВАТЕЛЬНАЯ)

ф раза PADDING CHARACTER (ЛИТЕРА ЗА­ПОЛНИТЕЛЬ)

фраза RECORD DELIMITER (ОГРАНИЧИ­ТЕЛЬ ЗАПИСИ)

фраза RESERVE (РЕЗЕРВИРОВАТЬ)

Параграф I-O-CONTROL (УПРАВЛЕНИЕ-ВВО- ДОМ-ВЫВОДОМ)

фраза MULTIPLE FILE ТАРЕ (НА ОДНОЙ КА­ТУШКЕ)

фраза RERUN (ПЕРЕПРОГОН) фраза SAME AREA (ОБЩАЯ ОБЛАСТЬ) фраза SAME RECORD AREA (ОБЩАЯ ОБ­ЛАСТЬ ЗАПИСИ)

РАЗДЕЛ ДАННЫХ

Секция файлов

Статья описания файла .

индикатор уровня FD (ОФ)

фраза BLOCK CONTAINS (В БЛОКЕ)

целое-1 RECORDS/CHARACTERS (целое-1 ЗАПИСЕЙ/ЛИТЕР)

целое-1 ТО целое-2 RECORDS/CHARACTERS (целое-1 ДО целое-2 ЗАПИСЕЙ/ЛИТЕР)

фраза CODE-SET (АЛФАВИТ) . . . .

фраза DATA RECORDS (ЗАПИСИ ДАННЫХ) фраза LABEL RECORDS (МЕТКИ) . фраза LINAGE (ВЕРСТКА) . . . .

фраза FOOTING (КОНЦОВКА) фраза ТОР (ВЕРХНЕЕ ПОЛЕ) фраза BOTTOM (НИЖНЕЕ ПОЛЕ) фраза RECORD (В ЗАПИСИ) . . . .

целое-1 CHARACTERS (целое-1 ЛИТЕР) фраза VARYING IN SIZE (ПЕРЕМЕННОЕ

ЧИСЛО)

FROM целое-2 ТО целое-3 CHARACTERS (ОТ целое-2 ДО целое-3 ЛИТЕР)

фраза DEPENDING ON (В ЗАВИСИМОС­

ТИ ОТ)

целое-4 ТО целое-5 CHARACTERS (целое-4

ДО целое-5 ЛИТЕР)

фраза VALUE (ЗНАЧЕНИЕ) . . . .

имя-реализации литерал

имя-реализации несколько литералов . имя-реализации имя-данного . . . .

имя-реализации несколько имен-данных

Статья описания записи .

РАЗДЕЛ ПРОЦЕДУР

Декларативные процедуры

DECLARATIVES (ДЕКЛАРАТИВЫ)

END DECLARATIVES (КОНЕЦ ДЕКЛАРА- ТИВ)

•Оператор CLOSE (ЗАКРЫТЬ) . . . .имя-файла .

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

фраза REEL/UNIT (КАТУШКУ/ТОМ)

фраза FOR REMOVAL (С УДАЛЕНИЕМ) . фраза WITH NO REWIND/LOCK (БЕЗ ПЕРЕ- МОТКИ/С ЗАМКОМ)

Оператор OPEN (ОТКРЫТЬ) .

имя-файла ...

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

фраза INPUT (ВХОДНОЙ)

фраза WITH NO REWIND (БЕЗ ПЕРЕМОТ­КИ)

фраза REVERSED (РЕВЕРСНО)

фраза OUTPUT /ВЫХОДНОЙ) . . . .

фраза WITH NO REWIND (БЕЗ ПЕРЕМОТ­КИ)

фраза 1-0 (ВХОДНОИ-ВЫХОДНОИ) фраза EXTEND (ДОПОЛНЯЕМЫЙ) несколько INPUT (ВХОДНОЙ), OUTPUT (ВЫ­ХОДНОЙ) и 1-0 (ВХОДНОИ-ВЫХОДНОИ) несколько EXTEND (ДОПОЛНЯЕМЫЙ) .

Оператор READ (ЧИТАТЬ) . . . .

фраза NEXT (СЛЕДУЮЩУЮ) . . . .

фраза INTO (В)

фраза AT END (В КОНЦЕ)

фраза NOT AT END (НЕ В КОНЦЕ) фраза END-READ (КОНЕЦ-ЧИТАТЬ)

Оператор REWRITE (ОБНОВИТЬ) фраза FROM (ИЗ ПОЛЯ)

Оператор USE (ИСПОЛЬЗОВАТЬ) фраза EXCEPTION/ERROR PROCEDURE (ПРОЦЕДУРЫ ОШИБКИ) . . . .

ON имя-файла (ДЛЯ имя-файла) .

ON несколько-имен-файлов (ДЛЯ несколько имен-файлов . . . .

ON INPUT (ДЛЯ ВХОДНЫХ) ON OUTPUT (ДЛЯ ВЫХОДНЫХ) ON 1-0 (ДЛЯ ВХОДНЫХ-ВЫХОДНЫХ) ON EXTEND (ДЛЯ ДОПОЛНЯЕМЫХ)

Оператор WRITE (ПИСАТЬ) .... фраза FROM (ИЗ ПОЛЯ) .... фраза BEFORE/AFTER ADVANCING (ДО/ПОС- ЛЕ ПРОДВИЖЕНИЯ)

целое LINE/LINES (целое СТРОК) идентификатор LINE/LINES (идентификатор СТРОК)

мнемоническое-имя

PAGE (СТРАНИЦЫ)

фраза AT END-OF-PAGE (В КОНЦЕ СТРАНИ­

ЦЫ)

фраза NOT AT END-OF-PAGE (НЕ В КОНЦЕ СТРАНИЦЫ)

фраза END-WR1TE (КОНЕЦ-ПИСАТЬ

Элемент Уровень 1 Уровень 2

ПОНЯТИЯ ЯЗЫКА

Слова, определенные пользователем имя-файла X

имя-записи X

Состояние ввода-вывода ...... X

РАЗДЕЛ ОБОРУДОВАНИЯ

■Секция ввода-вывода

Параграф FILE-CONTROL (УПРАВЛЕНИЕ-ФАЙ-

ЛАМИ) X

Статья управления файлом ..... X

фраза SELECT (ДЛЯ) X

фраза OPTIONAL (НЕОБЯЗАТЕЛЬНОГО) . —

только входной, входной-выходной и допол­няемый файлы ...... —

фраза ACCESS MODE (ДОСТУП) X

SEQUENTIAL (ПОСЛЕДОВАТЕЛЬНЫЙ) X

RANDOM (ПРОИЗВОЛЬНЫЙ) ' X

DYNAMIC (ДИНАМИЧЕСКИЙ) X

RELATIVE KEY (ОТНОСИТЕЛЬНЫЙ

КЛЮЧ) . X

фраза ASSIGN (НАЗНАЧИТЬ) .... X

имя-реализации X

литерал X

фраза FILE STATUS (СОСТОЯНИЕ ФАЙЛА) X

фраза ORGANIZATION RELATIVE (ОРГАНИ­

ЗАЦИЯ ОТНОСИТЕЛЬНАЯ) X

фраза RESERVE (РЕЗЕРВИРОВАТЬ) —

Параграф I-O-CONTROL (УПРАВЛЕНИЕ-ВВО- ДОМ-ВЫВОДОМ) X

фраза RERUN (ПЕРЕПРОГОН) ... +

фраза SAME AREA (ОБЩАЯ ОБЛАСТЬ) X

фраза SAME RECORD AREA (ОБЩАЯ ОБ­

ЛАСТЬ ЗАПИСИ) . . . . . . —

РАЗДЕЛ ДАННЫХ

Секция файлов

Статья описания файла у

индикатор уровня FD (ОФ) ... у

фраза BLOCK CONTAINS (В БЛОКЕ) . у

целое-1 RECORD/CHARACTERS (целое-1 ЗА- ПИСЕЙ/ЛИТЕР) у

целое-1 ТО целое-2 RECORDS/CHARACTERS (целое-1 ДО целое-2 ЗАПИСЕЙ/ЛИТЕР) . —

фраза DATA RECORDS (ЗАПИСИ ДАННЫХ) . +

фраза LABEL RECORDS (МЕТКИ) . +

і .фраза RECORD (В ЗАПИСИ) .... X

целое-1 CHARACTERS (целое-1 ЛИТЕР) фраза VARYING IN SIZE (ПЕРЕМЕННОЕ ЧИСЛО)

FROM целое-2 ТО целое-3 CHARACTERS (ОТ целое-2 ДО целое-3 ЛИТЕР) фраза DEPENDING ON (В ЗАВИСИМОСТИ ОТ)

целое-4 ТО целое-5 CHARACTERS (целое-4 ДО целое-5 ЛИТЕР)

фраза VALUE (ЗНАЧЕНИЕ) . . . .

имя-реализации литерал .

имя-реализации несколько литералов имя-реализиции имя-данного . . . .

имя-реализации несколько имен-данных . Статья описания записи

РАЗДЕЛ ПРОЦЕДУР

Декларативные процедуры

DECLARATIVES (ДЕКЛАРАТИВЫ) END DECLARATIVES (КОНЕЦ ДЕКЛАРА- ТИВ) . . . . . .

Оператор CLOSE (ЗАКРЫТЬ) . . . .

пмя-файла

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

фраза WITH LOCK (С ЗАМКОМ)

Оператор DELETE (УДАЛИТЬ) . . . .

фраза INVALID KEY (ПРИ ОШИБКЕ КЛЮ­ЧА) . .

фраза NOT INVALID KEY (БЕЗ ОШИБКИ КЛЮЧА)

фраза END-DELETE (КОНЕЦ-УДАЛИТЬ)

Оператор OPEN (ОТКРЫТЬ) . . . .

имя-фа йла

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

фраза INPUT (ВХОДНОЙ) . . . .

фраза OUTPUT (ВЫХОДНОЙ) . . . .

фраза 1-0 (ВХОДНОЙ-ВЫХОДНОЙ) фраза EXTEND (ДОПОЛНЯЕМЫЙ) .

несколько INPUT (ВХОДНОЙ), OUTPUT (ВЫ­ХОДНОЙ) и 1-0 (ВХОДНОЙ-ВЫХОДНОЙ) . несколько EXTEND (ДОПОЛНЯЕМЫЙ)

Оператор READ (ЧИТАТЬ) фраза NEXT (СЛЕДУЮЩУЮ) . . . .

фраза INTO (В)

фраза AT END (В КОНЦЕ) . . . .

фраза NOT AT END (НЕ В КОНЦЕ) фраза INVALID KEY (ПРИ ОШИБКЕ КЛЮЧА) фраза NOT INVALID KEY (БЕЗ ОШИБКИ КЛЮЧА)