Страница 105: ГОСТ 22558-89. Язык программирования КОБОЛ (74592)

1.6. Дополнительный список отличий

СЕГМЕНТАЦИЯ

ОБРАБОТКА ИСХОДНЫХ ТЕКСТОВ

2. СУЩЕСТВЕННЫЕ ИЗМЕНЕНИЯ

Приведенный ниже список изменений расширяет средства ГОСТ 22558. Эти изменения являются новыми средствами, не влияющими на имеющиеся про­граммы, например, новые глаголы или дополнительные возможности для старо­го глагола.

1. Строчные буквы (1 Я ДР). Если набор литер ЭВМ включает строчные буквы, их можно использовать в строке-литер. Каждая такая литера эквивалент­на прописной литере, за исключением случая, когда строчные буквы используют­ся в нечисловом литерале.

2. Двоеточие (:) (2 ЯДР). Набор литер Кобола расширен включением двоеточия, которое используется при модификации ссылок.

>

753

3. Литеры пунктуации (1 ЯДР). Разделители запятая, точка с запятой и пробел взаимозаменяемы в исходной программе.

4. Слова, определенные пользователем, и системные имена (1 ЯДР). Одно и то же слово Кобола в исходной программе можно использовать и как систем­ное имя и как слово, определенное пользователем; чем является данное слово — определяется по контексту.

5. Символические литеры (2 ЯДР). Символическая литера является опре­деленным пользователем словом, определяющим стандартную константу.

6. Нечисловой литерал (1 ЯДР). Верхняя граница длины нечислового ли­терала 160 литер.

В предыдущем стандарте Кобола верхняя граница была 120 литер.

7. Стандартная константа ZERO (НУЛЬ) (2 ЯДР). Стандартная кон­станта ZERO (НУЛЬ) допустима в арифметических выражениях.

8. Единственность ссылки (1 ЯДР). Определенное пользователем слово не обязательно должно быть уникальным или иметь возможность быть уточнен­ным, если на него не ссылаются.

9. Уточнения (2 ЯДР). Реализация должна обеспечивать возможность обработки 50 уровней уточнения. В предыдущем стандарте Кобола разрешалось 5 уровней уточнения.

10. Индексирование (2 ЯДР). Верхняя граница размерности таблицы — семь.

(И) Относительное индексирование (1 ЯДР). Относительное индексирова­ние допускает, чтобы за индексом следовал знак + или —, за которым следует целое.

12. Использование индексов и, индексных данных (1 ЯДР). И индексы, и индексные данные могут быть записаны одновременно в одном наборе индексов, используемом для ссылки на отдельное вхождение в многомерной таблице.

13. Модификация ссылки (2 ЯДР). Модификация ссылки является новым методом ссылки на данное посредством указания самой левой литеры и длины данного.

14. Порядковый номер (1 ЯДР). Порядковый номер может содержать лю­бую литеру из набора литер машины. В ГОСТ 22558 порядковый номер мог со­держать только цифры.

15. Формат представления раздела данных (1 ЯДР). Слово, следующее за указателем уровня, номером уровня 01 или номером уровня 77 на одной и той же строке, может начинаться в поле А.

16. Заголовок конца программы (2 ЯДР). Заголовок конца программы указывает конец названной исходной Кобол-программы; за заголовком конца программы может следовать Кобол-црограмма, которая должна компилировать­ся отдельно при одном и том же вызове компилятора.

17. Вложенные исходные программы (2 МПС). Программы могут содер­жаться в других программах.

18. Фраза INITIAL (НАЧАЛЬНАЯ) в параграфе. PROGRAM-ID (ПРО­ГРАММА) (2 МПС). Фраза INITIAL (НАЧАЛЬНАЯ) определяет программу, состояние которой инициировано при каждом вызове программы в то же сос­тояние, как если бы программа вызывалась впервые в единице исполнения.

19. Фраза COMMON (ОБЩАЯ) в параграфе PROGRAM-ID (ПРОГРАМ­МА) (2 МПС), Фраза COMMON (ОБЩАЯ) определяет программу, которая, хо­тя и содержится непосредственно в другой программе, может быть вызвана из любой программы, прямо или косвенно содержащейся в этой другой программе.

Раздел оборудования (1 ЯДР). Раздел оборудования необязателен. В разделе оборудования секция конфигурации необязательна. Параграф SOURCE- 754COMPUTER (ИСХОДНАЯ-МАШИНА), параграф OBJECT-COMPUTER (РА­БОЧАЯ-МАШИНА), статьи в параграфе FILE-CONTROL (УПРАВЛЕНИЕ- ФАЙЛАМИ) и статьи в параграфе I—O-CONTROL (УПРАВЛЕНИЕ-ВВОДОМ- ВЫВОДОМ) также необязательны.

12. Параграф SPECIAL-NAMES (СПЕЦИАЛЬНЫЕ ИМЕНА) (1 ЯДР). Если имя-реализации есть переключатель, нет необходимости указывать имя-ус- ловия.

13. Параграф SPECIAL-NAMES (СПЕЦИАЛЬНЫЕ-ИМЕНА) (1 ЯДР). Зарезервированное слово 1S (ЕСТЬ) сделано необязательным в параграфе SPECIAL-NAMES (СПЕЦИАЛЬНЫЕ-ИМЕНА) в соответствии с использова­нием слова IS (ЕСТЬ) в спецификациях Кобола.

14. Вариант STANDARD-2 (СТАНДАРТ-М) (1 ЯДР). Вариант STAN­DARD-2 (СТАНДАРТ-М) фразы ALPHABET (АЛФАВИТ) параграфа SPECI­AL-NAMES (СПЕЦИАЛЬНЫЕ-ИМЕНА) допускает спецификацию набора 7- битовых литер ISO для алфавита или основной последовательности.

15. Фраза-ASSIGN (НАЗНАЧИТЬ) (1 ПОД, 1 ОТД, 1 ИПД, 1 СРТ, 1 ГОТ). Во фразе ASSIGN (НАЗНАЧИТЬ) может быть указан нечисловой ли­терал.

16. Фраза OPTIONAL (НЕОБЯЗАТЕЛЬНОГО) (2 ПОД, 2 ОТД, 2 ИПД). Фраза OPTIONAL (НЕОБЯЗАТЕЛЬНОГО) в статье управления файлом от­носится к последовательным файлам, относительным файлам и индексным фай­лам, открытым в режиме ввода, ввода-вывода или дополнения. В предыдущем стандарте Кобола фраза OPTIONAL (НЕОБЯЗАТЕЛЬНОГО) в статье управ­ления файлом применялась к последовательным файлам, открытым в режиме ввода.

17. Фраза ORGANIZATION (ОРГАНИЗАЦИЯ) (1 ПОД, 1 ОТД, 1 ИПД). Во фразе ORGANIZATION (ОРГАНИЗАЦИЯ) статьи управления файлом сло­ва ORGANIZATION IS (ОРГАНИЗАЦИЯ) необязательны.

18. Фраза PADDING CHARACTER (ЛИТЕРА ЗАПОЛНИТЕЛЬ) (2 ПОД, 1 ГОТ). Фраза PADDING CHARACTER (ЛИТЕРА ЗАПОЛНИТЕЛЬ) в статье управления файлом определяет литеру, которая должна быть использована для заполнения блока в последовательных файлах.

19. Фраза RECORD DELIMITER (ОГРАНИЧИТЕЛЬ ЗАПИСИ) (2 ПОД, 1 ГОТ). Фраза RECORD DELIMITER (ОГРАНИЧИТЕЛЬ ЗАПИСИ) в статье управления файлом указывает способ определения длины записи переменной длины во внешней среде.

20. Параграф І-O-CONTROL (УПРАВЛЕНИЕ-ВВОДОМ-ВЫВОДОМ) (1 ПОД, 1 ОТД, 1 ИПД, 1, ГОТ). В параграфе І-O-CONTROL (УПРАВЛЕНИЕ- ВВОДОМ-ВЫВОДОМ) порядок фраз несущественен.

21. Раздел данных (I ЯДР). Раздел данных необязателен.

22. Фраза BLOCK CONTAINS (В БЛОКЕ) (1 ПОД, 1 ОТД, 1 ИПД). Отсутствие фразы BLOCK CONTAINS (В БЛОКЕ) разрешается, если число записей, содержащихся в блоке, указывается операционным окружением. В пре­дыдущем стандарте Кобола отсутствие фразы BLOCK CONTAINS (В БЛОКЕ) обозначало стандартный размер физической записи, определяемый реализацией.

23. Фраза CODE-SET (АЛФАВИТ) (1 ПОД, 1 ГОТ). Фраза CODESET (АЛФАВИТ) может быть указана для всех файлов с последовательной органи­зацией. В предыдущем стандарте Кобола была ограничена для файлов не мас­совой памяти.

24. Фраза LABEL RECORDS (МЕТКИ) (1 ПОД, 1 ОТД, 1 ИПД, 1 ГОТ), Фраза LABEL RECORDS (МЕТКИ) необязательна; если она не указана, под­разумевается фраза LABEL RECORDS ARE STANDARD (МЕТКИ СТАНДАРТ­НЫ).Фраза LINAGE (ВЕРСТКА) (2 ПОД). Имена-данных во фразе LINA­GE (ВЕРСТКА) могут быть уточнены.

25. Фраза EXTERNAL (ВНЕШНЕЕ) (2 .МПС). Фраза EXTERNAL (ВНЕШНЕЕ) указывает, что данное или определитель файла внешние и могут быть доступны и обработаны в любой программе единицы исполнения.

26. Фраза GLOBAL (ГЛОБАЛЬНОЕ) (2 МПС). Фраза GLOBAL (ГЛО­БАЛЬНОЕ) указывает, что имя-данного или имя-файла является глобальным именем и доступно любой программе, содержащейся в программе, объявляющей это имя.

27. Фраза FILLER (ЗАПОЛНИТЕЛЬ) (1 ЯДР). Использование слова FILLER (ЗАПОЛНИТЕЛЬ) необязательно для статей описания данных. Слово FILLER (ЗАПОЛНИТЕЛЬ) может появиться в статье описания данного, со­держащей фразу REDEFINES (ПЕРЕОПРЕДЕЛЯЕТ). Слово FILLER (ЗА­ПОЛНИТЕЛЬ) может быть использовано в статье описания данного или груп­пы данных.

28. Фраза OCCURS (ПОВТОРЯЕТСЯ) (2 ЯДР). Данное, указанное в фразе DEPENDING ON (В ЗАВИСИМОСТИ ОТ), может иметь нулевое зна­чение. Таким образом, минимальное число вхождений может равняться нулю.

29. Строка-литер шаблона (2 ЯДР, 1 ГОТ). Строка литер шаблона может быть продолжена на следующих строках кодирования.

30. Фраза PICTURE (ШАБЛОН) (1 ЯДР). Литера вставки «.» (точка) или «,» (запятая) может быть использована как последняя литера строки-литер шаблона, если за ней непосредственно следует разделитель точка, заканчиваю­щая статью описания данного.

31. Фраза RECORD (В ЗАПИСИ) (2 ПОД, 2 ОТД, 2 ИПД, 1 СРТ). Ва­риант VARYING (ПЕРЕМЕННОЕ ЧИСЛО) в фразе RECORD (В ЗАПИСИ) используется для указания записей переменной! длины. Слова DEPENDING ON (В ЗАВИСИМОСТИ ОТ), связанные с вариантом VARYING (ПЕРЕМЕННОЕ ЧИСЛО), определяют данное, содержащее число позиций литер в записи.

32. Фраза REDEFINES (ПЕРЕОПРЕДЕЛЯЕТ) (1 ЯДР). Размер данно­го, связанного с фразой REDEFINES (ПЕРЕОПРЕДЕЛЯЕТ), может быть мень­ше или равен размеру переопределяемого данного. В ГОСТ 22558 оба данных должны были иметь одинаковое число позиций литер.

33. Фраза SIGN (ЗНАК) (1 ЯДР). В иерархии статьи описания данных может быть указано несколько фраз SIGN (ЗНАК); спецификация на подчинен­ном уровне имеет приоритет над спецификацией уровня содержащей группы.

34. Фраза SIGN (ЗНАК) (1 ГОТ). Фраза SIGN (ЗНАК) разрешена в статье описания группы отчета.

35. Фраза USAGE (фраза об использовании) (1 ЯДР). Во фразе об ис­пользовании введены два новых варианта BINARY (ДВОИЧНОЕ) и PACKED- DECIMAL (ДЕСЯТИЧНОЕ).

36. Фраза VALUE (ЗНАЧЕНИЕ) (1 ЯДР). Фраза VALUE (ЗНАЧЕНИЕ) может быть указана в статье описания данного, содержащей фразу OCCURS (ПОВТОРЯЕТСЯ). Фраза VALUE (ЗНАЧЕНИЕ) может быть указана в статье описания данного, подчиненной статье, содержащей фразу OCCURS (ПОВТО­РЯЕТСЯ). В ГОСТ 22558 фраза VALUE (ЗНАЧЕНИЕ) не разрешалась в статье описания данного, содержащей фразу OCCURS, или в статье описания данного, подчиненной статье, содержащей фразу OCCURS (ПОВТОРЯЕТСЯ).

37. Статья описания коммуникации (1 КОМ). Порядок фраз в статье опи­сания коммуникации несущественен.

38. Вариант FOR 1-0 (ДЛЯ ВВОДА-ВЫВОДА) в статье описания ком­муникации (1 КОМ). Вариант FOR 1-0 (ДЛЯ ВВОДА-ВЫВОДА) в статье опи­сания коммуникации обеспечивает функции ввода и вывода одной статьей ОК- 756Фраза LINE NUMBER (НОМЕР СТРОКИ) (1 ГОТ). В качестве от­носительного номера строки в варианте PLUS (ПЛЮС) фразы LINE NUMBER (НОМЕР СТРОКИ) может быть указано целое 0.

39. Раздел процедур (1 Я ДР). Раздел процедур не обязателен.

40. Заголовок раздела процедур (1 МПС). На данное секции связи, кото­рое переопределяет или подчинено переопределяющему данному, и на данное, появляющееся в заголовке раздела процедур, можно ссылаться в разделе про­цедур.

41. Ограничители области действия (1 ЯДР, 1 ПОД, 1 ОТД, 1 ИПД, 2 МПС, 1 СРТ, 1 КОМ). Ограничители области действия служат для указания границы действия определенных процедурных операторов. Ограничители области дейст­вия следующие: END-ADD (КОНЕЦ-СЛ ОЖИТЬ), END-CALL (КОНЕЦ-ВЫЗ- ВАТЬ), END-COMPUTE (КОНЕЦ-ВЫЧИСЛИТЬ), END-DELETE (КОНЕЦ- УДАЛИТЬ), END-D1V1DE (КОНЕЦ-РАЗДЕЛИТЬ), END-EVALLJATE (KO- НЕЦ-ОЦЕНИТЬ), END-IF (КОНЕЦ-ЕСЛИ), END-MULTLPLY (КОНЕЦ-УМ- НОЖИТЬ), END-PERFORM (КОНЕЦ-ВЫПОЛНИТЬ), END-READ (КОНЕЦ- ЧИТАТЬ), END-RECEIVE (КОНЕЦ-ПОЛУЧИТЬ), END-RETURN (КОНЕЦ- ВЕРНУТЬ), END-REWRITE (КОНЕЦ-ОБНОВИТЬ), END-SEARCH (КОНЕЦ- ИСКАТЬ), END-START (КОНЕЦ-ПОДВЕСТИ), END-STRING (КОНЕЦ-СОБ- РАТЬ), END-SUBTRACT (КОНЕЦ-ОТНЯТЬ), END-UNSTRING (КОНЕЦ-РА- ЗОБРАТЬ), END-WRITE (КОНЕЦ-ПИСАТЬ).

42. Знаки операций отношения (1 ЯДР). Знак операции отношения IS GREATER THAN OR EQUAL TO (> = ) эквивалентен знаку операции отноше­ния IS NOT LESS THAN (HE МЕНЬШЕ). Знак операции отношения IS LESS THAN OR EQUAL TO (МЕНЬШЕ ИЛИ РАВНО) эквивалентен знаку операции отношения IS NOT GREATER THAN (HE БОЛЬШЕ).

43. Условие класса (1 ЯДР). Имя-класса связано с набором литер, опре­деленным пользователем во фразе CLASS (КЛАСС) в параграфе SPECIAL­NAMES (СПЕЦИАЛЬНЫЕ-ИМЕИА).

44. Вариант DAY-OF-WEEK (ДЕНЬ-НЕДЕЛИ) оператора ACCEPT (ПРИНЯТЬ) (2 ЯДР), Вариант DAY-OF-WEEK (ДЕНЬ-НЕДЕЛИ) оператора ACCEPT (ПРИПЯТЬ) обеспечивает доступ к целому, представляющему день недели; например, 1 представляет понедельник, 2 — вторник, и 7 — воскресенье.

45. Оператор ADD (СЛОЖИТЬ) (1 ЯДР). Слово ТО (С) является не­обязательным словом в формате: