Процедура ELECT реализует диалог типа ’’меню”. Она выполняет следующие функции: выводит на экран терминала текстовую строку запроса и массив допустимых ответов (если в обращении задан файл справочной информации, то дополнительно на дисплей выводится ответ HELP), принимает с дисплея ответ пользователя (при ответе HELP выводит на экран файл справочной информации и повторяет запрос), определяет, какому из допустимых ответов соответствует ответ пользователя, и передает этот номер в виде целой константы в программу пользователя. Если в массиве ответов первый элемент непуст, то он является ответом, принимаемым по умолчанию. Выход из программы невозможен до тех пор, пока пользователь не введет один из допустимых ответов. После ответа, не прошедшего синтаксический контроль, выводится сообщение об ошибке и запрос повторяется. Процедуру рекомендуется использовать как узловую точку программы, к которой программа возвращается после прохождения каждого из режимов. После процедуры обычно ставится оператор вычисляемого условного перехода.
Скачать страницу
[Выходные данные]