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