Додаток 1 Керівництво користувача
Для роботи програми папку з базою потрібно скопіювати на диск D:\.
Завантажити файл proj1.pjx.
Завантажити меню проекту:
Рис.36
Завантажити головну форму з меню.
Вікриється головна форма проекту, з якою можна відкрити перегляд всіх путівок або оформити нове замовлення.
Якщо потрібно додати клієнта, то це можна виконати в таблиці або в формі перегляду путівок.
Для видалення путівок існує окрема форма vid_put.
І т.д. Описується повноцінне керівництво користувача
Додаток 2 Лістинг програми
Проект має такі кнопки і відповідні їх коди:
Перший запис:
GO TOP
thisform.Refresh
Наступний запис:
IF RECNO()!=RECCOUNT()
SKIP 1
ELSE
MESSAGEBOX(" Останній запис")
endif
thisform.refresh
Попередній запис:
IF RECNO()!=1 THEN
skip-1
ELSE
MESSAGEBOX('Ви знаходитесь на першому записі')
ENDIF
thisform.refresh
Останній запис:
GO BOTTOM
thisform.Refresh
Додати клієнта:
GO BOTTOM
n=klient.kod_klienta
p=n+1
APPEND BLANK
REPLACE klient.kod_klienta WITH p
thisform.Refresh
Додати путівку:
DO FORM d:\turism\form1.scx
thisform.Release
Видалити клієнта:
DELETE
nAnswer =MESSAGEBOX("Ви дійсно хочете вилучити запис?",36,"Запит на вилучення")
DO CASE
CASE nAnswer = 6
pack
CASE nAnswer = 7
RECALL
І т.д. Тобто тут описуються АБСОЛЮТНО всі коди, які було хоч десь створено/прописано в проекті.