Дипломная работа: Разработка информационной системы "Библиотека"

Блок D2 – проверка условия М = 2;

Блок Е2 – проверка условия М = 3;

Блок F2 – проверка условия М = 4;

Блок G2 – проверка условия М = 5;

Блок В3 – выход из процедуры MENUGLAV;

Блок С3 – вызов процедуры MAIN (поиск читателя);

Блок D3 – вызов процедуры APPENDREADER (добавление читателя;

Блок Е3 – вызов процедуры APPENBOOK (добавление книги);

Блок F3 – вызов процедуры DOLG (просмотр должников);

Блок G3 – вызов процедуры EXIT (выход из программы).

Лист 2

Блок А1 – начало процедуры MAIN, реализующей поиск читателя по номеру читательского билета;

Блок В1 – присвоение переменной D начального значения 0;

Блок С1 – проверка условия D = 0;

Блок D1 – активация окна поиска читателя (NOMER);

Блок Е1 – вывод сообщения ‘Введите номер’

Блок F1 – ввод A;

Блок G1 – ввод I в форме (кнопкой ответа)

Блок А2 – проверка условия I=1.AND. EMPTY (A);

Блок В2 – проверка условия I=1.AND.!EMPTY(A).AND. SEEK(A);

Блок С2 – проверка условия I=2.OR. LASTKEY()=27;

Блок D2 – деактивация окна поиска читателя (NOMER);

Блок Е2 – присвоение значений переменным;

Блок F2 – вывод клавишного меню;

Блок G2 – вызов процедуры BROWSE1;

Блок А3 – задержка с выдачей сообщения «Номер не был введен»;

Блок В3 – задержка с выдачей сообщения «Поиск по номеру неудачный;

Блок С3 – Деактивация окна поиска читателя. Присвоение переменной D значения 1;

Блок D3 – выход из процедуры MAIN;