46628 (607884), страница 3
Текст из файла (страница 3)
Private Sub k1_AfterUpdate()
Forms! [F_main]! [Z_ludi].Requery
End Sub
Private Sub k2_AfterUpdate()
Forms! [F_main]! [f_uslug].Requery
End Sub
Private Sub Зарегистрировать_Click()
On Error GoTo Err_Зарегистрировать_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = «f_otdih»
DoCmd. OpenForm stDocName, stLinkCriteria
Exit_Зарегистрировать_Click:
Exit Sub
Err_Зарегистрировать_Click:
MsgBox Err. Description
Resume Exit_Зарегистрировать_Click
End Sub
8. Разработка приложения пользователя
Главная форма «f_main», в которой есть 3 вкладки:
-
Регистрация.
-
Услуги.
-
Счет.
Для занесения информации о прибывшем отдыхающем необходимо на вкладке ‘Регистрация’ при помощи поиска выбрать подходящий номер (по местонахождению, по виду, классу) в форме ‘f_nomer’, затем нажать на кнопку «Зарегистрировать», при нажатии которой откроется форма ‘Sdan_nomer’ и последовательно заполнить все поля. После занесения всех необходимых сведений, необходимо нажать кнопку ‘Вселить’ и данные об отдыхающем внесутся в таблицы.
Для занесения информации о пользовании услугами нужно перейти на вкладку «Услуги». В форме «f_uslug» следует выбрать в поиски необходимого человека и в подчиненной форме fpp_uslug из поля со списком нужную услугу и указать его дату, а в подчиненной форме f_pitanie_otdih таким же образом выбрать необходимое питание и указать на сколько человек (то есть количество) или показать его отсутствие.
При выезде клиента необходимо перейти на вкладку ‘Счет’. Выбрать в поиски необходимого человека и мы увидим на какую сумму были использованы услуги, питание и проживание и так же мы видим там общий итог. Клиенту необходимо выдать Счет, нажав на вкладке «Счет» кнопку «Счет», после этого требуется выселить человека, для этого на той же вкладке «Счет» мы нажимаем конку «об отдыхающем» и видим информацию о человеке на форме «F_inf» (в каком номере проживал с какого заехал и какого должен выехать и т.д.), убеждаемся что это тот человек, после это нажимаем кнопку «Выселить» на форме «F_inf».













