Реклама:

Все программы РШ1, Р\УЗ, PW4 и т.д. одинаковы, за исключением идентификации работника, чьи записи подвергаются обработке.

РБ - это простая программа составления отчета. Вся нужная информация, за исключением окончательных итогов, была накоплена в файле ШБ. Поэтому основная задача программы РБ состоит в форматировании и переписи информации из ШБ, а также в подведении и печати окончательных итогов. Итак, нужно инициализировать некоторые поля накопления для всех типов элементов заказов, а затем увеличивать соответствующие значения на те количественные данные, которые уже накоплены в файле программами РШп.

Переменные ИТОГ.ЗАКУС, ИТОГ. ГОРЯЧ, ИТОГ.ДЕС и ИТОГ. НАПИТ служат для суммирования окончательных итогов.

«Ы» используется как счетчик, указывающий, какой по номеру заказ обрабатывается в любой момент в рамках данных любого работника. Записи накапливались в файле таким образом, что соблюдается порядок, соответствующий логике обработки в программе РБ. Даже если счетчик конкретного элемента содержит нуль, он все равно будет представлен в надлежащем месте.

Структурированное изложение для программы РБ выглядит так:

РБ поел

Открыть файл МБ, Открыть файл отчета Установить ИТОГ.ЗАКУС значение О Установить ИТОГ.ГОРЯЧ значение О

Установить ИТОГ.ДЕС значение О Установить ИТОГ. НАПИТ значение О Читать МБ

Писать заголовок отчета ОБРАБОТКА ТЕЛА ОТЧЕТА повт пока не КФ-УБ ОБР. ДЛЯ РАБОТНИКА поел

Писать заголовок для работника

Установить N = 1

ОБР. ТЕЛА ДЛЯ РАБОТНИКА повт пока не новый заголовок для работника или КФ-УБ

ОБР.ЗАКАЗА поел

Писать заголовок заказа (Ю Читать УБ

Прибавить ЗАКУСКИ (И) к ИТОГ.ЗАКУС Читать УБ

Прибавить ГОРЯЧЕЕ (Ю к ИТОГ.ГОРЯЧ Писать «ГОРЯЧИЕ БЛЮДА:», ГОРЯЧЕЕ (Ю Читать УБ

Прибавить ДЕСЕРТЫ (И) к ИТОГ.ДЕС Писать «ДЕСЕРТЫ: », ДЕСЕРТЫ (1*1) Читать УБ

Прибавить НАПИТКИ (И) к ИТОГ. НАПИТ Писать «НАПИТКИ:», НАПИТКИ (Ю ОБР.ЗАКАЗА конец Установить N = N + 1 Читать УБ ОБР. ТЕЛА ДЛЯ РАБОТНИКА конец ОБР. ДЛЯ РАБОТНИКА конец ОБРАБОТКА ТЕЛА ОТЧЕТА конец ОБРАБОТКА ИТОГОВ поел

Писать заголовок итогов Писать ИТОГ.ЗАКУС, «:ЗАКУСКИ» Писать ИТОГ.ГОРЯЧ, «: ГОРЯЧИЕ БЛЮДА» Писать ИТОГ.ДЕС, «:ДЕСЕРТЫ» Писать ИТОГ.НАПИТ, «: НАПИТКИ» ОБРАБОТКА ИТОГОВ конец Закрыть файл УБ, Закрыть файл отчета СТОП РБ конец

Такие операторы, как «Писать «ЗАКУСКИ:», ЗАКУСКИ (М)», являются характерными операторами вывода и означают, что заключенные в кавычки символы будут напечата-

12*

ны без изменений, а содержимое переменных попадает при печати в то относительное место, которое переменные занимают в операторе «Писать». Так, приведенный выше оператор приведет к появлению в печатной строке следующего текста:

ЗАКУСКИ: 14

Здесь предполагается, что значением переменной ЗАКУСКИ в тот момент было число 14.

В сущности, поскольку все операторы «Писать» для элементов заказа от каждого конкретного работника умышленно помещены сразу после чтения соответствующих записей из файла ШБ, то эти операторы могли бы иметь вид


⇐ Предыдущая страница| |Следующая страница ⇒