Display Reservation.form
Display reservation.form
If Guest = new
Click_NewGuest
Else
Get GuestID in corresponding text_box
Click_SearchGuest
If guest_found
display confirmationID (auto-generated?)
display guest_ID
display guest_LastName
display guest_FirstName
else
get guest_LastName
get guest_FirstName
Click_SearchGuest
If guest_found
continue
else
Add_new
endif
endif
endif
Get No_of_occupants
Get Single_Room_numbers
Get Double_Room_numbers
Get Delux_Room_numbers
Click_SearchRoom
If rooms = available
Display Room#
else
Make Arrangement
endif
If everything = OK
Get Arrival_Date
Get CheckOut_Date
Get Book_By(employID)
endif
If Click_ADD
Update data store "In_Room"
Endif
If Click_Cancel
Stop_Process
Endif
Get confirmation number
search in data store "In Room"
If not found
report this problem
else
display Guest ID
display Last Name
display First Name
display No. of Occupants
display Arrival Date
display Check Out Date
display Single Room needed
display Double Room needed
display Delux Room needed
If Click_Delete
confirm Delete process
update datastore "In Room"
endif
endif
Get Confirmation ID
Search in data store "In Room"
If not found
report this problem
else
display Guest ID
display Last Name
display First Name
display No. of Occupants
display Arrival Date
display Check Out Date
display Single Room needed
display Double Room needed
display Delux Room needed
change No. of Occupants if needed
change Arrival Date if needed
change check out date if needed
change rooms need
search in Room
If Rooms = OK
report "Update OK"
else
report this problem
endif
If Click_Modify
confirm Modify
update data store "In_Room"
endif
endif
DisplayMenu()
switch(GetMenuChoice())
{
case ChoiceSearchRooms:
SearchRooms()
default:
Return To Caller
}
DisplayMenu()
switch(GetMenuChoice())
{
case ChoiceFindAvailability:
FindAvailabilityOfRooms()
case ChoiceFindGuestInRoom:
FindGuestInRoom()
default:
Return To Caller
}
RoomNumber = GetRoomNumber() Date = GetDate() GuestID = FindGuestID(RoomNumber, Date) DisplayGuestID(GuestID)
RoomType = GetRoomType() Rooms = FindFreeRooms(RoomType) DisplayList(Rooms)
Get confirmation ID
if reservation exists
display Guest ID
display Last Name
display First Name
display No. of Occupants
display Arrival Date
display Check Out Date
display Single Room needed
display Double Room needed
display Delux Room needed
update guest info
If click_OK
confirm check-in
update room info in datastore "In Room"
endif
endif
get GuestID get Last name get First Name Search for guest rooms If guest_found Display charges get payment method generate invoice print invoice update room status endif
get invoice display invoice.invoice number display invoice.date display invoice.time display invoice.payment method display invoice.total bill display invoice.food order display invoice.movie order display invoice.telephone bill display invoice.misc. charges display invoice.hotel tax display invoice.GST
if input(s) from staff are syntactically incorrect then
Report this problem
else
input_ok = true
Attempt to read a Guest Record with given Guest Name from data store
"Guest"
if this attempt fails
Add the New Guest data into the data store "Guest"
Update the data store "Guest"
Get the New Guest I.D. from the data store "Guest"
else
Report that New Guest already exists in data store "Guest"
Return Guest I.D.
end if
end if
if input(s) from staff are syntactically incorrect then
Report this problem
else
input_ok = true
If staff input is room number then
Attempt to read an invoice with given room number from data store
"Guest"
end if
If staff input is Guest ID then
Attempt to read an invoice with given Guest I.D. from data store
"Guest"
end if
If staff input is Guest Name then
Attempt to read an invoice with given Guest Name from data store
"Guest"
end if
if this attempt fails
Report there is no Guest with given Guest Data
else
if input_ok then
if staff input included Guest's Name then
Replace the Guest's Name with the one given in
input
end if
if staff input included address then
Replace the Guest's address with the one given in
input
end if
if staff input included city then
Replace the Guest's city with the one given in
input
end if
if staff input included province/state then
Replace the guest's province/state with the one given in input
end if
if staff input included postal code/zip code then
Replace the guest's postal code/zip code with the
one given in input
end if
if staff input included country then
Replace the guest's country with the one given in input
end if
if staff input included credit card type then
Replace the guest's credit card type with the one given in input
end if
if staff input included credit card number then
Replace the guest's credit card number with the
one given in input
end if
if staff input included credit card name then
Replace the guest's credit card name with the one given in input
end if
if staff input included type photo I.D. then
Replace the guest's type photo I.D. with the one given in input
end if
if staff input included discount name then
Replace the guest's discount name with the one given in input
end if
if staff input included discount percentage then
Replace the guest's discount percentage with the
one given in input
end if
end if
end if
Report successful
end if
end if
if input(s) from staff are syntactically incorrect then
Report this problem
else
input_ok = true
If staff input is room number then
Attempt to read an invoice with given room number from data store
"Guest"
end if
If staff input is Guest ID then
Attempt to read an invoice with given Guest I.D. from data store
"Guest"
end if
If staff input is Guest Name then
Attempt to read an invoice with given Guest Name from data store
"Guest"
end if
if this attempt fails
Report there is no Guest with given Guest's Data
else
Report the resulting "Guest" to the staff
Report successful
end if
end if
