Standard Jet DBЕnb` ТUщЉgr@?œ~Ÿџ…š1ХyКэ0МпЬcйфУŸFћŠМNзcь7 мœњ—Ц(цB.Š` {6ЄъпБ&lCž7Б3eљy[У-|*Џа|™˜§+KК7B4ƒf_•ја‰$…gЦ'DвюЯeэџЧFЁx эщ-bдT4.0їdЛv€п€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџо YS Y4S SS Y  YsY YY Y ўY Y  Y  Y  Y Yў Y2ўY Y  Y ўYConnectDatabaseDateCreateDateUpdate FlagsForeignNameIdLvLvExtraLvModule LvPropName OwnerParentIdRmtInfoLongRmtInfoShortTypeƒџџџџ\џџџџџџџџџџџџƒџџџџџџџџџџџџџџџџџџYџџџџYџџџџIdParentIdName        џџЉOYџџџџџџџџџџџџSRYYY Y2џџўACMFInheritableObjectIdSIDƒџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџˆYџџџџObjectIdџџы YЯxїЪчS!Y YYY Yўў YўўY YўўAttributeExpressionFlagLvExtra Name1 Name2ObjectId Orderƒџџџџnџџџџzџџџџfџџ edYџџџџ"ObjectIdAttributeџџЫ -YЯxїЪчSYYY Yў Y­ў Yў Yў Yўccolumn grbiticolumnszColumnszObject$szReferencedColumn$szReferencedObjectszRelationshipƒџџ7џџ;џџЬџџџџ7џџ;џџЬџџџџ7 Ь;7‚ƒџџ7џџ;џџЬџџџџ7џџ;џџЬџџџџ7 Ь;7‚ƒџџ7џџ;џџЬџџџџ7џџ;џџЬџџџџ7 Ь;7‚YџџџџYџџџџYџџџџszObject$szReferencedObjectszRelationshipџџYЛv1ьЇbи “ N Ф  : ѕ А k & с œ W  Э ˆ C ўЙt/ъЅ €€Р€0B€€ ф ф@@@ @€€  @@@€@€@€ €€€€@  @JkMYYmiJbkSdi`Si`LiQJ\SJkm^YkmSi`SYbOkmJvSi``QkkJUQUoQkmSi``QkkJUQidd`Si`idd`kSi`kQiqYMQ^YkmSi`kmJvSkoLLiQJ\SJkm^YkmSkoLidd`UiYO8SkoLidd`UiYO:SkoLkmJv^YkmSkoLkmJvidd`kSkoLkmJvkQiqYMQkYbYmMJ^QbOJi`dOMd``db `dO`QboQk!Jomd\Qvk"`JMLQQf#JO`Yb$OJmJJMMQkkfJUQkOJmJLJkQkSdi`k `dOo^Qk iQ^JmYdbkWYfkiQfdimk kMiYfmk kvkiQ^ mJL^Qk+kh+MSi`LiQJ\SJkm^Ykm+kh+MkoLLiQJ\SJkm^Ykm%+kh+MSi`SYbOkmJv+kh+MMiYmidd`OJmQ&+kh+MSi`kmJv+kh+MkoLkmJvidd`k'+kh+MSi`kmJv+kh+MkoLkmJvkQiqYMQk(+kh+MSkoLkmJvkQiqYMQk+kh+MMLdkQiqYMQYO)+kh+MmQkmLiQJ\SJkm+kh+MMLdOJmQ*+kh+MmQkmLiQJ\SJkm+kh+MkoLLiQJ\SJkm^Ykm++kh+SSi`kQiqYMQ^Ykm+kh+SSkoLLiQJ\SJkm^Ykm+kh+SSkoLkmJvidd`kUoQkmk`kvkJMMQkkdL[QMmk`kvkJMMQkku`^`kvkJMQk`kvkM`OLJik`kvkdL[QMmk`kvkhoQiYQk`kvkiQ^JmYdbkWYfkhivLiQJ\SJkm^YkmhivLiQJ\SJkmidd`khivMJ^QbOJi hivMJ^QbOJiJbv hividd`UiYO hividd`kfQikmJv hivkmJv hivkmJvidd`khivkmJvidd`kMmhivkmJvkQiqYMQkhkQ^UoQkmkmJvkhkQ^idd`khkQ^idd`kmJmQhkQ^kQiqYMQJhkQ^kQiqYMQLhkQ^kmJvkhumLidd`UiYOmL^LiQJ\SJkmmL^MJ^QbOJimL^UoQkmmL^idd`mL^idd`kmJmQmL^kQiqYMQiQMQYqQOmL^kQiqYMQmvfQmL^kmJvmL^kmJvidd`k mQkm!JMMQkk^Jvdom`kvkOLko``JivYbSdokQiOQSYbQO+ MOO8HB@HBBMJ88OBFDBH6666FBL8<+ €+‚€;‚€K‚€[‚"+ MOO8HB@JBBMJ88OBFDBH6666FBL8<+ €+‚€;‚€K‚€[‚#+ MOO8HB@LBBMJ88OBFDBH6666FBL8<+ €+‚€;‚€K‚€[‚$mL^idd`mL^idd`kmJmQ%mL^kQiqYMQmvfQmL^kQiqYMQiQMQYqQO&5  @€ @€ @€ @€ @€ @€ @€ @€ @€ @€           !"#$%&' (!)"*#+$%&'()* + , - . /0123456789!:";#<$=%>&€€€€€€Q€V€b€g€n€t€x€}€ƒ€‡€Œ  @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€‘‘‘‘‘‘‘‘‘ ‘ ‘ ‘ ‘‘‘‘‘‘‘‘‘‘‘‘‘$‘% ‘& ‘' ‘( ‘) ‘* ‘+ ‘, ‘- ‘. ‘/ ‘0 ‘1 ‘2 ‘3 ‘4‘5‘6‘7‘8‘9‘:‘;‘<‘=‘>‘?‘@‘A‘B‘C‘D‘E‘F‘G‘H‘I‘J‘K‘L‘M‘N‘O‘P–––––––––––––––––– –!–"–#–$–%–&–'–(–)–*–+ –, –- –. –/!–0!–1!–2"–3"–4"–5"–6#–7#–8#–9#–:$–;$–<$–=%–>%–?%–@%™&™&™&™'™'™'™(™(™ (™!)™")™#)™$*™%*™&*™'+™(+™)+™*,™+,™,,™--™.-™/-™0.™1.™2.™3/™4/™5/™60™70™80™91™:1™;1™<2™=2™>2™?3™@3™A3™B4™C4œ4œ5œ5œ5œ6œ6œ6œ7œ7œ 7œ 8œ 8œ 8œ 9œ)9œ*9œ+:–:– :– ;– ;– ;– <–<–<–=–=–=–>–>–>–€™€™€™€™€™€™€™€™€™€™€™€™€™€™€™€™ €™ €Q™ €Q™ €Q™ €Q™€V™€V™€V™€bœ€bœ€bœ€gœ€gœ€gœ€nœ€nœ€nœ€tœ€tœ€tœ€xœ€xœ€xœ€}œ€}œ€}œ€ƒœ €ƒœ!€ƒœ"€‡œ#€‡œ$€‡œ%€Œœ&€Œœ'€Œœ(‘‘‘‘ ‘‘ ‘‘‘‘!‘"‘#_,\^џџ    џ      џ!!!!!!џ""""""џ# #"###џ!$$$&$'$џ%%(%*%+%џ)&,&.&/&џ-'0'2'3'4'5'6'7'8'9':' ;'џ1(<(>(?(@(A(B(C(D(E(F(G(H(I(џ=)J)L)M)N)O) P) Q)џK*R*T*\*\*\*\*\* \*џS+\+\+\ +\ +\ +џ\,\ ,\,\,\,\,\,\,\,\,\,џ\ -\-\-\-\-\-\-\- \- \ -џ\.\!.\#.\$.\%.\&.\'.\(.\).џ\"/\*/\,/\-/\./\//\0/\1/\2/\3/\4/\5/\6/\7/\8/ \9/ \:/ \;/ \/ \?/џ\+0\@0\B0\C0\D0\E0\F0\G0\H0\I0\J0џ\A1\K1]1]1]1]1]1]1]1]1]1] 1] 1] 1 ] 1 ] 1џ\L2]2]2]2]2]2]2]2]2]2]2]2]2]2 ]2 ]2џ]3]3] 3]!3]"3]#3]$3]%3]&3]'3](3 ])3 ]*3 ]+3 ],3 ]-3џ]4].4]04]14џ]/\L% @+ MOO8HB@HBBMJ88OBFDBH6666FBL8<+ €+‚€;‚€K‚€[‚+ MOO8HB@JBBMJ88OBFDBH6666FBL8<+ €+‚€;‚€K‚€[‚+ MOO8HB@LBBMJ88OBFDBH6666FBL8<+ €+‚€;‚€K‚€[‚mL^idd`mL^idd`kmJmQmL^kQiqYMQmvfQmL^kQiqYMQiQMQYqQOК @€@mL^idd`kmJmQmL^idd`kmJmQmL^kQiqYMQiQMQYqQOmL^kQiqYMQiQMQYqQOmL^kmJvв € @mL^UoQkmmL^idd`mL^kQiqYMQmvfQmL^kmJvmL^kmJvŒ,Еd Д_Л Z § Д g  Э ‚ ~K Ш m  Й \  ВW ЉPї Gш‘@я SўњC9€|BБіђ@#€9№Ѓ. у@9№Ѓ. у@~sq_ctestBreakfast~sq_csubBreakfastListnnnnnnnnnnn ˜"€г_‡вUЧт@г_‡вUЧт@~sq_ctestBreakfast~sq_ccboDate ч4€MR2€KeepLocal Tžžž^^^^^^^\ џ@!€`_Щpzт@`_Щpzт@~sq_cfsubStayServices~sq_ccboServiceID ч4€MR2€KeepLocal TЎЎЎnnnnnnnl џ@˜€ЛM— у@ЛM— у@~sq_cfrmStay~sq_csubStayRooms ч4€MR2€KeepLocal Tœœœ\\\\\\\Z џ@€ыg:Š у@ыg:Š у@~sq_cfrmFindStay~sq_ccritRoomDate ч4€MR2€KeepLocal TЄЄЄdddddddb џ@(€€ € A“т=т@Ђў т=т@Admin чќ@—8,,,,,,,,,* џ€€€є:іЋё=т@= Y'QЧт@macBeep ч0000000000. џ€€€3ЎЏё=т@= Y'QЧт@AutoKeys ч22222222220 џ€€€a‘s ”@т@= Y'QЧт@modMenues ч44444444442 џ€€€эмЇё=т@= Y'QЧт@modCommon ч44444444442 џ€€€šRq†р=т@= Y'QЧт@InitCalendar ч::::::::::8 џ€€€“y–Ѓё=т@= Y'QЧт@fsubStayServices чBBBBBBBBBB@ џ€€€BУыЁё=т@= Y'QЧт@fsubStayRooms ч<<<<<<<<<<: џ€€€…–:žё=т@= Y'QЧт@fsubStayList ч::::::::::8 џ€€€щ<ЖAт@= Y'QЧт@fsubRoomGrid2 ч<<<<<<<<<<: џ€€€ћhшЈ">т@= Y'QЧт@fsubRoomGrid1 ч<<<<<<<<<<: џ€€€= Ywё=т@= Y'QЧт@fsubBreakfastList чDDDDDDDDDDB џ€€€8€єqА?т@= Y'QЧт@frmStay ч0000000000. џ€€€Šњ7rё=т@= Y'QЧт@frmServiceList ч>>>>>>>>>>< џ€€€„>ѕ. @т@= Y'QЧт@frmRooms ч22222222220 џ €€€+ЗW6@т@= Y'QЧт@frmMessageRoom ч>>>>>>>>>>< џ €€€,4s?т@= Y'QЧт@frmMessageGuest ч@@@@@@@@@@> џ €€€,4sс>т@= Y'QЧт@frmFindStay ч88888888886 џ €€€—§Kё=т@= Y'QЧт@frmBreakfastList чBBBBBBBBBB@ џ €€€№Рv„р=т@= Y'QЧт@AsciiTransform ч>>>>>>>>>>< џ€ €{Dšeр=т@{Dšeр=т@UserDefined ч88888888886 џ€ €{Dšeр=т@{Dšeр=т@SummaryInfo чˆ@•DDD88888886 џ@'€NЙ›eр=т@NЙ›eр=т@SysRel ч.........., џ€NЙ›eр=т@NЙ›eр=т@Scripts ч0000000000. џ€NЙ›eр=т@NЙ›eр=т@Reports ч0000000000. џ€NЙ›eр=т@NЙ›eр=т@Modules ч0000000000. џ€NЙ›eр=т@NЙ›eр=т@Forms ч,,,,,,,,,,* џ€ъ;С—^т@ъ;С—^т@DataAccessPages ч@@@@@@@@@@> џ> ‘eр=т@> ‘eр=т@€MSysRelationshipsхDDDDDDDDDDB џ> ‘eр=т@1€zЯПAт@€MSysQueriesх88888888886 џ> ‘eр=т@1€zЯПAт@€MSysACEsх22222222220 џ> ‘eр=т@> ‘eр=т@€MSysObjectsх88888888886 џ> ‘eр=т@ТЈеaљт@€MSysDb ч@Ё:::......., џ@> ‘eр=т@> ‘eр=т@€Relationshipsх<<<<<<<<<<: џ> ‘eр=т@> ‘eр=т@€Databasesх44444444442 џ> ‘eр=т@> ‘eр=т@€Tablesх.........., џUтФІpR4тФІxZе З ™ k M  Т Є † L  Щ ‰ k M / ћ Л € b D & № в Д – \ >  ЬЎr<тФ”f-ћС„8џсУЅ‡Q%яЏu7љЉYџсУNёЈi,№в*€№+а G*€џ№+а *€№+а G)€ №+а€џўtblRoomState.date0 g)€ №+а€џўtblRoomState.roomID2 g)€№+а€џўtblRoomState.date =#10-22-02#< ')€№+аFirstOfstate€џўFirst(tblRoomState.state)P)) o)€№+а€џўtblRoomState.roomID2 g)€№+аtblRoomState))) )€џ№+а )€№+а G(€№+аtblRoomqryBreakfastRoomsR@MA (€№+аtblRoomqselServiceBH@C7 (€№+аqselServiceAtblRoomH@C7) (€№+аBreakfastBŽ@1%% o(€№+аBreakfastAŽ@1%% o(€№+а€џўtblRoom.roomID- g(€ƒ№+аqryBreakfastRooms333 (€ƒ№+аqselServiceB))) (€ƒ№+аtblRoom (€ƒ№+аqselServiceA))) (€№+а G(€№+а G(€џƒ№+а (€№+а G'€ ƒ№+а€џўtblGuest.name, ''€№+аqselStaystblGuestH@?3# '€№+а€џўqselStays.arrival0 g'€№+а€џўtblGuest.phone- g'€№+аaddrd@% o'€№+а€џўtblGuest.name, g'€ƒ№+аtblGuest!!! '€ƒ№+аqselStays### '€№+а G'€№+а G'€џƒ№+а '€№+а G&€artblStayRooms))) &€ ar G&€џar &€ar G%€artblBreakfast))) %€ ar G%€џar %€ar G$€artblServiceType--- $€ ar G$€џar $€ar G#€artblBreakfast))) #€ ar G#€џar #€ar G"€ar€џўDate > #8-1-98#. '"€ar€џў[tblCalendar].[Date]3 g"€artblCalendar''' "€ar G"€џar "€ar G!€ar€џўtblServiceType.price3 g!€ar€џўtblServiceType.name2 g!€ar€џўtblServiceType.serviceID7 g!€.artblServiceType--- !€џ.ar !€ar G €.ar€џў([__stayID] = stayID)4 ' €.arqryStayServicesfrmStay==/  € ar G €ar__stayID!!! O €џ.ar  €ar G€.ar€џў([__stayID] = stayID)4 '€.artblStayRoomsfrmStay77) € ar G€ar__stayID!!! O€џ.ar €ar G€.artblCalendar''' € ar G€џ.ar €ar G€.artblBreakfast))) € ar G€џ.ar €ar G3)ќOQЎЊNIА [ WMо q ў ‘ K( Й F BJУ Z щхHv ž;7Gмƒ БJёэDŽxэˆ f“€€[•К€ у@[•К€ у@~sq_cf€[•К€ у@[•К€ у@~sq_cfrmBreakfastList~sq_csubBreakfastList ч4€MR2€KeepLocal TЖЖЖvvvvvvvt џ@€ €Vpyу=т@nинN‹2у@AccessLayout ч4€MR2€KeepLocal TšЂжљ@!†zz:::::::8 џ@>€вѕМПAт@вѕМПAт@tblServiceTypetblServiceReceived чbbbbbbbbbb` џ=€DЏНПAт@DЏНПAт@tblRoomtblRoomState чHHHHHHHHHHF џ<€Љ\lЛПAт@Љ\lЛПAт@{CDD1965B-66CA-11D6-8769-000086394B13} чnnnnnnnnnnl џ;€Љ\lЛПAт@Љ\lЛПAт@{CDD1965A-66CA-11D6-8769-000086394B13} чnnnnnnnnnnl џ:€љ%kЛПAт@љ%kЛПAт@{CDD19659-66CA-11D6-8769-000086394B13} чnnnnnnnnnnl џ9€tTƒ=Ю@т@ЊёвMв@т@test ч@ Œ@›B66*******( џ@ ˜‡uzhЛПAт@ѕ{ЯПAт@tblStay ч@ <<<0000000. џ@ƒRdСœ3Aт@ѕ{ЯПAт@tblServiceType чР@ JJJ>>>>>>>< џ@}ZdЛПAт@ѕ{ЯПAт@tblServiceReceived чu@ŸRRRFFFFFFFD џ@x™ЎaЛПAт@•ЄD˜UЧт@tblRoomState ч9@ŸFFF:::::::8 џ@tDNKtр=т@ѕ{ЯПAт@tblRoom ч@@ž<<<0000000. џ@nЋ>WЛПAт@1€zЯПAт@tblGuest чц@ž>>>22222220 џ@˜b‘їƒЯл@т@1€zЯПAт@tblBreakfast чР@FFF:::::::8 џ@8€ЁљыЗт=т@DэИf4@т@qxtbRoomGrid чq@@@›RFF:::::::8 џ@7€$qŠв@т@€…р0‹2у@qselStays чщ@Œ@›L@@44444442 џ@6€wБjЕт=т@ZГœ. у@qselServiceB чх@ šє@›RFF:::::::8 џ@˜4€dЉІr5>т@I)M‹2у@qselRoomState чo@šЈ@›THH<<<<<<<: џ@3€'ЯЛ\4>т@ЕŒM‹2у@qselRooms ч…@šЈ@›L@@44444442 џ@2€uєЊС?т@€…р0‹2у@qselGuestStays чs ЃM&>>>>>< џ`˜0€я]?т@-™э–{Aт@qryStayRoomsCT чZ@š@@ —VJJ>>>>>>>< џ@/€—;јЏт=т@’€o~Aт@qryStayRooms чu@š@@ —RFF:::::::8 џ@.€5š!{А?т@ŸЊѓ6И?т@qryStay чр@š@@—H<<0000000. џ@˜,€ВFdЊт=т@ЕŒM‹2у@qryRoomGrid ч@•Ј@—PDD88888886 џ@+€l›1ю?т@?‰ЛRoAт@€qryCalendarAny ч @•Ј@—VJJ>>>>>>>< џ@*€ЦžкuAт@MT!qyAт@qryCalendar чX@•є@—PDD88888886 џ@)€:`kžAт@7œ. у@qryBreakfastRooms ч:@•є@—\PPDDDDDDDB џ@˜VџkSпё=т@1€zЯПAт@MSysCmdbars ч88888888886 џQ‹&єу@‹&єу@MSysAccessXML ч4€MR2€KeepLocal  T|||<<<<<<<: џ@ќдэЃ. у@Ќ яЃ. у@MSysAccessObjects чDDDDDDDDDDB џ˜&€Ѕ—pzт@Ѕ—pzт@~sq_ffsubStayRooms ч4€MR2€KeepLocal T†††FFFFFFFD џ@%€ёuЩUЧт@ёuЩUЧт@~sq_ffsubBreakfastList ч4€MR2€KeepLocal TŽŽŽNNNNNNNL џ@˜ДLVAL:œTЦ8№ Ј V t В ВЪn  h ЖLтš.РРЦРЦРЦРЦРЦ6ЌЌХЌХЌХЌХЌХ  Ф Ф Ф Ф Ф Ф Ф Ф Ф Ф\Аbаl$ЊЊСЊСЊСЊСЊС6t([qryRoomGrid].[roomID],'#') & ', ' & Choose([type],(Format([qryRoomGrid].[roomID],'#') &((tblCalendar.date) Between #10-24-2002# and #10-31-2002#)iif(qselStays.arrival is null, #1-1-2040#, qselStays.arrival)qselStays.guestID = tblGuest.guestID[address1] & ', ' & [address2] & ', ' & [address3](tblStay.state = 1 OR tblStay.state =2)tblGuest.guestID = tblStay.guestIDtblStay.stayID = qryRoomsPerStay.stayIDMin([qryRoomsPerStay].[roomID]) & IIf(Count([qryRoomsPerStay].[roomID])>1,' + ...','')Min(qryRoomsPerStay.firstRoomDate)(Format([qryRoomGrid].[roomID],'#') & ', ' & Choose([type],'Double, bath','Single, bath','Double, toilet','Single, toilet','De luxe'))tblServiceReceived.serviceID=4 AND tblServiceReceived.date=#10-23-02#tblServiceReceived.serviceID=3 AND tblServiceReceived.date=#10-23-02#tblServiceType.serviceID = tblServicereceived.serviceID(((tblRoomState.date)<[forms]![frmStay]![txtsimdate]))tblRoom.roomID = tblRoomState.roomIDIIf([personCount]=1 And [price2]>0,[price2],[price1])IIf([personCount]=1 And [price2]>0,[price2],[price1])IIf([personCount]=1 And [price2]>0,[price2],[price1])tblRoom.roomID = tblRoomState.roomIDIIf([personCount]=1 And [price2]>0,[price2],[price1])*Count(tblRoomState.date)IIf([personCount]=1 And [price2]>0,[price2],[price1])tblGuest.guestID = tblStay.guestIDselect cdate(0), "any" from tblcalendarSELECT tblCalendar.date, tblCalendar.date AS show FROM tblCalendar where date between (forms!frmFindStay!txtSimDate-4) and (forms!frmFindStay!txtSimDate+35) ORDER BY tblCalendar.date (((tblCalendar.date) Between ([forms]![frmFindStay]![txtSimDate]-4) And ([forms]![frmFindStay]![txtSimDate]+35)))tblRoom.roomID = qryBreakfastRooms.roomIDtblRoom.roomID = qselServiceB.roomIDqselServiceA.roomID = tblRoom.roomIDIIf([firstofstate]=2 Or [firstofstate]=3,[qselServiceB].[quantity],"X")IIf([firstofstate]=2 Or [firstofstate]=3,[qselServiceA].[quantity],"X")qselStays.guestID = tblGuest.guestID[address1] & ', ' & [address2] & ', ' & [address3] яYnN<nY˜YDataIDƒџџџџџџџџџџџџџџџџџџP‰YџџџџAOIndexџџЛv1№џџџџџџџр?џџџџK[€ФР‰аюя0SysAccessObjectsЮ›LLLLLLLLLLJ џЬY4@Z4@lZ4@аa”Рy”ŒЂе0жŒЂе0жАќZ4@JMMQkk^Jvdom+kh+MMiYmidd`OJmQ,)(ЈЫ1аa”џџ [4HWžx%7˜45ШЅеАеџџџџаЙеw$\4@„\4@д\4@$]4@аa”рf”DЃеPж DЃеPж с Д]4@Œ$ЈЫ1аa”џџX^4ёW%x%7˜45џџџџAccessVersion Build"Show Values Limit,Show Values in Indexed4Show Values in Non-Indexed*Show Values in RemoteAppTitleStartUpForm&StartUpShowDBWindow(StartUpShowStatusBarStartUpMenuBar$Allow3ž€э>*k№&шп4ј!k ИJ4 џџџџџџџџџџџџџџџџ џџџџџџџџ V Ж”VaXBts№m4xf4џАЖ”pЗ”@И”Й”рЙ”АК”€Л”@М”Н”рН”АО”С”аС”Т”`У”Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4Єl4ЄlžšK[аЯрЁБс>ўџ Nўџџџ:JGPYџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџxpш„”…фЧі@жVBAџџџџџџџџ`6~5CХЃNŽ…фЧVBAProjectџџџџ`6~5CХЃNŽ…фЧVBAџџџџџџџџ `6~5CХЃNŽ…фЧ§џџџџџџџџџџџ?§џџџ§џџџџџџџ§џџџ/rџџџџ§š ўџџџ !"#$%&'ўџџџ*=§џџџ§џџџџџџџ/01234567ўџџџ9(џџџџџџџџ?•џџџџ@AYџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџZž\]^_`abcdefghijklmnopqўџџџstuvwxyz{|}~€Root Entryџџџџџџџџxpш„”…фЧѕ@фVBAџџџџџџџџ`6~5CХpш„”…фЧVBAProjectџџџџ`6~5CХpш„”…фЧVBAџџџџџџџџ`6~5CХpш„”…фЧџџџџџџџџD§џџџџџџџџџџџџџџџџџџџIџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџEџџџџџџџџšџџџџўџџџ !"#$%&'ўџџџ*џџџџ=џџџџџџџџ;/01234567ўџџџ9(§џџџ>џџџџ•BџџџџџџџџџџџџCVKrH§џџџ §§џџџFL?§џџџRSTUV X™џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ__SRP_0!џџџџїЬ(__SRP_1џџџџџџџџџџџџЧForms d?`6~5CХpш„”…фЧ0џџџџџџџџ%`6~5CХ`6~5CХџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЬиЮуўџџџбвгде%џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ12џџџџџџџџN`6~5CХpш„”…фЧBlob џџџџџџџџџџџџLPropDataMPџџџџ,TypeInfožšK[џџџџџџџџџџџџ-?dirџџџџџџџџџџџџ ' AcessVBADataџџџџџџџџџџџџPROJECTwmџџџџџџџџџџџџ1PROJECTџџџџnBlob џџџџџџџџџџџџчPropDataDFџџџџTypeInfoџџџџџџџџџџџџ11CLK`6~5CХ YLŽ…фЧ‚ƒ„…†Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ–—˜™œЁДžŸ ЂЊЃЄЅІЇЈЉЋ­ЌЎАЏБВГЗЕўџџџЖИЛЙКМПНОРТСХУФЦШЧ ўџџџЯџџџџџџџџџџџџџџџџџџџџбџџџџгџџџџеџџџџжзийклмнопрстўџџџфхцчшщъыьўџџџюя№ёђѓєѕA<јљњћџџџџџџџџџџџџџdirџџџџџџџџџџџџ & AcessVBADataџџџџџџџџџџџџPROJECTwmџџџџџџџџџџџџ1PROJECTџџџџl     ўџџџўџџџ>ўџџџ !"#$%&'()*+,-./0ўџџџ23456789:;<=ўџџџ?@ABCDEFGHIJKL`NOPQRSTUVWXYZ[\]^_ўџџџaўџџџcdefghijklmnopqrstuvwxyz{|}~€CustomGroupsџџџџџџџџ`Ї€5CХ`Ї€5CХDataAccessPages џџџџџџџџџџџџ`Ї€5CХ`Ї€5CХџџџџџџџџџџџџўџџџџџџџџџџџџџџџўџџџџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџ%џџџџ№џџџџ`џџџџƒID="{B48EA137-7643-4941-937A-E686348CAA5A}" DocClass=Form_AsciiTransform/&H00000000 DocClass=Form_InitCalendar/&H00000000 DocClass=Form_frmBreakfastList/&H00000000 DocClass=Form_frmFindStay/&H00000000 DocClass=Form_frmServiceList/&H00000000 DocClass=Form_fsubStayRooms/&H00000000 DocClass=Form_frmRooms/&H00000000     ўџџџЫџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџžšK[џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ DocClass=Form_fsubRoomGrid1/&H00000000 DocClass=Form_fsubStayList/&H00000000 Module=modCommon DocClass=Form_fsubStayServices/&H00000000 Module=modMenues DocClass=Form_fsubBreakfastList/&H00000000 DocClass=Form_frmStay/&H00000000 DocClass=Form_fsubRoomGrid2/&H00000000 Name="hotelsys" HelpContextID="0" VersionCompatible32="393222000" CMG="0200CA0B890F890F890F890F" DPB="C5C70D4C130E140E140E" GC="888A4053415341AC" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] Form_AsciiTransform=0, 0, 0, 0, C Form_InitCalendar=0, 0, 0, 0, C Form_frmBreakfastList=0, 0, 0, 0, C Form_frmFindStay=176, 176, 757, 542, Form_frmServiceList=0, 0, 0, 0, C Form_fsubStayRooms=0, 0, 0, 0, C Form_frmRooms=0, 0, 598, 30, Form_fsubRoomGrid1=88, 88, 478, 470, Form_fsubStayList=0, 0, 0, 0, C modCommon=66, 66, 260, 448, Form_fsubStayServices=132, 132, 416, 514, modMenues=44, 44, 238, 426, Form_fsubBreakfastList=0, 0, 0, 0, C Form_frmStay=154, 154, 382, 536, Form_fsubRoomGrid2=110, 110, 500, 492, Z 2, Z 0 Then SForm_AsciiTransformForm_AsciiTransformForm_InitCalendarForm_InitCalendarForm_frmBreakfastListForm_frmBreakfastListForm_frmFindStayForm_frmFindStayForm_frmServiceListForm_frmServiceListForm_fsubStayRoomsForm_fsubStayRoomsForm_frmRoomsForm_frmRoomsForm_fsubRoomGrid1Form_fsubRoomGrid1Form_fsubStayListForm_fsubStayListmodCommonmodCommonForm_fsubStayServicesForm_fsubStayServicesmodMenuesmodMenuesForm_fsubBreakfastListForm_fsubBreakfastListForm_frmStayForm_frmStayForm_fsubRoomGrid2Form_fsubRoomGrid2-8769-000086394B13}џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџџџџџN0{5589ENFEYFBDALLPTTDQCFCQJBFOUTBJM:џџџџ…, LIRRNWIMBKMZYDGBORTEDFARWXE_:џџџџџџџџџџџџb‹DJNARCKQIZNSGEADRRMPBRQBLYQK:џџџџулXEHPSPIQGBLSUDNVSQFTNRDAMUZK: џџџџ2•Q‚ƒ„ўџџџ†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉўџџџЋЌўџџџўџџџЏўџџџБВўџџџўџџџЕўџџџЗИЙКЛМўџџџўџџџПўџџџСТУФХЦЧШЩЪЫўџџџўџџџЮўџџџўџџџбвгдежзиўџџџўџџџлмнопрўџџџтуфхцчшщъыўџџџўџџџюя№ўџџџўџџџѓєѕіїјљњћќ§ўџRPWEUWFFLFKCZDIVJCTKIQAQDELK:џџџџџџџџДХ HWIEKODWKEMNTDWJYHQMNOHCKJPL:џџџџџџџџџџџџЭOMKBCEEXHJXSEEXOSIITEFNYHHBC:џџџџџџџџџџџџФRRODZFCGFHPGKRDTLGPLOFLBNSOVF: џџџџДHAWCYUBAQCABRDJEQSGCKQRPWJED: џџџџ^KMVYMLCZHJORHELHIJHZHCUTFIMM:žšK[џџџџ%_ZIJLUSKYHQZNBETLVYMIGCUJHEUM: џџџџџџџџфO~XJLCVPIENUQAWDYSDMXNJROQXVCB:џџџџџџџџџџџџмЖBlob џџџџџџџџџџџџ.LPropDataHJџџџџTypeInfoџџџџџџџџџџџџBlobDeltaIџџџџџџџџ'     ўџџџ>ўџџџ !"#$%&'()*+,-./0ўџџџ23456789:;<=ўџџџ?@ABCDEFўџџџHIJKL`NOPQRSTUVWXYZ[\]^_ўџџџabcdefghijklmnopqrstuvwxyz{|}~€EMRLTKEDKIEODEUGSHAYHPVRRPCM:џџџџџџџџnUXCFRMNZZFRHGEABTLTQIRVVTSYC:џџџџџџџџџџџџ11DSCRTNMODXOUXDXWKKWY_KJWCDIK:џџџџџџџџџџџџr;S_VBA_PROJECTџџџџџџџџџџџџ[І-__SRP_2 џџџџ3V__SRP_3џџџџџџџџџџџџM__SRP_8џџџџа’$__SRP_9џџџџџџџџљgBlobDeltaOџџџџџџџџ:13GZS`6~5CХры†AєхЦBlob џџџџџџџџџџџџ?&PropDataRTџџџџ`‚ƒ„…†‡ˆ‰ŠўџџџŒŽўџџџ‘’“ўџџџ•–ўџџџ˜™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГўџџџЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклўџџџнопрстуфхцчшщъыьэюя№ёђѓєѕіїјњћќ§ўџџџџџџџџџџџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ–02=Bb c№ghniqj0k{ РРРЮ`^YЧз?т@мqxtbRoomGridнqxtbRžšK[oomGridо"[Event Procedure]ъ8‰‰‰‰ рhЁыџ@HP LaserJet 5”@w @yXX @MSUD7HP LaserJet 5ф%d ьџ\winspoolHP LaserJet 5\\ITPRINTSVR1\SA116HPLJ5Mћ"[Event Procedure]џd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghфMS Sans Serif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35cИd §zbcijщMS Sans Serif§{5bяcJ §™`bœ€пFormHeaderџ d5U7`9a9bхc№мRoom LabelнRoomфDetachedLabelхRoom_Label§d5U7`Wa9bфc№мBeds LabelнBedsфDetachedLabelхBeds_Label§d5U7`ta9bc№мprice1 Labelн PriceфDetachedLabelхprice1_Label§d5U7`Ъa9bc№мprice2 Labelнas singleфDetachedLabelхprice2_Label§d5U7` a9bхc№м20-10 Labelн 20-10фDetachedLabelхCtl20_10_Label§d5U7`> a9bхc№м21-10 Labelн 21-10фDetachedLabelхCtl21_10_Label§d5U7`\ a9bхc№м22-10 Labelн 22-10фDetachedLabelхCtl22_10_Label§d5U7`za9bхc№м23-10 Labelн 23-10фDetachedLabelхCtl23_10_Label§d5U7`˜a9bхc№м24-10 Labelн 24-10фDetachedLabelхCtl24_10_Label§d5U7`Жa9bхc№м25-10 Labelн 25-10фDetachedLabelхCtl25_10_Label§d5U7`дa9bхc№м26-10 Labelн 26-10фDetachedLabelхCtl26_10_Label§d5U7`ђa9bХc№м27-10 Labelн 27-10фDetachedLabelхCtl27_10_Label§˜`pœ€п Detailџ m7U`9a9bхcџeFмRoomнRoom§m7U`Wa9bфcџeIkмBedsнbedCount§m07U`ta9bcџeXkм Priceн price1о Fixed§m07U`Ъa9bcџe“kмas singleн price2о Fixedѕas_single§m7U`‡a8bхcџeQkм 24-10н 24-10ѕCtl24_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7]`Я apbхcџeQkм 25-10н 25-10ѕCtl25_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7W`У a8bхcџeQkм 26-10н 26-10ѕCtl26_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7]`сa8bхcџeQkм 27-10н 27-10ѕCtl27_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7ї`ЕaqbхcџeQkм 28-10н 28-10ѕCtl28_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: UnderžšK[ repair - not available§m7U`Яa8bхcџeQk м 29-10н 29-10ѕCtl29_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7U`дa9bхcџeQk м 30-10н 30-10ѕCtl30_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7U`ђa9bХcџeQk м 31-10н 31-10ѕCtl31_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§š`œ€пFormFooter§џџџџUzXJLCVPIENUQAWDYSDMXNJROQXVCB:џџџџџџџџџџџџмЖl§m§n§o§p§r§z§{§™џ d§d§d§d§d§d§d§d§d§d§d§d§˜џ m§m§m§m§m§m§m§m§m§m§m§m§š§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ ž)Х‰fж‡i†9K™FormHeaderd Room_LabelRoom Labeld Beds_LabelBeds Labeld price1_Labelprice1 Labeld price2_Labelprice2 Labeld Ctl2 ўџџџ  !"#$%&'()*+,-./0ўџџџ23456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmўџџџopqrstuvwxyz{|}~€0_10_Label20-10 Labeld Ctl21_10_Label21-10 Labeld Ctl22_10_Label22-10 Labeld Ctl23_10_Label23-10 Labeld Ctl24_10_Label24-10 Labeld Ctl25_10_Label25-10 Labeld Ctl26_10_Label26-10 Labeld Ctl27_10_Label27-10 Label˜ DetailmRoommBedsmpricemas_singleas singlešFormFooterџroomIDџtypeџbedCountџprice1џprice2mCtl24_1024-10mCtl25_1025-10mCtl‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜›џџџџџџџџœўџџџŸ ЁЂЃЏџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАБВГЕЖЗМџџџџџџџџџџџџџџџџНОПРСТУўџџџХЦЧШЩЪЫЬўџџџЮЯабвгдежзўџџџк§џџџлмнопрстЭ хцчшщъьџџџџэюя№ёђѓєѕіїјљњћќ§ўџ      !"#$ўџџџ&'()*+,-.ўџџџ01э345678uџџџџџџџџџџџџџџџџџџџџџџџџ@BCDEGFTVIJKLMNOPQRSўџџџUabXYZ[\]^_`ўџџџcedsghijklmnopqўџџџ›tvxw8yz{|}~€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@”щ i2’’’џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџ%џџџџ№џџџџ`џџџџƒID="{B48EA137-7643-4941-937A-E686348CAA5A}" DocClass=Form_AsciiTransform/&H00000000 DocClass=Form_InitCalendar/&H00000000 DocClass=Form_frmBreakfastList/&H00000000 DocClass=Form_frmFindStay/&H00000000 DožšK[cClass=Form_frmServiceList/&H00000000 DocClass=Form_fsubStayRooms/&H00000000 DocClass=Form_frmRooms/&H00000000–02=Bb c№ghhiœjt@kЩ РРРЮ`^YЧз?т@мqxtbRoomGridнqxtbRoomGridо"[Event Procedure]ъ8‰‰‰‰ рhЁыџ@HP LaserJet 5”@w @yXX @MSUD7HP LaserJet 5ф%d ьџ\winspoolHP LaserJet 5\\ITPRINTSVR1\SA116HPLJ5Mћ"[Event Procedure]џd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghфMS Sans Serif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35cИd §zbcijщMS Sans Serif§{5bяcJ §™`bœ€пFormHeaderџ d5U7`9a9bхc№мRoom LabelнRoomфDetachedLabelхRoom_Label§d5U7`Wa9bфc№мBeds LabelнBedsфDetachedLabelхBeds_Label§d5U7`ta9bc№мprice1 Labelн PriceфDetachedLabelхprice1_Label§d5U7`Ъa9bc№мprice2 Labelнas singleфDetachedLabelхprice2_Label§d5U7` a9bхc№м20-10 Labelн 20-10фDetachedLabelхCtl20_10_Label§d5U7`> a9bхc№м21-10 Labelн 21-10фDetachedLabelхCtl21_10_Label§d5U7`\ a9bхc№м22-10 Labelн 22-10фDetachedLabelхCtl22_10_Label§d5U7`za9bхc№м23-10 Labelн 23-10фDetachedLabelхCtl23_10_Label§d5U7`˜a9bхc№м24-10 Labelн 24-10фDetachedLabelхCtl24_10_Label§d5U7`Жa9bхc№м25-10 Labelн 25-10фDetachedLabelхCtl25_10_Label§d5U7`дa9bхc№м26-10 Labelн 26-10фDetachedLabelхCtl26_10_Label§d5U7`ђa9bХc№м27-10 Labelн 27-10фDetachedLabelхCtl27_10_Label§˜`pœ€п Detailџ m7U`9a9bхcџeFмRoomнRoom§m7U`Wa9bфcџeIkмBedsнbedCount§m07U`ta9bcџeXkм Priceн price1о Fixed§m07U`Ъa9bcџe“kмas singleн price2о Fixedѕas_single§m7U`‡a8bхcџeQkм 23-10н 23-10ѕCtl23_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7]`Я apbхcџeQkм 24-10н 24-10ѕCtl24_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7W`У a8bхcџeQkм 25-10н 25-10ѕCtl25_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7]`сa8bхcџeQkм 26-10н 26-10ѕCtl26_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§mžšK[7ї`ЕaqbхcџeQkм 27-10н 27-10ѕCtl27_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7U`Яa8bхcџeQk м 28-10н 28-10ѕCtl28_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7U`дa9bхcџeQk м 29-10н 29-10ѕCtl29_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§m7U`ђa9bХcџeQk м 30-10н 30-10ѕCtl30_10јОOCC: Occupied - guests in the room BOO: Booked - nobody yet REP: Under repair - not available§š`œ€пFormFooter§дежзийклўџџџнопрстуфхцчшщъыьэюя№ёђѓєѕіїјўџџџњћќ§ўџšХ FormFooterЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџŽлшu Pж‡i†9K™FormHeaderd Room_LabelRoom Labeld Beds_LabelBeds Labeld price1_Labelprice1 Labeld price2_Labelprice2 Labeld Ctl20_10_Label20-10 Labeld Ctl21_10_Label21-10 Labeld Ctl22_10_Label22-10 Labeld Ctl23_10_Label23-10 Labeld Ctl24_10_Label24-10 Labeld Ctl25_10_Label25-10 Labeld Ctl26_10_Label26-10 Labeld Ctl27_10_Label27-10 Label˜ DetailmRoommBedsmpricemas_singleas singlešFormFooterџprice1џprice2mCtl23_1023-10mCtl24_1024-10mCtl25_1025-10mCtl26_1026-10mCtl27_1027-10mCtl28_1028-10mCtl29_1029-10mCtl30_1030-10ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–џd§e§f§g§h§i§j§k§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџšЄџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЅІЇЈЉЊЋЌ­ЎИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЙКЛыџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ DocClass=Form_fsubRoomGrid1/&H00000000 DocClass=Form_fsubStayList/&H00000000 Module=modCommon DocClass=Form_fsubStayServices/&H00000000 Module=modMenues DocClass=Form_fsubBreakfastList/&H00000000 DocClass=Form_frmStay/&H00000000 DocClass=Form_fsubRoomGrid2/&H00000000 Name="hotelsys" HelpContextID="0" VersionCompatible32="393222000" CMG="0103C9CFCDCFCDCFCDCFCD" DPB="7A78B2392A3A2A3A2A" GC="F3F13BC0B5C1B5C14A" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H0000sciiagTopgWidthgLeftgHeightFirstDayLastDaytypeIDminRoomfrmfirstlastmessagestate B+BР‚7InitCalendaXrG 7I€3i­РšC6Сšn@a€96LIR#Й€0* pH‚dфhotelsysЂ,@ Z= n Кф{F EJ< DAO>BDA@O ™*\G{000@25E01-0C  0046}#5.0#0#C:\PROGRAM FILES\COMMON MICROSOFT SHARE D\w350.DLL#Micr@osoft 3.51 Object LibrXary€H26_1026-10mCtl27_1027-10mCtl28_1028-10mCtl29_1029-10mCtl30_1030-10mCtl31_1031-10Ы–џd§e§f§g§h§i§j§k§žšK[l§m§n§o§p§r§z§{§™џ d§d§d§d§d§d§d§d§d§d§d§d§˜џ m§m§m§m§m§m§m§m§m§m§m§m§š§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ– 023=BabcЉ!ghiiz j§/krž УN(0000 [Workspace] Form_AsciiTransform=0, 0, 0, 0, C Form_InitCalendar=0, 0, 0, 0, C Form_frmBreakfastList=0, 0, 0, 0, C Form_frmFindStay=176, 176, 757, 542, Form_frmServiceList=0, 0, 0, 0, C Form_fsubStayRooms=0, 0, 0, 0, C Form_frmRooms=0, 0, 598, 30, Form_fsubRoomGrid1=88, 88, 478, 470, Form_fsubStayList=0, 0, 0, 0, C modCommon=66, 66, 260, 448, Form_fsubStayServices=132, 132, 416, 514, modMenues=44, 44, 238, 426, Form_fsubBreakfastList=0, 0, 0, 0, C Form_frmStay=154, 154, 382, 536, Us@tdole>‚fstdolдe^h€^€^X043„[W-^2^WINDOWS\System32\ƒ22.tlb#OLE Aut€omation0 ТVBIDE> VB@IDEDЗ €­€DE157# D5.3DQrogram Files\CommonGIShare d\VBAС6E6EXT.OLBШRVisual Basic for Applic1s Extensibilit\y РР+€BœDТзe@Form_AsciiTransЁmG&€ F_ rm_Рsci@Tr€ansfDР NFEYFBDALLPTTDQCFCQJBFOUTBJMH28AFРOYE@B@RAL@PT@DQCРCРJ@ZFOUРBJMBH@1ЕМнЕB,3Јаe"B(B+BР‚7InitCalendaXrG 7I€3i­РšC6Сšn@a€96LIRRNWIMBKMZYDGBORTEDFA RWXE_6L€†€RRNW@ŠM0K€-ZY€9ЊG O`T@D@ЂA`WX _*ƒйfrmBreakfastListGV*A&7fm€rQ€hak 6a`7t `/iтƒDJNARCKQIZNSGEADRRMPBRQBLYQKUƒD`1Nр@R 5Kр4IZSG@A MP ЊR Bр YрKс ­7дБ7ˆFindSt ayG №F S…С6SР8ayЃXEHPSPIQGBLSUDNVSQFTNRDAXMUZЄ1H S`IрС5LS OЊD V Q€6T`jR`AР:UрБВS Ж­яБЈSРervice7KnE7SР6rvРc LрЁЂУHAWCYUBAQCABRDJEQSG@8RPWJEDƒ6ЊH6W6YB`mСlAB4С9E8CЊ:R@ W€‡@BCDEGFTVIJKLMNOPQRSўџџџUabXYZ[\]^_`ўџџџcedsghijklmnopqўџџџ›tvџџџџw8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHAWCYUBAQCABRDJEQSGCKQRPWJED: џџџџ„^KMVYMLCZHJORHELHIJHZHCUTFIMM:џџџџџџџџž_ZIJLUSKYHQZNBETLVYMIGCUJHEUM: џџџџџџџџ^O~XJLCVPIENUQAWDYSDMXNJROQXVCB:џџџџџџџџџџџџGb ‚ƒ„…†‡ˆ‰ŠўџџџŒŽўџџџ‘’“ўџџџ•–ўџџџ˜™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГўџџџЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклўџџџнўџџџпрстуфхцчшщъыьэюя№ёђѓєѕіїјњћќ žšK[§ўџCustomGroupsџџџџџџџџ`Ї€5CХ`Ї€5CХDataAccessPages џџџџџџџџџџџџ`Ї€5CХ`Ї€5CХ__SRP_aџџџџоЖ __SRP_bџџџџџџџџмg ўџџџ  !"#$%&'()*+,-./0ўџџџ23456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmўџџџopqrstuvwxyz{|}~€__SRP_0!џџџџі*)__SRP_1џџџџџџџџџџџџЫForms d?`6~5CХpш„”…фЧ0џџџџџџџџ%`6~5CХ`6~5CХ‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œўџџџŸ ЁЂЃЄЅІЇўџџџЉЊьЌ­ЎЏАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪжџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџзийклмноўџџџрстуфхцчшўџџџяы№эAъўџџџёђѓєўџџџQїјљњћќўOџKeyAsciiagTopgWidthgLeftgHeightFirstDayLastDaytypeIDminRoomfrmfirstlastmessagestate Р‚7InitCalendaXrG 7I€3i­РšC6Сšn@a€96LIR"Й€0* pH‚dфhotelsysЂ,@ Z= n Кф{F EJ< DAO>BDA@O ™*\G{000@25E01-0C  0046}#5.0#0#C:\PROGRAM FILES\COMMON MICROSOFT SHARE D\w350.DLL#Micr@osoft 3.51 Object LibrXary€HUs@tdole>‚fstdolдe^h€^€^X043„[W-^2^WINDOWS\System32\ƒ22.tlb#OLE Aut€omation0 ТVBIDE> VB@IDEDЗ €­€DE157# D5.3DQrogram Files\CommonGIShare d\VBAС6E6EXT.OLBШRVisual Basic for Applic1s Extensibilit\y РР+€BœDТзe@Form_AsciiTransЁmG&€ F_ rm_Рsci@Tr€ansfDР NFEYFBDALLPTTDQCFCQJBFOUTBJMH28AFРOYE@B@RAL@PT@DQCРCРJ@ZFOUРBJMBH@1ЕМнЕB,3Јаe"B(B+BР‚7InitCalendaXrG 7I€3i­РšC6Сšn@a€96LIRRNWIMBKMZYDGBORTEDFA RWXE_6L€†€RRNW@ŠM0K€-ZY€9ЊG O`T@D@ЂA`WX _*ƒйfrmBreakfastListGV*A&7fm€rQ€hak 6a`7t `/iтƒDJNARCKQIZNSGEADRRMPBRQBLYQKUƒD`1Nр@R 5Kр4IZSG@A MP ЊR Bр YрKс ­7дБ7ˆFindSt ayG №F S…С6SР8ayЃXEHPSPIQGBLSUDNVSQFTNRDAXMUZЄ1H S`IрС5LS OЊD V Q€6T`jR`AР:UрБВS Ж­яБЈSРervice7KnE7SР6rvРc LрЁЂУHAWCYUBAQCABRDJEQSG@8RPWJEDƒ6ЊH6W6YB`mСlAB4С9E8CЊ:R@ W€48465106џџ9,Form_fsubBreakfastListџџџџ8ъ џџ8DSCRTNMODXOUXDXWKKWY_KJWCDIK0?48465106џџйForm_frmStayџџџџPF;џџџџџџpџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџЈ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџРџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџpоЗ№m}oO‘ˆщг§дъIџџџџшZЗžЁСїDЌЮ{fO i}џџџџ\ЖЏ>ƒG‹Н+ л3Хџџџџ…нуњE‹K‚›И?nйŸџџџџЛР6uЉИF™ћрП_Ё0­џџџџЬˆј4ИdI•jЌќТв†Aџџџџ1žHХ2§CЄЕНЪшъњQџџџџxFˆrйLI–*яєшПTmџџџџ)3єBKYAЉzŸi—щЎГџџџџp‰ы„PˆO‚ Лћи@Чхџџџџwъ— vФGЈd7(=џџџџ6\7‘j—F‰Ў2:<ЁCџџџџЗЅѓlKЉечiДk2џџџџИVхŠБhNГ sKHТtџџџџпF‚GC=їIД ЧёD„єэџџџџ€‰џ\bAccess „џb‚„џnameVBAїтWin16С~Win32MacГВVBA6­#hotelsysKПDAOž‚stdole“`VBIDEAџForm_AsciiTransformОX žšK[€џ_EvaluateйCommand4_ClickIZErr_Command4_ClickВScreenIPreviousControlХSetFocusёЦDoCmdЦЇFindNextгuExit_Command4_Click?!MsgBox—RErroŠ DescriptionО Transform_Click˜'i`cZaXAsc!uStr—еChrK~Form_InitCalendar)В Form_Load{ txtSimDateЁм modCommonUбsimDate-аMakeCalendar_ClickjљhotelIcalB} Recordsetкц CurrentDbS OpenRecordsetе|ExecuteYЭcTodayŸ7 cCalAhead˜CAddNewaЃUpdateвќForm_frmBreakfastList*ЬcboDate_BeforeUpdatetёCancelё˜sjcboDateƒh QueryDefs‡&qryBreakfastRooms˜*SQL"е qselServiceAЕ~ qselServiceBЖ~subBreakfastListMЌRequeryЋFormтRecordsetClone8 MoveFirstNBookmarkCcboDate_KeyDown—ЄKeyCodeэ˜Shiftфы acShiftMaskбЏvbKeyUpЫѕ vbKeyDownЯ IsDate2ЂcboDate_NotInListNewDatax_Response—Ќ vbExclamation…ШacDataErrContinueDє cmdOK_ClickИErr_cmdOK_ClickњѕExit_cmdOK_ClickœўForm_frmFindStayаz savedSelStays€,savedSelGuestStaysoG fncStackSQL lIsNullЏФ qselStaysњРqselGuestStaysЈ# fncUnstackSQLБё fncSelStaysЂr arrivalDaten˜include`ЖcAnyžt cBookOrIn‹UcBookedcInl~fncSelGuestStaysw/critЭЮequal^#valнт queryStaylist€# subStayList­№ SourceObjectР CurrentRecord@žmessageŸѕ txtMessageд cmdFind_ClickwъcritDateKˆcmdGuestHistory_ClickN/Guest guestID„\BeepУ showNewStayI˜Stayѕ2 FindFirstM=cmdNewGuest_Clickч†SysCmd—GacSysCmdGetObjectState?acFormЄFormsЈfrmStay&_closeOKOѕ acSaveYesрўOpenFormЗ acFormAdd ‚cmdNewStay_Click­дcmdOpenStay_Clickи№stayID / acFormEditТіcmdReset_Click›AcritNameђ?critAddrњD critPhone І critRoomDateип critIncludeTcritRoomйЁcritStay6€critAddr_ChangeЙcritDate_AfterUpdateФљcritDate_BeforeUpdateуZ CancelEventURUndoУžcritDate_KeyDownл.critInclude_BeforeUpdate#ШcritName_ChangeјВcritPhone_Change8critRoom_AfterUpdate ˜mdriDLookupуFcritRoomDate_AfterUpdate acritStay_BeforeUpdate‡ Form_KeyPressЩ”KeyAscii# vbKeyReturnrs_ Form_Open-вForm_frmServiceListёvForm_BeforeUpdateP-Form_fsubStayRoomsЯЖtxtCount_BeforeUpdateшSParentЎтstateљtxtCountю txtStayIDCцroomIDОуEOFє‰Edit+ personCountЛMoveNextL! setObserve$o uRoomListЋ|uPrice†єSendKeysN Form_DeleteŠѓlaststayп4 RecordCountу{ vbInformationВnvbYesNo vbQuestionЪвvbYesa?DeleteИxuGridbz uFindStayC} Form_frmRoomsH prevFirst<gTopёgWidthвgLeftgHeightA7fncSelRoomStateKчFirstDay=чLastDay’7 qselRoomStateЛ fncSelRoomsіMtypeIDRminRoom$§cAnyFreeKcAnyRoomš€ qselRoomsNœ fncRoomGridЭ qryRoomGridќeSetGridColumnsУefrmУacDesignжЁacHidden” ControlSource" setSelectionЬ subRoomGrid…Й SelHeight!ŒSelWidth‘ЂSelLeft#$ updateGridНЁsubRoomGrid_Exity… getSelPeriodњЈfirst”zlastbh no_selectionBcboFromїM cDateColumndjuseRoomL­roomsПтGetRowsУŸIIfzžcboDeparture_AfterUpdateЛ` cboDeparture™ txtNightsѓcboDeparture_BeforeUpdateacboDeparture_GotFocusхcboDeparture_KeyDownц cboFrom_AfterUpdateacboFrom_BeforeUpdateьоcboFrom_GotFocusЃvcboFrom_KeyDownТcboType_AfterUpdateЦ cboType€-txtRoomVscboType_BeforeUpdate 8cboType_GotFocusN cmdBook_Click”шcurStayZХ Form_frmStayCBno_stay~[cmdCheckin_ClickМsql1]$sql2^$d[ cTotDatesJёForm_DeactivateЂSelTopmsubRoomGrid_EnterIqtxtNights_AfterUpdate”йtxtNights_GotFocusn1txtRoom_AfterUpdateŸtxtRoom_GotFocus-Form_fsubRoomGrid1;{ Form_Current‚”Form_fsubStayListж( Form_DblClžšK[ick$acEditIЂfrmStaysœžintStayпШcTemp §cOut~РcCancelГEcRepairјb uServicesS fncOpenAsciihФ fncSimDateЄcompressNumberMForm_fsubStayServices*ŸcboDate_GotFocusьЩForm_AfterUpdateђќ txtGrandTotal§Њ txtQuantityР cboServiceIDгНrefresh modMenues#№fncAddServiceLine!vbOKOnlyѕВfncDelServiceLines§fncDelRoomLine41fncRoomManagementЧ fncPrintBreakfastList$ fncCancelStayЃгvbNoЇ%updateRoomListQыfncUndoCheckinєhForm_fsubRoomGrid2<{Form_fsubBreakfastList3updateBreakfastтH serviceIDргquantityŽ BreakfastA/cmdXrefresh_Click„,BreakfastA_BeforeUpdateСQBreakfastB_BeforeUpdateж) BreakfastB0observe’ОobsšН subStayRooms:D firstStayЛ<txtNameo txtAddress1ЪлDMinЈyDMaxŠx txtPaymethodЃчcmdCheckout_Click˜ЗcmdPrintAccount_ClickurcmdPrintConfirm_Click$‘€€џtblStay.guestIDъisubStayServicesb AllowAdditionsIДAllowDeletions*ч AllowEditsїиOpenArgsмB Form_Unload•Йst(_€€џtblGuest.guestID}rDetail2Label3, cmdNewGuest}‰Label12BLabel15ELabel14DLabel17GLabel19IcmdResetвп cmdOpenStayn cmdNewStayћd Include_LabelELabel29nLabel31‹cmdGuestHistory Rр(8(`(ˆ$Аи№€ žšK[џџџџ". 4Pˆ€ џџџџB 6˜:а€ џџџџ"€ N  p€$И,Шј*08@(H(p(˜:Р   0 € џџџџ" 8 €@ €H (P (x l  6!H!P!€ 0X!Jˆ! и! ш! ј!" " "€ џџџџ€ &("<P"$"FИ"#L# X# h# x#ˆ# #8 #*и#R$`$€$ˆ$€ џџџџџџџџ˜$р Form frmStayЭџџ`ЭџџX]ђШр? Determines what views to refesh after sending keys to XRefresh– L'Joџџp–x]ђИЖDELETE * FROM tblStayRooms; LB@PІ   ЖjINSERT INTO tblStayRooms ( FirstOfdate, CountOfdate, roomID, roomType, personCount, price, total, stayID) ЖiSELECT First(tblRoomState.date) AS FirstOfdate, Count(tblRoomState.date) AS CountOfdate, tblRoom.roomID, Ж4tblRoom.type AS roomType, tblRoomState.personCount, Ж@IIf([personCount]=1 And [price2]>0,[price2],[price1]) AS price, ЖmIIf([personCount]=1 And [price2]>0,[price2],[price1])*Count(tblRoomState.date) AS total, tblRoomState.stayID ЖMFROM tblRoom INNER JOIN tblRoomState ON tblRoom.roomID = tblRoomState.roomID ЖWHERE tblRoomState.stayID= џџ!єЖŽ GROUP BY tblRoom.roomID, tblRoom.type, tblRoomState.personCount, IIf([personCount]=1 And [price2]>0,[price2],[price1]), tblRoomState.stayID, ЖXIIf([personCount]=1 And [price2]>0,[price2],[price1]) ORDER BY First(tblRoomState.date);'` ` LB@P џџ!NB@poџџ–а]ђђ(]ђ@ђX]ђp]ђˆ џџ!R$  џџ!T$ œЖDYou must fill in at least the guest name and the first address line. ŽA&|џџРkџџИ џџ":ъ KT Є ІЗ f%Ђ›G|jрK Error message made: Select room Є @!B œЖ)You can only book guests into the future.Ќ $8ЖSelect another period. ŽA&|џџрkџџи џџ!є В f%Ў›G|jрH" Error message made: Room not free ВKTЖCThe guest is booked already. Do you want to give him one more room? Z \ $& 0›G|j Є ІЗ f%Ђ›G|jрK Error message made: Select roomЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$V'PЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$X'T І PЌ Є TЌ œЖ.There cannot be gaps in the total stay period.Ќ $8Ж+Select another period or make two bookings. ŽA&|џџˆkџџ€ џџ!є В f%Ў›G|jрH" Error message made: Room not free ДKTЖThis booking is checked in.Ќ $8Ж Do you want to undo the checkin? Z \ $& 0›G|jЖ*SELECT * FROM tblRoomState where [stayID]= џџ!єЖ;'`э ` L%N., ,!Bє ,B@D В ,): ,B@X ,B@Hѓџџш ,B@BSр e.g. checked out or cancelledЖThis stay cannot be booked. ŽA&|џџxnџџp В џџ(: b d L N 'J џџB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls XrefreshoџџА–Ј]ђшђ]ђђ0]ђH]ђ` џџ!R$  џџ!T$ œЖDYou must fill in at least the guest name and the first address line. ŽA&|џџјkџџ№ џџ":ъ KT Є ІЗ f%Ђ›G|jрK" Error message made: Select a room Є @!BœЖ#You can only check guests in today.Ќ $8žšK[Ж(Book instead or select a room from today ŽA&|џџkџџ џџ!є Д f%Ў›G|jрD" Error message made: Room not free џџ!ZЌœЖ6You have not chosen a paymethod. Check with the guest. XA&|џџXkџџP ВKTЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$V'P P @!BœЖ#You can only check guests in today.Ќ $8Ж0You may have to change the booking for the guest ŽA&|џџhkџџ` џџ!ZЌœЖ6You have not chosen a paymethod. Check with the guest. XA&|џџkџџјЖ*SELECT * FROM tblRoomState where [stayID]= џџ!єЖ;'`э ` L%N., ,!Bє ,B@D Д ,): ,B@X ,B@Hѓџџ@ ,B@B ДKTЖGThe guest is checked in already. Do you want to give him one more room? Z \ $& 0›G|j Є ІЗ f%Ђ›G|jрK" Error message made: Select a roomЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$X'T Є @!B œЖ!You can only check in from today. ŽA&|џџиkџџа Є TЌ œЖ)There cannot be a gap in the stay period. ŽA&|џџxkџџp џџ!є Д f%Ў›G|jрD" Error message made: Room not freeSр e.g. checked out or cancelledЖ"This booking cannot be checked in. ŽA&|џџˆnџџ€ Д џџ(: b d L N 'J џџB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls XrefreshoџџР–€]ђРђи]ђ№]ђ џџ!R$  џџ!T$ œЖDYou must fill in at least the guest name and the first address line. ŽA&|џџkџџ џџ":ъ ДKTЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$V'P P @!BœІ Ж$The guest has been checked in today.Ќ $8ЖCDo you want to check him out and give him an invoice for one night? Z \ $& 0œЖ2Do you want to cancel the stay without an invoice? Z \ $& 0›G|j  џџ(:р# Cancel the staydџџp @!B'Tр- Free the rooms from tomorrowkџџ8dџџ0 @!BЌ 'Tр- Free the rooms from todaykџџ№ џџ!ZЌ џџ!: ДœЖ6You have not chosen a paymethod. Check with the guest. XA&|џџ€ kџџx џџ!: Д›GЖXAt this point the system would print the final invoice. This test system prints nothing. XA&jрJ Delete any remaining days from the stay, set invoiced days to checked outЖ*SELECT * FROM tblRoomState WHERE [stayID]= џџ!єЖ;'`э ` L%N., ,!Bє ,"Z Tœ ,B@D  ,): ,B@Xdџџ№ ,B@`kџџи ,B@HѓџџР ,B@BSџџЈ Ж?You can only check guests out if they are currently checked in. ŽA&|џџP nџџH џџ!: Д›G  џџ(:jр+" Stay may have been canceled above b d L N 'J џџB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls XrefreshoџџP –( џџ!: ДœЖCYou can only print invoice outlines for guests that are checked in. ŽA&|џџи kџџа ЖVAt this point the system would print a draft invoice. This test system prints nothing. XA&oџџ` –h џџ!: ВœЖ5You can only print confirmation letters for bookings. ŽA&|џџјkџџ№Ж\At this point the system would print a confirmation letter. This test system prints nothing. XA&oџџx–ЈрC Hidden button activated through SendKeys after changing RoomStatesр0 The me.record may have been saved thru +{enter}]ђшђ J b р тЖfrmRooms$оЌ›G fBžj J d р тЖ frmFindStay$оžšK[Ќ›G џџ"€b џџ"є ˜Bжj џџ!: ДЗЗ$Д џџ!d!r(f џџ!: ДЗЗ$Д џџ!d!r(h џџ!: ДЗЗ$Д џџ!d!r(j J ›G џџ!d!rB@pj J L›GA2j J N›G џџB@jЌ'Joџџ`–р" Name and address may have changed р тЖ frmFindStay$оЌ›G ˜BОjoџџ№–X џџ!:Ќ џџ!R$  џџ!T$ 'ш ш›GЖ Please close the unfinished stay XA&jiџџh–ИрG OpenArgs: -1 existing stay; 0 New guest; >0 guestID for existing guest B џџ(> lX ЌœЌ џџ(:р Temporary booking lX Ќ œ l џџ(€bр( Connect to existing guestdџџ€Ж џџ)р Create a dummy guestkџџHkџџ@Ќ'J џџ!: ДЗЗ$Д џџ!d!r(f џџ!: ДЗЗ$Д џџ!d!r(h џџ!: ДЗЗ$Д џџ!d!r(jЗ џџ(fр) Prevent user creating more than one stayA2 џџ!d!rB@p џџB@oџџH–ј]ђX]ђx џџ!:'pр May be deleted later џџ!:Ќœр Temp stay recordЖ%You must select a room for the guest.Ќ $8ЖWant to cancel instead? Z \ $& 0œЗ'^р* Stay in the form - user must select rooms|џџ0kџџ(р* Delete the Stay record - has been updatedэЖ#select * from tblStay where stayID= џџ!єЖ; L%N., ,!Bє ,B@` ,B@Hѓџџp ,B@BkџџXр Check that guest is meaningful: lЌ pЌœр  New guest with temporary stay џџ!R$  џџ!T$ œЖ#Do you want to keep the guest data? Z \ $& ^›G|jkџџxэЖ%select * from tblGuest where guestid= џџ!€rЖ; L%N., ,!Bє ,B@` ,B@Hx#ѓџџp# ,B@Bdр/ Existing guest or new guest with non-temp stay џџ!R$  џџ!T$ ›G|jЖCYou must fill in at least the guest name and the first address line ŽA&З'^р Cancel the close.kџџx"oџџp"џџџџh"џџџџ˜ЗAttribute VB_Name = "Form_frmStay" ŒBasŒ0{EF2CB1A9-59D8-11D6-8769-0863@94B13} |G lobalаSpac’False dCreatab"lTru Pr@edeclaIdА"Expose_TemplateDeriv–CustomiІzD$'   Opti€on CompI< D]€’ €Elicit Dim observe As Integer ' Determines what views to refesh af€ sendin g keyXRefrBPub!2 SubtO 2(64) …@=E EnFd updHRoomList(+€/sAS€ŒngУCurrent€Db.ExecС‘"DELETE * FROM tЬbl‘s;@ƒ s™INSERT INTO ( FirstOfЅ ,€UunrР#ID, СType, personCo ricРtotal, s€ЏID) " ˜& _ƒ+A"S(tCTC(Р'С&Р(t„e.A) ASP я …*Ф.E) Хўt@.AG1DC!Š4Э IIf([H]=H1 A@p[pС>20]>0,…1]Л‚4Т,Cџ № *ТџT"Є/JC1Ž%D!0 ANER JOINѓсA†2 Oц+ GŠ ƒУ-Ž WHEREJ Ъ.У=a*MeЄŒC GROUP BЎY%І9d.Ё7,ы џ*6?*0* П5П?Ё?јORD +@kа6sMЏysуfЁ%ubРSyс2s.Requery•‡cmdBoPok_C@’ke‡fЁzс‡Є€tlastџЅ#Ѓa ‹a! ЊС’r"Recordse­с|If €IsNull( txtЮ) OrЋAdd@Јs1) ThenЇ„Call MsgBox("You m С fi in @Дlethe Јgue@nчa qKAcac lЛ.€", vbExРжmaсХ„Б!ExiЮtCАЂ`If'#Select CбСяMe!€"tРтсBcAкg`NotG"ељƒ6get P‘`оod(", Ё0l, t Е@iError message madxe: d!7к< modppmon№.siml Ќcan only b@#уs inрoВuture.A;Chr(10)E ;"„ano0rёa`iodOG ‘‹Ьms.us^eq$С(hcё-eоdM_Rб  PƒўeTСУ ѓѓч €gе'€)4&is"‹al ’dy. Do„ yа)wantё‚Rg№Œ ha†n oreЂr?Т'YesаNo +`(Q+0‹ђ) Tvb@Б/ІJџo$o$o$o$o$а,k$2$ђ?= DMin(і"ёx  "щ^§I]‘™„aty"0")˜6Чс.!pDMa=ќte‚„bcp9A <АBPŒт - Ж1qG32>27B+pџ‘Q!šGр02б#вbАFapЁ1 1‚v_RŽц/1?2;2 1=aРke twoв$Ѕўs3; 3QЃYJpЏ"э3 3‘O 33' ћ“ƒ3IH[@G3Ф2ГA check€3i†nD4undoтљinП3а^П3*\a{BЎЄІ*ЖА‘@0!№жwhe[ ID] >‰"5yБSet 0n= zOpen‰o(s8.Whi€гСrs.EOFg;Ё1dБШС5rsЖ!p@ =ѕNUђРnMoveNex;$wёW@ЪgрClOиSrElpф'Р e.g. ’Аoutб)а.celјledуA<1№qц w1‘cedo,'+žšK[,пBЯ"uSaŽt`ЯрAt*sгuGridA0TuFindТ=+м uAQвqPaИжA€Focusр-Tžo t`7„унceСZ­‘ modCommonp.simѕŒЌRWcan only checkƒTs @Ztoday." & Chr(10)@"Bookstead Р(sGC% fromў Т и\A!Ы]BЬ^вQ8useT•СІIDр, cInЧOP‰A nРffrepCЉPaymethod = 0!aNhavechHose€І p….УРLASwith‚ЅBЊёCЂInf‡MЂТ@JЃŸBLEУ}УbedG‚‚ё= DMin("d€ћ1"tbІl`teэ.)&=с<VatЉ+"0ќ")Шe`%Ї N!рf?ЬyN N€“‚-toй Tan`bA}b`Q‘ў Р)g,р•}*^,џAэТ џA џA„ ТПds`U"SELECT * FROM ‰= wherшe [c<]‚<€]У Сy;"чGSet РЙ= CurrentDb.OpenfЛ(s(AWhile !rs.EœOFЧ!adiЄСѓB€rscЇ@€v UpСUЮMoveˆNexh WenЈ^y@ ClРo#cdIŸшЪ;ЄЪр­dЧisуžDedAžalrрšy@. Do y Яwˆantр™ gi }вh щonРБo@*А?bMYesNo :+@ЬQЁбсЫ vbŸ€ЪК_Фst_Ф_Фb/ё~!` DMaџ@uAAAAТ~! љrA уЂЂ+ 1 ‹ а€  1cbe a ИgapQ"БGBp}ћ  6†" \] !sПnПnb ПnТ‚Пn C b1El Œ' eˆ.g.ж/outё|aрcellyeњ˜Tўh3…WЗВƒ24пз?ЋaCSуIteƒР*VBobser8€= uGridР6 uFindВn+ 2uСLi€ АPricФ} MFoc$usPTop”ke… ŠmrreceQ=ЁСkeysгSАE‚Kа ("+{0P€er}%x")№њSР~sgfіІ Pˆ0Ћ s XreА…shL В aЅ  vƒpx cmdCQ–Р_Click(џ UКr ZКR&ѓЖИљИ %ИИИб)ћя9Иaа‘ИФЦИџИЂ0њxaИ”ЏЂ+ИџQ1УТ ї‰__ ДPќteпNпNжNсioЗ_8 € %ЭРФghрas beЃч3гГm\З_Лq"j "j€<Са6k№Нinvop1’’!lnigh~tяkРдэkŸ˜ =aўnАC22‚+СŽaE/]/n†МПЩACг'р*j[ЁNqЯ'\ FТb Q~sUЭmњoPйwьœ\яЏшйў-PhяFдЗ1AЂѕ KЫAр9IHЗn Then  Call MsgBox("You have not chosen a paymethod. Check with the guest.", vbInform@ation) ТE€xit Sub*@End IfIf Me.sta€te = cIЇ šAtqis poin e system wo@uld prfinal inv`oice.ё4tІ/‚sphing^' Dele€Iany remain€ dayРs from€Z@y, set9dto –ed (out‡us€p"SELECT * FROM tbl RoomS‚WH ERE [+ID ]=" &„yIЂD€";"‡%S€:r(CurrentDb.Open@RecordI(sХWhile Nvrs.EOF‡‡Aƒ€`rs!DA`€<= lastA ча‹ di56!€ CqOI=.U pd@KElse{KC.` L„ M@oveNexH%W˜end‡-Cl@Дƒ УCase ‹ NХcan onlyuОsAv ifСy are c'Уa… Р~inC˜ExИclaŽЧ‹ЦХS@œ>cФ0C'Ч Ь€Z '‚ Рy mayC№,beРю@-cd ab@GУobser@|= uGrid + uFindЂ`!QListyсPr@hЃР  MFocus@ To ke `ЁVcceiC` a‚keyscSр/K  ("+{РSer}%x")›A`ŒsТg"ˆ a@:#aaN, c@’s XrefreshL т"с‡ vCaTР‰ cmdРntAccount€_Click($^љЉ&<>fŠ!F7thatу=СЁпП<  Ё…ŸŠAСš=œРa draf†џ›Гќ)ConfirТmћ)BookыЩ-}*c# ‚Ф ЋteГ —РЦ b  @ЋseЯС@С7П(љФa P)љ|)ub P!нASХWХ(! ^Hidd€rbuˆttoръctiaYdр`rough цe70Вc3|_хќ.u`БGЏЂхHяpяч….€showNewQO`(Me![0xБ.ћђH€w,PwБlPwEW4ubAS№S€Qs.Q.AllowAŽd№p СxIIf dole2.tlb#OLE AutomationZ*\G{0002E157-0000-0000-C000-000000000046}#5.3#0#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB#Microsoft Visual Basic for Applications Extensibility 5.3 џџџџџџџџКф{F џџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџ џџџџ џџзe8NFEYFBDALLPTTDQCFCQJBFOUTBJM0148465106џџ&Form_AsciiTransformџџаeнџџ8LIRRNWIMBKMZYDGBORTEDFARWXE_0248465106џџ;"Form_InitCalendarџџйeƒџџ8DJNARCKQIZNSGEADRRMPBRQBLYQK0348465106џџ[*Form_frmBreakfastLisžšK[tџџд0с џџ8XEHP.†pIn, Trђu FapnяяboЗяд‘я 2‚п mг ^EР Ÿ AQЏ ™ ;Ћ ѕ)#ƒReрqueryOBЁ!џqeDЂB“ •‚0^МceЇVaQ@Зl0obg`ˆabЂAfАF“‡(!hNameRgadJd@fsw4chP7eяtƒP1п/п/mг/я'а>П‚20ц'’Б$l vcЋ SDFun№A`Bcљ1‹OKumф@Є‘œy&0 Or IsNˆullatxtAЮ)^ *1)„(0Ё…]›ЗPle’ 2{u№anishŸ№_{_Q{ k{!ВLoad! ' ЋArgs: -p1 exр!Oq; 0 :Cw; >>0“`А!cІ; #P) Sim2Ќ= s“ № CLn„g(…) >=;—kё,tA…a№UemРporaryUiv)џmZс(ŽD• `ѕАun S аС KЈEpInq*= "'0 Crea €umќmyгУ еpuz1ё ЯЏAЄAKK, …KЏO8POKЏЏayяTwK3ХЏT Xв РPHrev`Ї uЏ цcСЁ%mo€КœёМфe & пH ИЯ|N?ЊЯ._Unl1с.CanРИawInрteger8Бy0Ÿ xFл{гz„ рF=2^‚*' M`ОbЈe dРНt`8lp!~rЂ.A Ц,В<-‚ЖВ record  If MsgBox("You must select a room for the guest." & C@hr(10)"Want to cancel instead?", vbYesN(o +Qtio0n) =(Th,enƒC<= True ' S8tayJu}m Р- user œšsBExit SubEnd I"f ' DЮteMYў*has been update„ˆSet rs€TCurrentDb.OpenRšset("!„* fr€tbl+where "s€]ID=“MeF.ƒ”;")ƒGW€hile No20.EOFƒ ƒrs.U MoveNˆext WenS€Close …v 'Эeck uatƒз is meaningf`ul: €їfAФrg80 A€J€|0= 0 e@_NewФwith temporary‚6C!0(IsNull(:txtName) Or JAddres№s1))ТУA;РЁžDo yРžwФ’АkeepBkBœ €fОa”š/W0uG­І CuB"id…u[Р|Х‚.ID]Пx›xЬlsЦР7st€rФg…цn knon-l џjt Ы)Call‰o…fi in N˜lea IF… nBŒ aрKAfir€‚aЃA lineb„Exclamat_ƒcCфacс].^_b~  'J џџB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls XrefreshoџџP –( џџ!: ДœЖCYou can onlyBCC-6133-11D6-8769-000086394B13} џџџџ :№џџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ<џџџџџџџџџџ`€iƒ>џџџџџџџџ џџ€€iƒ^џџџџџџџџџџџџџџ€omst`„`џџџџџџџџџџstay „,џџџџџџџџаyID) %`„иџџџџџџџџџџ DPџџџџџџџџџџџџџџџџ0џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€!b Fџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€P€ўџџџџџџџиџџАџџџџџџџџ%џџџџPџџџџџџџџ№џџџџШџџџџџџџџАџџџџџџџџPџџџџџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшКф{F пўЪ'€€" €€(&0|Xи№ј€ H `.p  ЈИР Ш€ џџџџИи  ІАXh"p˜ АРШ€ џџџџ" аи№€ џџџџ" ј€ џџџџџџџџ(ЭџџxЭџџp–]ђ ђИ]ђи[й џџ!@е џџ!@е џџ!8"bжЖ*SELECT * FROM tblRoomState where [roomID]= џџ!@Ж AND date=# џџ!8"bЌ Жmm-dd-yy$ЌЖ#;'`asэ ` L%N.,NAЌ'и ,!B›G ,"є'иjQBрB There can at most be one record since roomID and date are the key иЌ œHPЖThere was no guest in this room $A&KЗ'^ џџB@651|џџ@kџџ8 ,B@BervІЖ.DELETE * FROM tblServiceReceived WHERE roomID= џџ!@Ж AND date=# џџ!8"bЖmm-dd-yy$ЌЖ # AND stayID= иЖ AND serviceID= <Ж;'` ` LB@PM >Ќ œ48І ЖINSERT INTO tblServiceReceived ЖVALUES ( иЖ,  џџ!@Ж,  <Ж, # џџ!8"bЖmm-dd-yy$ЌЖ#,  >Ж);'`i ` LB@PCkџџ р тЖfrmStay$оЌœVCB  N иBJ51 иBBormkџџ8oџџ0–№Ќ џџ!@ ^A:Foџџ–PЌ џџ!H ^A:oџџрџџџџиџџџџCДAttribute VB_Name = "Form_fsubBreakfastL@ist" ДBasД0{2CD39BCC-61žšK[33-11D6-@8769-086394B13} |GlobalфSpacIFalse dCtab"lTru Pr@edeclaIdК"Expose_TemplateDeriv–CustomizD$Optio@n Comp@ ЬDaT€‰  €<licit P.2 Sub u pd†Ќ(serviceID As Integer, quantity Vari€, Cancelˆ) Dim s Sфng, r‚Recordse>Sta!%Long€ebug.Jnt M$e.Ц"A,roPomID‚PР5n`t!cbo7Р^ sAˆSELECT * FROMр tblR Р‘€where [C`]=" &Р" AND @=#cССšat(€!  - 1, "mm-dd-yy")С#;@‘!Set:= CurrentDb.OpernF=(s€F >= 0 AIf NoA.EOF  Then BF=Є!s€ ID '€1can at most be one rBV s iРb C9 and‚4 Сthe kŒeyFB< 1ТCС"Call M€sgBox("€"@was no gue€in this‚", v€bOKOnlyФ5ѓC‚ƒ= CНС€SPIQGBLSUDNVSQFTNRDAMUZK1048465106џџ™ Form_frmFindStayџџяиџџџџHВ@8HAWCYUBAQCABRDJEQSGCKQRPWJED0548465106џџ1&Form_frmServiceListџџкЕ`џџ8KMVYMLCZHJORHELHIJHZHCUTFIMM0648465106џџ5$Form_fsubStayRoomsџџmыxџџ8ZIJLUSKYHQZNBETLVYMIGCUJHEUM1348465106џџgForm_frmRoomsџџџџиџџџџf8XJLCVPIENUQAWDYSDMXNJROQXVCB1;48465203џџѕ$Form_fsubRoomGrid1џџџџЈ‰џџ8RPWEUWFFLFKCZDIVJCTKIQAQDELK1248465106џџљ"Form_fsubStayListџџџџР†џџ8HWIEKODWKEMNTDWJYHQMNOHCKJPL1148465106џџ@modCommonџџџџиџџ8OMKBCEEXHJXSEEXOSIITEFNYHHBC0;48465106џџ*Form_fsubStayServicesџџ№e№Й џџ8RODZFCGFHPGKRDTLGPLOFLBNSOVF0<48465106џџ modMenuesџџЩЇџџ8EMRLTKEDKIEODEUGSHAYHPVRRPCM1<4846520dџџ7$Form_fsubRoomGrid2џџОo 5џџ8UXCFRMNZZFRHGEABTLTQIRVVTSYC0>48465106џџ9,Form_fsubBreakfastListџџџџ8ъ џџ8DSCRTNMODXOUXDXWKKWY_KJWCDIK0?48465106џџйForm_frmStayџџџџPF;џџџџџџpџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџЈ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџРџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџpоЗ№m}oO‘ˆщг§дъIџџџџшZЗžЁСїDЌЮ{fO i}џџџџ\ЖЏ>ƒG‹Н+ л3Хџџџџ…нуњE‹K‚›И?nйŸџџџџЛР6uЉИF™ћрП_Ё0­џџџџЬˆј4ИdI•jЌќТв†Aџџџџ1žHХ2§CЄЕНЪшъњQџџџџxFˆrйLI–*яєшПTmџџџџ)3єBKYAЉzŸi—щЎГџџџџp‰ы„PˆO‚ Лћи@Чхџџџџwъ— vФGЈd7(=џџџџ6\7‘j—F‰Ў2:<ЁCџџџџЗЅѓlKЉечiДk2џџџџИVхŠБhNГ sKHТtџџџџпF‚GC=їIД ЧёD„єэџџџџ€ŠŽџ„bAccess „џb‚„џnameVBAїтWin16С~Win32MacГВVBA6­#hotelsysKПDAOž‚stdole“`VBIDEAџForm_AsciiTransformОX €џ_EvaluateйCommand4_ClickIZErr_Command4_ClickВScreenIPreviousControlХSetFocusёЦDoCmdЦЇFindNextгuExit_Command4_Click?!MsgBox—RErroŠ DescriptionО Transform_Click˜'i`cZaXAsc!uStr—еChrK~Form_InitCalendar)В Form_Load{ txtSimDateЁм modCommonUбsimDate-аMakeCalendar_ClickjљhotelIcalB} Recordsetкц CurrentDbS OpenRecordsetе|ExecuteYЭcTodayŸ7 cCalAhead˜CAddNewaЃUpdateвќForm_frmBreakfastList*ЬcboDate_BeforeUpdatetёCancelё˜sjcboDateƒh QueryDžšK[efs‡&qryBreakfastRooms˜*SQL"е qselServiceAЕ~ qselServiceBЖ~subBreakfastListMЌRequeryЋFormтRecordsetClone8 MoveFirstNBookmarkCcboDate_KeyDown—ЄKeyCodeэ˜Shiftфы acShiftMaskбЏvbKeyUpЫѕ vbKeyDownЯ IsDate2ЂcboDate_NotInListNewDatax_Response—Ќ vbExclamation…ШacDataErrContinueDє cmdOK_ClickИErr_cmdOK_ClickњѕExit_cmdOK_ClickœўForm_frmFindStayаz savedSelStays€,savedSelGuestStaysoG fncStackSQL lIsNullЏФ qselStaysњРqselGuestStaysЈ# fncUnstackSQLБё fncSelStaysЂr arrivalDaten˜include`ЖcAnyžt cBookOrIn‹UcBookedcInl~fncSelGuestStaysw/critЭЮequal^#valнт queryStaylist€# subStayList­№ SourceObjectР CurrentRecord@žmessageŸѕ txtMessageд cmdFind_ClickwъcritDateKˆcmdGuestHistory_ClickN/Guest guestID„\BeepУ showNewStayI˜Stayѕ2 FindFirstM=cmdNewGuest_Clickч†SysCmd—GacSysCmdGetObjectState?acFormЄFormsЈfrmStay&_closeOKOѕ acSaveYesрўOpenFormЗ acFormAdd ‚cmdNewStay_Click­дcmdOpenStay_Clickи№stayID / acFormEditТіcmdReset_Click›AcritNameђ?critAddrњD critPhone І critRoomDateип critIncludeTcritRoomйЁcritStay6€critAddr_ChangeЙcritDate_AfterUpdateФљcritDate_BeforeUpdateуZ CancelEventURUndoУžcritDate_KeyDownл.critInclude_BeforeUpdate#ШcritName_ChangeјВcritPhone_Change8critRoom_AfterUpdate ˜mdriDLookupуFcritRoomDate_AfterUpdate acritStay_BeforeUpdate‡ Form_KeyPressЩ”KeyAscii# vbKeyReturnrs_ Form_Open-вForm_frmServiceListёvForm_BeforeUpdateP-Form_fsubStayRoomsЯЖtxtCount_BeforeUpdateшSParentЎтstateљtxtCountю txtStayIDCцroomIDОуEOFє‰Edit+ personCountЛMoveNextL! setObserve$o uRoomListЋ|uPrice†єSendKeysN Form_DeleteŠѓlaststayп4 RecordCountу{ vbInformationВnvbYesNo vbQuestionЪвvbYesa?DeleteИxuGridbz uFindStayC} Form_frmRoomsH prevFirst<gTopёgWidthвgLeftgHeightA7fncSelRoomStateKчFirstDay=чLastDay’7 qselRoomStateЛ fncSelRoomsіMtypeIDRminRooRUndoGExi–tžCEР*IfУРrs.Clon…Kуb 0L3ТINSERT INT>O\aWhт'"V€ALUES (џe@W€2dEРC*ќ, Кa ,ac†  >)Ѕa6Щ?  Sy€sCmd(acGetObject te, accсs` frmРp Sub&_Current() ' Happens for i nstan“when user moves curup/down€ gж Me.SelH`eightPa€Jnt.gƒ Wpidth ‚Э LŒefЬB+ 1@.Access 2YР cРA@1aE ' DebugТ.>nt "С*„<"; 'RecјordB@/AХE-EndAMQџџџџџаЌ€ўџџџџџџџџџиrU€€€ џџџџџџџџ8(`§џџџџџџџџџџџЙ/$Љ`§џџџџџџџџџџџ(б`§џџџџџџџџџџџa0n€€ rU€€€€~| №ьдАџџџџѕЁзeЩџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(<џџи<џџJ< џџ<џџџџџџџџџџА "@џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ &€џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ (Рџџџџџџџџџџџџџџџџџџџџ џџџџџџŒ *џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ ,@џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ .иџџџџџџџџџџџџџџџџџџџџ џџџџџџŒ „жџџџџџџџџ˜џџџџ% „,џџџџџџџџИ %`„`џџџџџџџџџџџџџџ 4џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџŒ „жџџџџџџџџ0r fu% „,џџџџџџџџPdon'%`„`џџџџџџџџџџ$џџџџˆ€џџџџ@@Риџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ xКф{F пўЪP€ :€ џџџџ€@€H€ џџџџB P’X№€ џџџџB јvx€ џџџџB €|ˆ€ џџџџB `x€ џџџџB €Ўˆ8€ џџџџB @€H€P"`0ˆИРШ и>ј8@ŠH€ џџџџDи  8 H Xh p€ џџџџ € 2 Jи(€ џџџџB 0€8€@"P.xЈm$§cAnyFreeKcAnyRoomš€ qselRoomsNœ fncRoomGridЭ qryRoomGridќeSetGridColumnsУefrmУacDesignжЁacHidden” ControlSource" setSelectionЬ subRoomGrid…Й SelHeight!ŒSelWidth‘ЂSelLeft#$ updateGridНЁsubRoomGrid_Exity… getSelPeriodњЈfirst”zlastbh no_selectionBcboFromїM cDateColumndjuseRoomL­roomsПтGetRowsУŸIIfzžcboDeparture_AfterUpdateЛ` cboDeparture™ txtNightsѓcboDeparture_BeforeUpdateacboDeparture_GotFocusхcboDeparture_KeyDownц cboFrom_AfterUpdateacboFrom_BeforeUpdateьоcboFrom_GotFocusЃvcboFrom_KeyDownТcboType_AfterUpdateЦ cboType€-txtRoomVscboType_BeforeUpdate 8cboType_GotFocusN cmdBook_Click”шcurStayZХ Form_frmStayCBno_stay~[cmdCheckin_ClickМsql1]$sql2^$d[ cTotDatesJёForm_DeactivateЂSelTopmsubRoomGrid_EnterIqtxtNights_AfterUpdate”йtxtNights_GotFocusn1txtRoom_AfterUpdateŸtxtRoom_GotFocus-Form_fsubRoomGrid1;{ Form_Current‚”Form_fsubStayListžšK[ж( Form_DblClick$acEditIЂfrmStaysœžintStayпШcTemp §cOut~РcCancelГEcRepairјb uServicesS fncOpenAsciihФ fncSimDateЄcompressNumberMForm_fsubStayServices*ŸcboDate_GotFocusьЩForm_AfterUpdateђќ txtGrandTotal§Њ txtQuantityР cboServiceIDгНrefresh modMenues#№fncAddServiceLine!vbOKOnlyѕВfncDelServiceLines§fncDelRoomLine41fncRoomManagementЧ fncPrintBreakfastList$ fncCancelStayЃгvbNoЇ%updateRoomListQыfncUndoCheckinєhForm_fsubRoomGrid2<{Form_fsubBreakfastList3updateBreakfastтH serviceIDргquantityŽ BreakfastA/cmdXrefresh_Click„,BreakfastA_BeforeUpdateСQBreakfastB_BeforeUpdateж) BreakfastB0observe’ОobsšН subStayRooms:D firstStayЛ<txtNameo txtAddress1ЪлDMinЈyDMaxŠx txtPaymethodЃчcmdCheckout_Click˜ЗcmdPrintAccount_ClickurcmdPrintConfirm_Click$‘€€џtblStayАИШ2иD h €    А Ра и€ џџџџ ш ј2J@џџџџ р4 modMenues: All the functions called from the menues%Эџџ8Эџџ0–ЖVOn the Stay-screen, just enter the new service data at the bottom of the service list.Ќ $8ЖChecked-in guests only. $$&'"iџџ –@Ж9On the Stay-screen, select the service line and push DEL.Ќ $8ЖChecked-in guests only. $$&'&iџџА–€Ж6On the Stay-screen, select the room line and push DEL.Ќ $8Ж"Booked and checked-in guests only. $$&'(iџџ –РЖThis is a manager function.Ќ $8Ж$You don't have permission to use it.$&'*iџџр–ІЖXAt this point the system would print a list of occupied rooms for the waiter to fill in.Ќ $8Ж)This test version doesn't print anything. $$&',iџџ –@]ђ€]ђ ђР р тЖfrmStay$оЌœЖ!Open the stay you want to cancel. $A&zџџ kџџ˜э ф"ц.ж ж": Д ж": ВœЖ/You can only cancel booked or checked-in stays. $A&zџџ kџџІ Ж%Are you sure you want to cancel stay ж"єЖ?Ќ $8ЖYou cannot revoke it again. Z$& 0›GzjЖ*SELECT * FROM tblRoomState where [stayID]= ж"єЖ;'`э ` L%N., ,!Bє ,B@` ,B@HѓџџP ,B@B  ж): жB2 жB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls Xrefreshiџџ–и]ђ]ђ8ђX р тЖfrmStay$оЌœЖOpen the stay you want to undo. $A&zџџkџџэ ф"ц.ж ж": ДœЖ#You can only undo checked-in stays. $A&zџџЈkџџ Ж*SELECT * FROM tblRoomState where [stayID]= ж"єЖ;'`э ` L%N., ,!Bє ,B@D В ,): ,B@X ,B@Hѓџџш ,B@B В ж): жB2 жB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls Xrefreshiџџ(џџџџ џџџџeЕAttribute VB_Name = "modMenues"  ' 4: All the functions called f(rom2mn  OpB Compare Da@tabase0E€xplicit+HPub FV fncAddServiceLinРe() ЎMsgBox("OnStay-screen, just enternew sU d at!‚ bott`of‚…list." & Chr(10)€"Checked-in gts only.", vbOKЦO€€TEnd†eo8Delo oselecaZne a@push D„ELи`RoomLg—€/Eч.rР l€yБ.Boo@^‚can™*Manag:eР­t™ H2Thˆis €a mТ rЦТЭYYou don't have permissЭ to use i—#‹PrintBreakf№astL€Ѕˆ*ˆ+fA‡€+po@Зystem would p a`/Рd _occupiCрy!2s foУfw„ai"ho fi €єinb_CrСžšK[rd$Dteр verТdoesС „ nyt0hing_f-‚Canc fР{ЁDim curЁ} As Form_fr’mс rsсRecordse(t, тSРng#If SysC md(acGe0tObj@jРte, acс , " $ ")`+0 Th,enˆ@  †pe%Уsр y`@waњn€0o ЅСЬ'apExitH†B`xIЂfУ Set†=bМs!†@„!! Й<> cIn >A€$iиWcaцn‚›$ bуo`BШoѕСsŸoф%!Ѓ…`ЭЅ&AФa%su‹& Ё !БhyID3ВˆP"?lЕ„no`t rev€‡@n agaсWсЕYes„No!:vbNo‚:. №0С+Ѓ0s€?"SELECT * FROM tblCA…ТE wheР[!ID]=ђ";`ъA A:@T= CuФrr дDb.aGцU (s`ƒWhile Ns.EOFFc!rs.Р­et`ъСDMoveNexръWenЦd# Clo№сccKC= c36УCЃq-.up№reБ сGк.  Focu@s ' TopQkЧ‚“8pceiаOAƒPkeysƒS@ KAа ("+{вy}D%xА5' S Rs_rJвuТ^Б1,€(lls Xrefr`esh vn„UШndo2{in_C_Cў _CQD_C_C_C_C_CїЄ‹_CTCu№ я5П*ќ щ5&дp+qL?CПє;CoAжMjAЁ Џ@𐂠@5К Ÿ5Ÿ5eђ Ÿ5ayЁ “@Ÿ5Ÿ5?’`Ÿ5P›5a №2EdчсЉС5rsДА2STѓ-ї.U’2no9#§o9 Ѕ^Џao9o9№Hоyo9o9o9o9)`=o9dУ„@no9k9oџџрџџџџиџџџџCДAttribute VB_Name = "Form_fsubBreakfastL@ist" ДBasД0{2CD39BCC-6133-11D6-@8769-086394B13} |GlobalфSpacIFalse dCtab"lTru Pr@edeclaIdК"Expose_TemplateDeriv–CustomizD$Optio@n C№LдџџџџSГ зe№eџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџџџџџN0{37F963C3-6351-11D6-8769-000086394B13} џџџџР @џџџџџџџџџџџџџџџџџџџџџџџџџџџџ” zРџџџџџџџџџџџџџџџџ€џџџџџџџџ ”iƒ|џџџџџџџџџџ €iƒ~џџџџџџџџџџџџџџ€ ˆ@џџџџџџџџџџџџџџџџџџџџџџџџ”iƒŠџџџџџџџџџџ €iƒŒџџџџџџџџџџџџџџ€ €џџџџџџџџџџџџџџџџџџџџџџџџџџџџ” 2јџџџџџџџџџџџџџџџџРџџџџџџџџ ”iƒ^џџџџџџџџџџџџџџ€`„`џџџџџџџџџџ Rџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџ ”iƒ^џџџџџџџџџџџџџџ€€ўџџџџџџџ€џџXџџџџџџџџ%џџџџp€Рџџџџ@@јџџџџџџџџџџџџџџџџ`џџџџџџџџXџџџџџџџџјџџџџџџџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Кф{F пўЪ7€€€ џџџџ"€ "€ "@€ hh€ ар€ џџџџ" шT№H ` pˆ Ј АРШ€ џџџџ" аи<ш(8@€ џџџџ"HPh€ џџџџ" p€xb€BшB0x АРШаи€ џџџџ" р`шHX`hp€ џџџџ€ џџџџџџџџ€ЭџџxЭџџp–р If IsNull(Me.date) Then%р Me.cboDate = simDateџџџџрb Me.txtRoomID = DFirst("roomid", "tblroomstate", "tblroomstate.stayid=" & Me.Parent.stayID)р End Ifoџџ–@ ~ € | ‚ | „œрO' Don't interfere with dropped down list!– џџ!b$†›G|j | ‚œLџџ џџ!bXЌ џџ(bdџџp џџ!bXЌ џџ(bkџџP B@џџ!kџџ8oџџ0–Р Š$†œџџЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& 'Œр% 0kџџРoџџИ–@ џџ!8"B@poџџ–€]ђр џџ!8": Д›GЖAYou can only record services for guests who are checked in. Undo?'`j џџ!Ќ ›GЖ&The quantity must be at least 1. Undo?'`j џџ!ЌžšK[›GЖ%You must select a service type. Undo?'`j `Ж›G|j ` Z \ $& ^œ џџB@dџџ8З'^kџџ(oџџ –јЖCAre you sure you want to delete this service from the Guest's bill? Z \ $& ^œ џџ!8B@|џџ kџџ˜З'^oџџˆџџџџ€џџџџ•ДAttribute VB_Name = "Form_fsubStayServic es" АBasА0{37F963C3-6351-11D6-8 769-086€394B13} |@GlobalтSpacIFalse dCreataDblTru P€redecla IdЙ"Expo se_TemplateDeriv–Custom izD$Opti€on Comp@Ь DT€‰  €<licit P/3 Sub cbo€e_GotFocus( ) ' If IsNull(Me.d) Tјhen„€ „vsim# txt@RoomIDDFirst("rid", "tdblst..@yid=" &J РPР4ntIDE(End If С€2U6Key Down(РCode As Integer, S№hiftH€A6Р>!C= acBMa0sk A†= vb€Up Or ХСƒK ' €Don't i€rfere with dropp…€xd@& lisРeуNot_СS_CYExitAn ў  Ь%Уj…СŠkЂC- 1‡EП=h+JРIfХDoCmd.CancРelEven;фo€!InL@$(Ne*wРaс5S…ng, Respon`Ї:g8Ш(Dc(чCall MsgB ox("EA4 a" ] asрy-month-yea€Ee.g. 2€5-12-02VvbExР}ma!oЄAfЁGErrBCрinueрA0УМЂžAfterМUpсr †a!€kGrandTotal.Reque ryЖaт Before у1‹_Dim| sч+# aЇЂu Р<> cIn‚р€ДYou can only re@cord sdЕ € guests who с“checkр_in. рUndo? ВСc @Quantit`y < 1ш РZ qEm Ё be at leastќ 1‘ РgЄЦтЉ Ё‚select`?Ad typeŽ syИ""ЃЫpСЃHs,р‚YesNo Z+ QСГ)@vўbрЂу*Ф9СЋn9ф3= уШЁFm_тD@te(Б;A'”"A€‘yр6su‚w@. to dB this…8 fˆrom e G!'s bill?Ђ`ПaЦH.reрfresh!ы)…A|Ёд^ @€H€ џџџџB P’X№€ џџџџB јvx€ џџџџB €|ˆ€ џ№ дАџџџџE зeџџџџЖџџџџџџџџ4џџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(0”џџr> џџџџ< џџ<џџџџџџџџџџШ%€ d GuR%ژBџџџџџџџџџџџџџџЪ˜ДBџџџџџџџџџџџџџџЪ˜(BџџџџџџџџџџџџџџЪ˜PBџџџџџџџџџџџџџџЪ˜ЎBџџ џџџџџџџџџџџџЪ˜‚xBџџ џџџџџџџџџџџџЪ˜Ќ Bџџ џџџџџџџџџџџџЪ˜T€nBџџџџџџџџџџџџџџЪ˜RШdBџџџџџџџџџџџџџџЪ˜d№BџџџџџџџџџџџџџџЪ˜LјBџџџџџџџџџџџџџџЪ˜NџџџџBџџџџџџџџџџџџџџ@џџџџlџџџ џџ  ˜`џџџџџџџџџџџџ x џџџџŒIƒ`џџџџџџџџ џџџџџџ€ и`џџџџџџџџр\џ+џџџџ џџџџŒ џџџџ`џџџџџџџџџџџџ  џџџџ Œiƒ2џџџџџџџџџџџџџџ€`„.џџџџџџџџџџ@„џџџџџџџџ џџ`„0џџџџџџџџџџџџџџxЊ€џАџџ0@џџџџџџџџъ€и(џџџџ@џџџџџџџџъ€B@,џџџџ@џџџџџџџџЪ˜ВhBџџџџџџџџџџџџџџЪ˜ИBџџџџџџџџџџџџџџЪ˜АрBџџ џџџџџџџџџџџџЪ˜€0Bџџ џџџџџџџџџџџџЪ˜фXBџџџџџџџџџџџџџџЪ˜bЈBџџџџџџџџџџџџџџЪ˜ аBџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџАџџџџPјџџџџXxиШџџџџˆ( џџџџр˜hи@И0€Ј№аџџџџƒ@џџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџB@ўџџџџџ\џџџ џџ џџџџј8џџџџˆџџџџџџџџџџџџиџџџџјџџџџџџџџџџџџџџџџџџџџА8џџџџџџџџџџџџџџџџџџџџџџџџџџџџ&Кф{FžšK[ *\R1*#91$*\Rffff*1148465106пўЪ)€ € џџџџ€€ „(€8€@€ џџџџ€ ‚H„`а„R0„>ˆ€ џџџџ„TШ€ x „:˜„Bи„H € џџџџ„4h€ џџџџB   ЈИ€ џџџџB РШа€ џџџџB  и€р€шј(.@px€џџџџр Module modCommonЭџџ`ЭџџX] ЮЌђˆmS] ђА] ђир{ The following constants also appear in cboBoxes as literals. The named constants cannot be used there without programming.'Open]$Ќђ@ЌђЌђhЌђЌђ(ЌђИрQ Stay states and Room states]$ЌђPЌђрр%5 Special values for include stays. Sequence importantus not]$ЌђЌђxр(! Special values for include roomsle]$Ќђ0рA Column number (1...) for first RoomGrid column containing a datet.рr Must be 6 for Access 2000 for some reason. Maybe because there are 2 hidden columns that Access 2000 counts as 1.]$Ќђ р( Total number of date colums in RoomGrid ']$ЌnђXр/ Last date in calendar table is today+cCalAheadЬ]$Ќdђ€р6 Simulated today is first date in calendar plus cToday]$ЌђШЌђЈЌђ№ЌђаЌђј–8 ` B@ьiџџ`–˜ B'iџџH–и]ђ8]ђPђh,Ќ'.Ж' . 2 єB .Ќ '. 2 .Ќ$њ'0 0Ж0 0Ж9›G  0'jѓџџШ 'iџџИџџџџАџџџџњГAttribute VB_Name = "modCommon" ' Module P O@ption ”pare Database0Explicit Pub frmStays(3) €As Form6intIntegersim[ez' The following constants also appear in cb oBoxes  liter.< nчd8cannot be us@ed the€iwithout p€rogramm€5 .†KC: cTemp˜0, cBˆook€= 1TIn€ 2O = 3€Cance l 4RepaФir ' ‚}atUnd Rooœm ƒ72Or‚.Q9Any€!7!pecial va$lu#fo€clude$ys. SequeA i№mpor˜ .@‚= 7€(@Freеƒ6лr€+sfDzƒ„FkColumB5€number (1...)€qr firstqB=Grie €utainAxa daЖtР–€Ђu@ €i6Access 2H000Тso€Џreason. M„ay becaРt„tЊ2 hidde€‡'s€at ‰couB“s 1Љ|ot6s€]8Р4˜Tot]„4ofТ){Р•0sA SС4MZC€alAhead@ф36WLaР59Т­рalendРАРдРнi€(oday+cл… TР1РA€“№imulРKРБТРУCXЮplusРАЁ ю7ub1ЂYuFind‚T= `ZuSeИrvi / `YuLiр= 8, XuPr`6h Func†fncOpenAscii@(s) D`oCmd.сС‚ ]€IEР`eдS#ƒ(/d $`sc A§compr`HN)‚R(aсŒSЂngСР Dim i!†’!b`cЧ iр P0 bР"РЅWhia6 < Len(aЄi + 1c€Mid(a, i, 1„If c >РЏ0" A c ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ6ЂџџџџџџN0{1805097F-5866-11D6-8769-000086394B13} џџџџˆ њ``џџџџџџџџџџџџ @џџџџœ ”iƒ^џџџџџџџџџџџџџџ€ &џџџџ`џџџџџџџџџџџџ  џџџџ  ”iƒ(џџџџџџџџџџџџџџ€stay`„.џџџџџџџџџџаЌ€ўџџџџџџџџџиџџџџџџџџ%џџџџ№џџџџ`џџџџƒўџџџџџџџHџџџџџџџџџџџџџџ %‚ јџџџџўџџџxџџўџџџџџџџџџџџ %џџџџ˜џџџџџџџџиџџџџџџџџ`џџџџџџџџиџџџџџџџџџџџџP „ЄœџџџџџџџџџџџџџџџџџџџџџџКф{F $*\Rffff*1248465106п‚4џџџџ8p<r@tDvHxLzP|T€X~\`†dŽhŠlŒpˆt„xўЪ€€€ џџџџ"  D(€ 8p>Јшј€ џџџџ"  €8џџџџHЭџџxЭџџp– џџ!єЌ œ р тЖfrmStay$оЌ›G тЖfrmStay ъ B@Bjgridр1 Only one Stay window may be open in this versionЖfrmStayааЖstayID= џџ!єX  ќаЌ B@ьdF B@дkџџoџџј–`]ђР ( *›G .Aњje WHERoџџРџџџџИџџџџ;ВAttribute VB_Name = "Form_fsubStayList" "  Bas 0{1805097F-5866-11D6-8769-086394B13} |Glob„alкSpacI False dCr@eatablTru PredeШclaIdЕ"РExpose_Template Deriv–CuРstomizD$Option CШomp@ DT€‰  € Р0 Then SysCmd(acGetObjectиte, ac4, "frBmс") <…# ФDo.ClСSaveYes' Only one A window may be open in thisр vers@FЧCNOР$G$, A"9=" & CS(tr(Ц=)A"EdЄit -1E@‰B:0BeepDn€d If EР#Yв\KeyŒss‚(AsciiK]№Dim ‰Рa† = vbReturnd CallLti@p†!769-000086394B13}џџџџ <@џџДф8џџџџЛззeџџџџŠЖџџџџџџџџџџџџ_ŽћšKH‡43›“)w  Sub&_Current() ' Happens for instan“when user moves curup/down‰€ gж Me.SelHeАighrU€€€ џџџџџџџџ˜,a`џџџџџџџџџџбё//,Ё`‘џџџџџџџџџџ !&&,с`•џџџџџџџџџџбё//0!` ™џџџџџџџџџџ9бё0//$a`џџџџџџџџџџ$Ё`Ёџџџџџџџџџџ8 `ЅџџџџџџџџџџIayџџџџ//##0I` Љџџџџџџ `  џџџџџџџџqџџџџ@l4‰џџџџ@t8Ёџџџџ@|<Йџџџџ@„@nxpose_Template Deriv–tP€J0nt.gƒ Wi8dth ‚Э LeFfЬB+ 1@.A€ccess 2Р, cРA@1aE ' Debug.a>nt "С*„<" ; 'Reco|rdB@/AХE-E ndAMQ№4дџџџџ;зeкЕџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџx|/фhэ1Л2f зeџџџџŠЖџџџџџџџџ”џџДb6Ls%MМЉђwZЈДя뉋\ж‡i†9K-ЁдšLž^D]Q:сшџџџџџџџџџџџџx-ЁдšLž^D]Q:сшДb6Ls%MМЉђwZЈДяџџMEџџџџџџџџџџпџџŒџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€[LџџџџS џџџџSџџџџ(LџџJ<џџи>Ђџџџџ”џџџџLџџџџLџџџџLџџџџš џџџџ”џџџџLџџџџLџџџџџџџџ”џџџџ”џџџџLџџџџLџџџџLџџџџџџџџLџџџџLџџџџџџџџџџџџLџџџџLџџџџ”џџџџLџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<џџ<”џџ<˜џџ<œџџ< џџ<Єџџ<Јџџ<Ќџџ<Аџџ<Дџџ<Иџџ<Мџџ<Рџџ<Фџџ<Шџџ<Ьџџ<аџџ<дџџ<иџџ<мџџ<рџџ<фџџ<шџџ<ьџџ<№џџ<єџџ<јџџ<ќџџ<џџџџџџN0{168913DB-5C8B-11D6-8769-000086394B13} џџџџˆ*j€l 8tџџ@џџџџџџџџj€pџџџџ@„џџ@џџџџџџџџƒўџџџџџџџ0џџџџџџџџџџџџџџ r`џџџџџџџџИœўkИџџџџŒ”iƒtџџџџ џџ џџи€iƒvџџџџџџ џџџџџџ€`„`џџџџxџџџџџ zЈ`џџџџџџџџ№ џkPџџџџ”iƒ|џџџџ џџџџp€iƒ~џџџџџџџџџџџџ€`„`џџџџxџџџџџ †@`џџџџџџџџ€œўkшџџџџ” ”iƒtџџџџ џџ џџ€јiƒvџџџџџџ џџџџџџ€`„`џџџџxџџџџџ Šј`џџџџџџџџИаўk€џџџџ˜'”iƒŒџџџџ џџџџ €iƒtџџџџџџ џџР€iƒvџџџџџџ џџџџџџ€`„.џџџџzџџџџџ ”8`џџџџџџџџ(tџkџџџџџџџџœ8” žx`џџџџџџџџџџџџ џџџџџџџџ @”,Ђ8`џџџџџџџџџџџџ И џџЄ FМiƒЄџџџџџџџџ џџи€iƒІџџџџџџџџ џџј€iƒЦџџџџџџџџ џџ€omIDiƒўџџџџџџџџџ џџџџџџ type,Ў@`џџџџџџџџџџџџ x џџЈRМiƒиџџџџџџџџџџ˜€ate)iƒ:џџџџџџџџџџИ€'`iƒўџџџџџџџџџ џџџџџџ (`„Аџџџџџџџџ џџM C@„џџџџџџџџ џџall `„0џџџџџџџџџџd ca „,џџџџџџџџ8 per % Ц `џџџџџџџџžšK[ј$<џk€џџџџЌq”iƒ`џџџџ џџџџџџџџ€.pri Жр `џџџџџџџџџџџџ џџџџџџџџА w” М@ `џџџџџџџџџџџџ џџџџД ”iƒ^џџџџџџџџџџџџџџ€mm-d О€ `џџџџџџџџџџџџ џџџџџџџџИ Š” Р `џџџџџџџџџџџџ РџџџџМ Ž”iƒ|џџџџџџџџџџр€а iƒ~џџџџџџџџџџџџџџ€Ќ Т@ `џџџџџџџџ8)4џkџџџџџџџџР ›” Ф `џџџџџџџџЈ'јўk€џџџџФ Ё”iƒ^џџџџ џџџџџџџџ€col Цр`џџџџџџџџ|џkџџџџџџџџШЊ” Ш``џџџџџџџџ`&4џk џџџџЬ Ў”iƒ|џџџџ џџџџ@€џџџџiƒ~џџџџџџџџџџџџ€џџ Ъ `џџџџџџџџ€!HџkџџџџџџџџаЛ” а `џџџџџџџџџџџџ рџџџџдР”iƒ^џџџџџџџџџџџџџџ€ в@ `џџџџџџџџШ |џkџџџџџџџџиЧ” д  `џџџџџџџџџџџџ џџџџџџџџмЫ” „жџџџџџџ.guestIDъisubStayServicesb AllowAdditionsIДAllowDeletions*ч AllowEditsїиOpenArgsмB Form_Unload•Йst(_€€џtblGuest.guestID}rDetail2Label3, cmdNewGuest}‰Label12BLabel15ELabel14DLabel17GLabel19IcmdResetвп cmdOpenStayn cmdNewStayћd Include_LabelELabel29nLabel31‹cmdGuestHistoryr№ 0P >rX ˜ИР6Ш р ш )№ BX,`˜€ џџџџ"  ЈИ а р №€ џџџџ"€ f€ X€3и3№3:9 `€ џџџџ"h p €Z € џџџџ" €€  38HX p€Z Ј € џџџџ"   € џџџџ" ( € 0 € ЊР 3p!3ˆ!3 !:9И!ј!€ џџџџ"","(+" @"P"WX"x"€"€ џџџџ"ˆ""˜"€ џџџџ"  " Ј"И"Р"€ џџџџ" Ш"а"и"€ џџџџџџџџш"р Form frmRooms+{enЭџџ`ЭџџX]ђа ] ђј ђђ ђ(рn gLeft uses the correct column number, not the +1 number erroneously used by Access2000. The code compensates.џџџџ–x]ђјр* Selects RoomStates for the desired periodЖLSELECT tblRoomState.* FROM tblRoomState WHERE ((tblRoomState.date) Between #'` ` tЖ mm-dd-yyyy$ЌЖ# and # vЖ mm-dd-yyyy$ЌЖ#);'` ` L!d"x(hoџџ(–]ђрw Selects RoomStates of the desired type. If typeID shows any room, then minRoom may be >0 meaning from this room and onЖWSELECT tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2, '` `Ж+Count(qselRoomState.state) AS CountOfstate '` "žšK[`ЖNFROM tblRoom LEFT JOIN qselRoomState ON tblRoom.roomID = qselRoomState.roomID '` | € ›G `ЖWHERE tblRoom.type =  |Ж0$Ќ'`j ~Ќ ›G `ЖWHERE tblRoom.roomID >=  ~Ж0$Ќ'`j `ЖY GROUP BY tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2 '` | ‚ ›G `Ж%HAVING (Count(qselRoomState.state)=0)'`j `Ж;'` ` L!d"„(hoџџ(–Ј]ђ(рM Cartesian product of all rooms of interest and calendar for the shown periodЖ`SELECT qselRooms.roomID, qselRooms.bedCount, qselRooms.type, qselRooms.price1, qselRooms.price2,'` `ЖPtblCalendar.date FROM qselRooms, tblCalendar WHERE ((tblCalendar.date) Between #'` ` tЖ mm-dd-yyyy$ЌЖ# and # vЖ mm-dd-yyyy$ЌЖ#);'` ` L!d"ˆ(hoџџ€–@]ђрр: Sets column headings for all shown dates in crosstab fsub Œ Žааа  B@ьџ .ўЌЌ’р: Avoid control name conflicts by renaming them to col1 ...рF The dirty constant 16 is the item number of the last non-column item.Жcol .Ж0$Ќ .Ќ Œ$ф#(џ .ўШџ .ўЌЌ’р? Now give the columns the right control name and control source t . Жdd-mm$Ќ .Ќ Œ$ф#(’ t . Жdd-mm$Ќ .Ќ Œ$ф#(џ .ўШ т Œ ъ B@Boџџ –јр@ Resets current grid selction to value saved at subRoomGrid_Exit pЌ œр) During open, the grid is not yet created p џџ!–!r(˜ l џџ!–!r(š nЌ џџ!–!r(œр, Access 2000 compensationkџџoџџ–8ЌA@ р) Saves selection before redoing the query џџ!–!Т џџ!–(ТA@”oџџ –xЗ'ЂЩЈр frmRooms may not be open џџ!–!r!˜Ќ›GšЈj џџ!ЊXЌ џџ!–!r!œ Ќ Ќ 'ЄрR Access 200 compensation Є џџ!–!r!š Ќ 'ІЗ'ЂzџџШЃЈР Ц›GЖ$You must select a room and a period.Ќ $8Ж%Select it from the Find Rooms window. ŽA&jiџџ@–8]ђир Matrix to hold entire room grid]ђ№ђ]ђ З'Ў џџ!–!r!tB@v j p џџ!–!r!t%В'Аџ ў j j p Ќ ’џ 0ў n n l Ќ ’р' Debug.Print rooms(c, r - 1) 0Ќ Ќ $А$ œр4M Include the hidden guestID and type column that don't count in the selectionЖ$The room is not free in that period. ŽA&zџџ€kџџxџ 0ўШџ ўШэЖ tblRoomState L%N.,џ ў j j p Ќ ’џ 0ў n n l Ќ ’ ,BV и ,)єЌ Ќ $А ,)@р(! RoomID in hidden column 1 (1...) џџ!ЊXЌ 0 Ќ ,)ZЌ Ќ $АЌ ЌЌ$Д ,)Fр<; Rooms with more than one bed have personCount=2 as default : ,): ,B@Xџ 0ўШџ ўШЗ'Ўiџџ –@ЖfrmMessageRoom џџ!–(Т џџ!–B@p ` џџ!–!r)ШoџџH–  џџ!ИX џџ(И џџ!ИX џџ!ЊXœЖ%Departure must be after the from-date ŽA& џџ!ЊXЌ џџ(ИkџџИ џџ!ИX џџ!ЊX џџ(КAЪoџџˆ–р џџ!И$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& B@ џџB@ џџB@kџџ№oџџш–@A”oџџа–€ ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!И$†›G|j | ‚œ џџ!ИX џџ!ЊXЌ ›G џџ!ИXЌ џџ(Иjdџџ џџ!ИXЌ џџ(Иkџџр B@ џџ!ИX џџ!ЊX џџ(КkџџЈ oџџ  – џџ!ЊX џџ(Њ џџ!ЊX џџ!К џџ(ИA#žšK[ЪoџџP –@ џџ!Њ$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& B@ џџB@ џџB@kџџИ oџџА – A”oџџ˜ –р ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!Њ$†›G|j | ‚œ џџ!ЊXЌ џџ(Њdџџ№ џџ!ЊXЌ џџ(Њkџџа џџ!ЊX џџ!К џџ(И B@kџџ˜ oџџ –` џџ!Ь ‚›GЗ џџ(ЮjAЪoџџX –  џџ!Њ$†›G|jЖ+Enter date as day-month-year, e.g. 25-12-02 ŽA& џџB@ B@oџџа – A”oџџИ –@ ]ђ€ A”Щкр There may not be an open stayэ ф"ц.ж ж": ДœІ ЖDYou cannot book additional rooms when the guest has been checked in.Ќ $8Ж@You can check him into the room - or make a new booking for him. ŽA&|џџ  kџџ˜ жBд|џџ€ Ѓкx ЖWhich stay to check in?Ќ $8Ж'Open a stay from the Find Guest window. \A&oџџ –  ]ђр A”Щкр There may not be an open stayэ ф"ц.ж ж": ВœЖ The guest is not checked in yet.Ќ $8Ж Use check-in in the Stay window. ŽA&|џџHkџџ@ жBм|џџ(Ѓк ЖWhich stay to check in?Ќ $8Ж'Open a stay from the Find Guest window. \A&oџџИ– ]ђ@ ђX ђp ]ђˆ ]ђ  џџ!Њ$† џџ!И$†›G|jрo Date not valid, focus not changeable. Since this cmd is the default, it cannot be canceled, so it has to checkр Define period of interest: џџ!Њ џџ!ИXЌ Arр Define room type of interest џџ!ЮЌ œ ‚ џџ!ЮAzdF џџ!ЬЌAzkџџ р Define period to be shown џџ!ЊXЌ џџ!ЊX ф Ќ A† h џџ!ЊX џџ!–!ТЖfrmMessageRoomœр& Me.subRoomGrid.Requery ' Doesn't work џџ!–!Т џџ!–(ТdF џџ!ЊX'h џџ!–!ТЖ fsubRoomGrid1œЖ fsubRoomGrid2 џџ!ЊXЌ џџ!ЊX ф Ќ AŠЖ fsubRoomGrid2 џџ!–(ТdFЖ fsubRoomGrid1 џџ!ЊXЌ џџ!ЊX ф Ќ AŠЖ fsubRoomGrid1 џџ!–(Тkџџ@kџџ8 џџ!–!r!ФЌ œЌ'jЌ'p џџ!К'l ЌЌ 'n џџ!–B@р . subRoomGrid_Enter will set the grid selectiondFЖNo rooms match what you ask forA@Цkџџhoџџ`–И @!B џџ(Њ @!BЌ џџ(ИЌ џџ(К ‚ џџ(ЬЗ џџ(ЮAЪoџџ№–ј р` When the focus passes from the subform to another main form, the rectangular selection is lost.рR No exit event occurs, but this event proc saves the selection for later resetting џџ!–!r!˜'p џџ!–!r!š'l џџ!–!r!ш'j џџ!–!r!œЌ 'nр, Access 2000 compensationoџџ˜–8 ‚ џџ(ЬAЪр Sets gHeight, etc. џџ!ЊB@рF Access removes the selection area without warning, but this resets itoџџј–x ]ђи р Debug.Print "frmOpen"эЖ tblCalendar L%N., ,"Z R @(B ,B@B @!B џџ(Њ @!BЌ џџ(ИЌ'pрK Prevents premature setting of grid selection when first control gets focusјoџџ№–ј A”oџџи–8 р‰ When the focus is passed to another control on the form, the rectangular selection is lost. This event proc saves it for later resettingрЃ Debug.Print "subExit"; Tab; Me.subRoomGrid.Form.SelTop; Tab; Me.subRoomGrid.Form.SelHeight; Tab; Me.subRoomGrid.Form.SelLeft; Tab; Me.subRoomGrid.Form.SelWidth џџ!–!r!˜'p џџ!–!r!š'l џџ!–!r!ш'j џџ!–!r!œЌ 'nр, Access 2000 compensationoџџ–˜ џџ!КЌ œЖAt least one night, please Ž$žšK[A&Ќ џџ(КkџџЈ џџ!ЊX џџ!К џџ(ИAЪoџџx–и A”oџџ`– ‚ џџ(ЬAЪoџџ8–X A”oџџ џџџџџџџџЫЗAttribute VB_Name = "Form_frmRoo ms" Bas0{168913DB-5C8B-11D6-8 769-086€394B13} |@GlobalвSpac’False dCreataDblTru P€redecla IdБ"Expo se_TemplateDeriv–CustomLizD$'  … Option Compy€I D]“ Flicit Dim prevFiРrst As€nPub gTop Long, @gWidthˆL ef‚Heig‚h ' g‚uses the correct€lumn number, not+1 erroneously @d by €Access2Рr(. TdAmpHens@Ns.>Sub fncSeRlСŠSt(‚6Da@s Variant, LasЊtЫ)CsС7SЁœngA0@@,s † s for‚+de$si| pРlod( sЋSE€LECT tb!€.* FROMЪ WHERE ( ( d€,) Be€tween #€Ћ‘Хs &Bzat†4, "mm-dd$-y")"#№ andР  „:б );ФCurrentDb.QueryDefs!qBsHQ.SQLР6s8 E€€YO[s(@typeIDPIntegСvmingNШцYofЪ, . I€Ѓ showЂs€y rР‚,an Х mР=be >0 meani$ngРcom`isSТ‚$on–6.a ID  ƒ8.bedClou!GЄ5.счp rice1ь2`.ЋG с7"‚(K+sСT0) ASv@ Of L?" H LEFT JOIN ёj ONeLD€6Ћ #Ѕ ч)< cAn yFreeСkn пAYBУTЩ` "чK!ёA%"0"`;ЁU€ 1и> 0к Є> М' „ 'F І GROрUP BYьG/_5Q5"ЂWр"HAV ING (w9=0>)­7?m`лЙlGridџ™cœѓlCartр–an Оodu#€БРlallЂbs e€i@wre€Ссˆc€alendar†žяЁn`Tž%Msцg'Ч2ŸgchчЅh2,нѕа(CЄ .SгUfТ џyVJoVU&uoVoVц#h0oVyy$YoViV р2, 1N)Ф“Р]moр€than рs beРd have =2 as depfaulфvK$ ‘=УЃ’э.UpdЧcUCч‰TruР‰.Ѓriv!$Sub m€essage(т’2SРšngф)ЬˆSo€urceObjГ€= "frmMc С3"ЃlRequeryrš!txіt„YscИ ТЗˆр7Departure_After§C!(GIbH?FЄч‹)CЧ Р%јCV+Х­ї ƒ@'NЖB€В \G.`‚cmdсъ_C фk_/A/Bef\d/Cancel_(мЧ+уЖ“и)E xrpQR2ay-month-year, e.g. 2€5-12-02oВtЁDoCmd.9ѓ EvАQч€Un do TFocu_р'СeqЏ( љ_јGot’u(r`}#Œвdo PkKey Down(pCoplР‰Dƒ, Shi€uG“= ac’Mask An4d f= ’ Up№ Or ЕDёіs†DђpyerfeLwi LdroppХLd liE†!ѓ–yreTnђTL л dп9Р')?@Wю,с€S€€Џ4teяд_8>€†зEц–Ё1џпвv9QQI{(џЦ)Џ;\jОS •Пqт€Ў›RaCOR aЁбќQ!d%|mў) P& S EE€mЗ ‘/_ПDПD Ÿ&џ•|oD6šoDoDoD‡Фя1OIoDeУ@џVDРІD05ЯCЯЂЬЯCЯCЯCey2HЯCѓ€IЯC' ЯCЯCЯC`НџШC(s<C0 CCЃ+џ‘_+P+o?ЦБпzЃџЯ>КГЗ€O„O311w?&b _> гF›p 3ѓ <Р> cAnyšfRѓ ;ђ= еџ;Пœpeџ;П€вIs‹3Зm) Then Exit Sub Call MsgBox("Enter d@ate asy-month-year, e.g. 25-12-02", vbExclamation)œMe.UndoDoCmd.C%žšK[ancelEvent End{ PriviŠ cboType_GotF`ocus(Ns€etSelecfAmdBook_ Click>Dim curStay As Forрm_frmƒN- Orror GoTo no_ s'œre mA%not bn8 opІ'SeJt†7=7s!Š7If…!€Б= cIn‚Щƒ ЧYou0 can9€m addi‚al r@ooms wчthe guest$ hкbe€Jchecked in." & ChrP(10)@_G"%D  h€Kinto A - РAmak; new b€ ing іf€@ .T€A1‹˜С|œIfC]„e.cЩl7УG_:Ш …ЉWhаich ^ ,У/Hin?‹:"OСga!ƒ fromB6Fi• GBKw€owƒ1ŽQACБUЈmdCAUдinϘEϘ І˜AХ?€‚ўC)ЮL@His‡`^РXЦG yetLH"UsecF-inџ LТ*Ђl */ƒџBХcсBџj-у_C ˜_C `_C_C‰—mdСJыBs, Psql1Ђ2SЄtr g с’dVD€ŸУiСI`Џg,erc`…N(IZsЁ( Њ ЄF€X) AXЪDepa@rture)М' Aт:valid,x Ќ=angeable. SioРД€9`@рr Р!default, /`ЦE‘Р?BКe` so!%q efine perio№d of@E€ЫР”)zhfnc@ЛR€™ Htтe, CHgР’ю1„Уf Т•tрЧЩ )€'txta > 0ё­Їs(cAn2ya, чф El|se„fhIфи,ќ 0eЁ5dŸm" & Щрshownƒ‚Ѓ СсGrid(I Ѓ? - @JЯ+ cTдot&s$2€Ц€prevFirРУ=*ѓб$p subE.SourceObjw <> "PlMessagje1"'љR€equery рoesn't wxorkѓqяч=џЭЩ#\я №Х2GЇ5y"f8 1MіP~‘Columјns(Z1‘Џb<15П П @3Ё2~"WМб2%_ ї1яp|_ _ _ q& qї_ _ T 1Y 82Й‚?AAœ.CurrАЄR ecord/= g(Topрq1ggH eightLWiИdth0P №ANЂs8LefcA5Бу + HЭe“ЋЫ`/ˆ$_Еwi@Ж`ЌхВrg= s­‘Œ‚mу6 ("NoЄžPЖ0what yб`Ёask˜"lFЯ‹хбЖ ]Re№'jф„2PmodComсрО.sim1ЃPџ0цWpЌfР–џФ#сН0хUжQEс Nullc2+0 WuoПpУbНDeaGРССФП' WeБfБФ passes 6 №0Ќ№ o aeАЕh ЯmaАŒA, "r Oqular—!qlost. Ј ' peqдeaЭ oc ­but№ scproc xsavРБt6‘ Ђlрr rat‚я!—*Px$.’/ r“,Эcg,ПelтЄѓ31Om.@РdD/rвA0.Acc0* 2000 ctom Жsbр‰Lјoad!з'o!Аџ30Ls єАшtc?pwбl  68є remoяarea witho№wadrn№, Ц2sяpЯ Щ ёХ(Уэј›9љžrs13J€7!#Р @Debug.€яnоtbu!„Pр @0z1уMDb.б("tbl€endaŽre?N;`4rs!с;#РJ day“rs.ВClose Me.cboFrom = modCommon.@simDat ŒDeparture!  + 1 gH eightH0 ' Prevents premazsetting of grid selection when first control ge;focus End Sub € Privž subRoomGK_Enter()‰Call]tS`#Bxit(Cancel As I€(ger)' WOthe H i€jassed to an:o€ r\gƒrm, rrangpulary€!€Хtp. Th‚••oc saves Dit€5r l€urˆ re 'н@Debug.…n(t "€‚E€\";Р Tab; ыˆ‹@.Form.€ƒTopoлLef‚t[Widthƒџ”$C €Žд Щ€2? D+з B- 1@ЊAccess 2000qmp0ensaAЅtx„tNAКs_Af@˜Upd@iХžIf`щ† <РT€C%AoBЇMsgBox(€"At leaРН one nA, pAe", vbрExcla€ЯЩФЖ7AI=ХпAЩIfЏУ@ї юCAѕ(У}~)w цуbcmdFind_ClickП _GoќtFuпo-x !xё(#TypЁŽcAn~yŸL„ _‰Œ–x]ђјр* Selects RoomStates for the desired periodЖLSELECT tblRoomState.* FROM tblRoomState WHERE ((tblRoomState.date) Between #'` ` tЖ mm-dd-yyyy$ЌЖ# and # vЖ mm-dd-yyyy$ЌЖ#);'` ` L!d"x(hoџџ(–]ђрw Selects RoomStates of the desired type. If typeID shows any room, then minRoom may be >0 meaning from this room and onЖWSELECT tblRoo№$дџџџџ,зemыџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџJџџN0{D49D3485-59EA-11D6-8769-000086394B13} џџџџ˜ 6˜џџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€ „,џџџџџџџџx %`„`џџџџџџџџџџ€ Rџџџџџџџџџџџџџџџџџџџџиџџџџџџџџ""”iƒ^џџџџџџџџџџџџџџ€`„Tџџџџџџџџџџte W „,џџџџџџџџ(8! %`„`џџџџџџџџџџ!@€ўџџџџџџџpџџHџџџџџџџџ%џџџџ€џџџџ˜џџџџџџџџhџџџџџџџџHџџџџџџџџ˜џџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€Кф{F пўЪD€€€ џџ&žšK[џџ" €€ (8H jX Ш и ршf№X p €    АР Ши6ј:0€ џџџџpVxа иш№€ џџџџ" ј€€€(28€ .p„ (@ 6Pˆ H и ш ј  € џџџџ0V8˜ € џџџџ&Ј6аDP€ џџџџ€ џџџџџџџџ`ЭџџxЭџџp–]ђ`]ђ€ џџ!8":ъ ДK ВKT џџ!<Ќ œЖ)the number of persons must be at least 1.Ќ $8Ж You may delete the line instead. ŽA&L!d џџB@œЗ'^|џџkџџЖ*SELECT * FROM tblRoomState WHERE [stayID]= џџ!8!>Ж AND [roomID]= џџ!@Ж;'`э ` L%N., ,!Bє ,B@DИџџџџ џџ!< ,)F ,B@XКџџџџ ,B@HШѓџџ8 ,B@Bџџ џџ L N  џџ!8B@Jџџџџ џџ!8B@р! To make frmStay receive the keysЖ +{enter}%xA@Pр  Updates the record, refreshesSџџˆЖGYou can only release rooms for a guest who has booked or is checked in. ŽA&З'^ џџB@nџџoџџ–˜]ђј]ђ]ђ0 џџ!8":ъ ДK ВKT @!BЌ 'Tр) Free the rooms from todayр' Delete any remaining days for the roomІ Ж*SELECT * FROM tblRoomState WHERE [stayID]= џџ!8!>Ж AND [roomID]= џџ!@Ж AND date> TЖ;'`э ` L%N., ,!VЌœЖ'There are no remaining days to release. XA&dџџp ,!VЖ! days will be released. Continue? Z \ $& ^œ ,!Bє ,B@` ,B@Hѓџџ№kџџшkџџр ,B@BSџџШЖGYou can only release rooms for a guest who has booked or is checked in. ŽA&З'^|џџ`nџџX b d L N  џџ!8B@J џџ!8B@р! To make frmStay receive the keysЖ +{enter}%xA@Pр( Saves the guest and the stay, refreshesoџџЈџџџџ џџџџMЕAttribute VB_Name = "Form_fsubStayRooms"D ЄBasЄ0{D49D3485-59EA-11D6-8769-086394B13} |GlobalмSpacAIFalse dC€reatablTru PredeclaIdЖ"Expose_Templat@eDeriv–C€ustomizD$Option Comp@ DT€‰  €с…І&ќ "П€Д€@Д n#„Ѕz60НД€Иr Б`no;€W*&t!ТYƒSInџ№,NW›1С БbC`ќа йГwi€bP`rР(аhd.rntinue?т]YesNoД +€^QБ3t) Jмvbp ! /PbџL№"лUр?MХџЛMQa6‰b§рјO#џЯD№xXsЯD”ЯDЯDЯDџOrЂ ЯDb{pЁ еDс‡У ЗXъ[GridРрuFindтX`\/]я-я\я\ „kР[ЃЏ\aЅ\Saveƒ\ЃVa?|Ё>LJ]b ƒQ n the guest has been checked in.Ќ $8Ж@You can check him into the room - or make a new booking for him. ŽA&|џџ  kџџ˜ жBд|85E-5A90-11D6-8769-0'žšK[00086394B13} џџџџЈ 2џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€€ўџџџџџџџˆџџ`џџџџџџџџ%џџџџhџџџџџџџџˆџџџџџџџџ`џџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜Кф{F пўЪ€€€ џџџџ" € 8џџџџHЭџџxЭџџp–рOn Error Resume Nextžџџџџoџџ@џџџџ8џџџџ=БAttribute VB_Name = "Form_frmServiceListˆ" ЈBasЈ0{5589E85E-5A90-11D6-8769-08639 4B13} |GlobalоSpa‚cIFalse dCreatablTru Pre declaIdЗ"Expose_Templa€teDeriv–CustomizD$Option Comp@ D3T€‰ rU€€€ џџџџџџџџЌ$`дџџџџџџџџџџ$A`иџџџџџџџџџџ,`мџџџџџџџџџџAa/&0С €Ђџџџџ”џџџџLџџџџLџџџџLџџџџš џџџџ”џџџџLџџџџLџџџџџџџџLџџџџLџџџџLџџџџLџџџџт@џd2§m45bЅg[љ§˜`тœРРРпDetailўm47UC`bL cмjМм txtMessage§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ{ХЈI]ж‡i†9K˜ХDetailmХtxtMessageЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–02=Bb cЎe ghМiТjЏ2kА РРРЮлМне<т@чArialџd2§hbЅcgh€ф MS Sans Serif§m45bЅg[љ§˜`œBlob џџџџџџџџџџџџЖƒPropData,.џџџџНTypeInfoџџџџџџџџџџџџОy4'71`6~5CХp0Ж‰ѓхЦ€пDetailџm7U`6aTb cтмaўd5UaTb c№мLabel1нIn:§m7U`6ab cRkмbўd5Uab c№мLabel3нOut:§h1U`Гab>c_iм Transformн Transformп[Event Procedure]эH€€€€€€€€€€€€РРРџРРРџџџРРРџџџџџё Find Next§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџЬšљуsNж‡i†9K˜ХDetailmХad ХLabel1mХbd ХLabel3h ХTransformЫЫЫЫЫЫЫBlob џџџџџџџџџџџџРјPropData02џџџџЬTypeInfoџџџџџџџџџџџџЭ~5џџџџџџџџ5`6~5CХ0ЊmХѓхЦ– 0239=Babc„ e ghяiŸjш&kŸ$ РРРЮщ1вv=т@нBreakfast listч Arialћ"[Event Procedure]џd2§hbЅcgh€фMS Sans Serif§o2eЅj[љ§p5bЅcЅ§˜`œ€п Detailџp3U`qa6b› cl м subBreakfastListн,Form.fsubBreakfastList§o5зb c6dтenfтn€ €М$"";"ddddd";"8";"8"мcboDateоTable/QueryпqryCalendarр567ф"[Event Procedure]ы"[Event Procedure]і"[Event Procedure]њdd/mm/yyўd5]`xaсbбcсœ€ž€мDate_Labelн Date:§h1U2O`јaДbc6hМiм cmdOKн&OKп"[Event Procedu*žšK[re]§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџK<єнNж‡i†9K˜DetailpsubBreakfastListocboDated Date_Labelh cmdOKЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫBlob џџџџџџџџџџџџHвPropData46џџџџЯTypeInfoџџџџџџџџџџџџа+63;9`6~5CХ@gєщѓхЦ–029=BabcŒ"e g%hiГjА"k; РРРЮšjg оњс@нFind guestу"[Event Procedure]ч Arialъ8‰‰‰‰ рhЁыџЈHP DeskJet 560C Printer”(€ ,,@^ž|ИжЙзЙжьџX)winspoolHP DeskJet 560C PrinterLPT1:я"[Event Procedure]ћ"[Event Procedure]џd2§hbЅcgh€фMS Sans Serif§m45bЅg[љ§o2eЅj[љ§p5bЅcЅ§˜`œ€п Detailџm7]8L`maTbcтмcritNameѓ"[Event Procedure]ј\Any part of the name will do. Shortcut: Alt+Lўd5]`xaYbБc№м Label3н&Last name:ч8Any part of the name will do§p3U`qa8bЄ!cdмsubStayListн"Form.fsubStayList§h 1U2E`ЪambQcThМi мcmdNewGuestнN&ew guest ...п"[Event Procedure]ё–Create a booking for a guest who has never been recorded. Short-cut: Alt+E§h 1U2G`ambOcThМi мcmdGuestHistoryн&Guest historyп"[Event Procedure]ёdFind all bookings for the guest. Short-cut: Alt+G§d5з`qaqbЅcуeМмLabel15нFind guest from§m7]8Y;`ёaTbcтkмcritStayт"[Event Procedure]јzIf you look for a particular booking number. Shortcut: Alt+Yўd5]`и aTbпc№мLabel17нSta&y No.:§m7п8M;`ёa6bcуkмcritRoomу"[Event Procedure]јŠLooking for the guest in this room at a given night. Shortcut: Alt+Mўd5п`и a6bHc№мLabel19нRoo&m No.:§h 1U2R`abOcThМi мcmdResetн&Reset criteriaп"[Event Procedure]ёfReset all search criteria. Short-cut: Alt+R or Esc§h 1U2S`ЪaХbQcThМi мcmdOpenStayн&Show stay ...п"[Event Procedure]ёzShow details of the selected stay. Short-cut: Alt+S or Enter§h 1U2N`ЪabQcThМi мcmdNewStayн&New stay ...п"[Event Procedure]ёˆCreate a ne+žšK[w booking for a guest already recorded. Short-cut: Alt+N§m7_8T`ma6bcуkмcritAddrѓ"[Event Procedure]јbAny part of the address will do. Shortcut: Alt+Tўd5п`qa6bќcумLabel29нS&treet:ч>Any part of the address will do§m7_8P`mabcуkмcritPhoneѓ"[Event Procedure]јlLast four digits of number is enough. Shortcut: Alt+Pўd5_`xabЃcсмLabel12н&Phone:§o35_6A9`cmdќeIfуnœМ,"";"";"";"";"10";"510"мcritDateоTable/QueryпqryCalendarAnyр 0;567ф"[Event Procedure]х"[Event Procedure]ы"[Event Procedure]љџ(The date the guest is expected to arrive. May be: "any". Format: day-month-year. Shortcut: Alt+A Toggle with: Shift+Arrow up and Shift+Arrow downњdd/mm/yyўd5_`xaќbэcсмLabel14н&Arrival date:§o35з6H9cёdeџfуnМ$"";"ddddd";"8";"8"мcritRoomDateоTable/QueryпtblCalendarх"[Event Procedure]љ”Looking for the guest at this night in a particular room. Shortcut: Alt+Hњdd/mm/yyўd5з`и abбc№мLabel31нNig&ht:§o05W6I9`b@ cmdпeIfуnмcritIncludeоValue Listп 0;"booked and in";1;"booked";2;"checked in";3;"checked out";4;"canceled";7;"all"р 0;1441ф"[Event Procedure]х"[Event Procedure]щ1љ^Show bookings? check-ins? etc. Shortcut: Alt+Iўd5W`xaнbпc№мInclude_Labelн&Include:§m 7W`aqbŽcуkмtxtSimDateн=fncSimDate()оdd/mm/yyўd5]`aqb‹cуeМмLabel33нToday is:§h 1U2F`aХbPcThМiмcmdFindн&Find guest п"[Event Procedure]ё„Find guests that match what you entered. Shortcut: Alt+F or Enter§d5з`и aqbЅcуeМмLabel36нFind guest from§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ”4E(ЁTж‡i†9K˜DetailmcritNamed Label3psubStayListh cmdNewGuestmcritPhoned Label12d Label15o critDated Label14m critStayd Label17m critRoomd Label19h cmdReseth cmdOpenStayh cmdNewStayocritIncluded Include_Labeld Label29mcritAddrd Label31ocritRoomDateh cmdGuestHistoryd Label33h cmdFindd Label36mtxtSimDateЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџл‰‹\ж‡i†9K˜Detailh cmdFindocboFromd lblFromlpsubRoomGridd Label17mtxtWeekdayFrommtxtWeekdayDeptd Label26h cmdReseth cmdBookh cmdCheckino cboTyped Label22mtxtRoomd Label8ocboDepartured lblDeparturemtxtNighBlob,žšK[ џџџџџџџџџџџџWRPropData8:џџџџйTypeInfoџџџџџџџџџџџџкІ7џџџџџџџџ=`6~5CХ`6~5CХ– 029=BabcŒ"e g hiЂjА"k*! РРРЮD6UЭ1>т@нRoom Selectionу"[Event Procedure]ч Arialѕ"[Event Procedure]ћ"[Event Procedure]џd2§hbЅcgh€фMS Sans Serif§m45bЅg[љ§o2eЅj[љ§p5bЅcЅ§w2bИc §˜`œ€п Detailџh 1U2F`{aTbOcThМiмcmdFindн&Find room п"[Event Procedure]ёhShow the rooms that match. Shortcut: Alt+F or Enter§o5]6E9`b cdTeіfуœ€ €М:"";"ddddd";"";"ddddd";"8";"8"мcboFromоTable/QueryпqryCalendarр 0;567ф"[Event Procedure]х"[Event Procedure]ч"[Event Procedure]щ*[modcommon].[simdate]ы"[Event Procedure]ё"[Event Procedure]ђ"[Event Procedure]љџRFormat: day-month-year. Shortcut: Alt+E Toggle with: Shift+Arrow up or Shift+Arrow down If you don't care whether the room is free, select room type "free or not".њdd/mm/yyўd5]`xaYbfcсœ€ž€мlblFromlнFr&ee from:§p3з`qambЂ!cК dмsubRoomGridс"[Event Procedure]т"[Event Procedure]ўd5]` a`bоc№мLabel17нqryRoomGrid§m 7];`jaTb7cуkмtxtWeekdayFromнŠ=Choose(Weekday([cboFrom]),"Sun","Mon","Tue","Wed","Thu","Fri","Sat")§m 7W;`ja7b7cтkмtxtWeekdayDeptн”=Choose(Weekday([cboDeparture]),"Sun","Mon","Tue","Wed","Thu","Fri","Sat")§d5з`qaqbcуeМмLabel26нFind rooms§h 1U2R`{aЈbOcThМi мcmdResetн&Reset criteriaп"[Event Procedure]ёVReset the search criteria. Shortcut: Alt+R§h 1U2B`;aTbncThМi мcmdBookн&Book п"[Event Procedure]ё†Book the selected rooms onto the open stay window. Shortcut: Alt+B§h 1U2C`;aЈbncThМi мcmdCheckinн&Check in п"[Event Procedure]ёˆCheck the selected rooms onto the open stay window. Shortcut: Alt+C§o05_6T`b@ cdTeРfуhСnмcboTypeоValue Listпь7;"Any - free or not";6;"Any free";1;"Double, bath";2;"Single, bath";3;"Double, toilet";4;"Single, toilet";5;"De luxe"р 0;1441х"[Event Procedure]ё"[Event Procedure]љShortcut: Alt+Tўd5]`ѕ aTbŒcумLabel22нRoom &type:§m07W8M`a5bcтkмtxtRoomоGeneral Numberт"[Event Procedure]у"[Event Procedure]№"[Event Procedure]ј€Show this room. Don't care whether free or not. Sh-žšK[ortcut: Alt+Mўd5W`ѕ a5bcтм Label8нRoo&m No.:§o5_6D9`b cd7eіfтnœ€ €М:"";"ddddd";"";"ddddd";"8";"8"мcboDepartureоTable/QueryпqryCalendarр 0;567у8Enter date as day-year-monthф"[Event Procedure]х"[Event Procedure]щ.[modCommon].[simDate]+1ы"[Event Procedure]ё"[Event Procedure]љюChoose this or set "Nights". Format: day-month-year. Shortcut: Alt+D Toggle with: Shift+Arrow up or Shift+Arrow downњdd/mm/yyўd5_`qa7bcтœ€ž€мlblDepartureн&Departure:§m7W8N;`abcуkмtxtNightsу"[Event Procedure]ч1№"[Event Procedure]ј`Set this or choose "Departure". Shortcut: Alt+Nўd5W`qab6cумLabel19н&Nights:§d5з`ѕ aqbcуeМмLabel31нInclude§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫtsd Label19d Label31ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–23=Babcи e ghфiЄjж)kЧ  РРРЮ„<+p=т@мtblServiceTypeн Service listс[Event Procedure]чArialџd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghф MS Sans Serif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35cИd §zbcijщ MS Sans Serif§{5bяcJ §™`bœ€п FormHeaderџd5]7`qaqbмcуeМм name LabelнServBlob џџџџџџџџџџџџсЁPropData<>џџџџьTypeInfoџџџџџџџџџџџџэЦ8/QA`6~5CХp_cєхЦicesф DetachedLabelх name_Label§d5W7`M aqbcуeМм price LabelнPricesф DetachedLabelх price_Label§˜`qœ€пDetailџm7U`9a9b cџe мnameнname§m07U`x a9bюcџe kмpriceнpriceоFixed§š`œ€п FormFooter§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ^ш‰UZж‡i†9K™ХFormHeaderd Хname_Labelname Labeld Хprice_Labelprice Label˜ХDetailmХnamemХpricešХFormFooterџХserviceIDЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ0ЉБ,яиYж‡i†9K™FormHeader˜DetailmtxtNamed name_Labelname LabelmtxtAddress1d address1_Labeladdress1 LabelmtxtAddress2mtxtAddress3mtxtPassportd passport_Labelpassport Labelm txtStayIDd stay__Labelstay# Labelo txtPaymethodd paymethod_Labelpaymethod LaBlob џџџџџџџџџџџџf/PropData@BџџџџёTypeInfoџџџџџџџџџџџџ.žšK[ђ#10џџџџџџџџE`6~5CХ`6~5CХ– 029=BabcŽe g&hr$iГjFk< РРРН"[Event Procedure]УstayID=728ЮjЏ?Г?т@мqryStayнStayс"[Event Procedure]т"[Event Procedure]ч Arialћ"[Event Procedure]џd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghфMS Sans Serif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35cИd §zbcijщMS Sans Serif§{5bяcJ §|bЅcЅ§™`œ€пFormHeader§˜` œ€п Detailџ{1U`Za%b4c fм tabRSц"[Event Procedure]џ|1з2R`сaК b'cьмtabRoomsш &Roomsџp3ї`тaО b&cНмsubStayRoomsн$Form.fsubStayRoomsо stayIDп stayID§m07пC`(aдbcтkмtxtTotalRoomsнH=DSum("total","tblStayRooms","true")о0.00;0.00;0.00ўd5п`Л aдbtc№мLabel33н"Total all nights:§m07зC`(aЖbcтkмtxtTotalTillNowнџN=IIf(IsNull(DSum("total","qryStayRoomsCT","qryStayRoomsCT.stayID=forms!frmStay!stayID")),0,DSum("total","qryStayRoomsCT","qryStayRoomsCT.stayID=forms!frmStay!stayID"))о0.00;0.00;0.00ўd5п`f aЖbОc№мLabel35н*Total rooms till now:§|1ї2E`сaК b'cэмtabServicesшS&ervicesџp3ї`тaО b&cмsubStayServicesн*Form.fsubStayServicesо stayIDп stayID§m07їC`0aЗb cтkмtxtTotalServiceнџV=IIf(IsNull(DSum("total","qryStayServices","qryStayServices.stayID=forms!frmStay!stayID")),0,DSum("total","qryStayServices","qryStayServices.stayID=forms!frmStay!stayID"))о0.00;0.00;0.00ўd5џ`ѕ aЗbcc№мLabel36н0Total services till now:§h 1з2X`|aлbЈckiмcmdXrefreshн&Xrefreshп"[Event Procedure]§m7U8N`‹aХbcуe мtxtNameнnameўd5U`qaХbяc№мname Labelн &Nameхname_Label§m7]8A`‹abcуe kмtxtAddress1нaddress1пFree useўd5U`qab…c№мaddress1 Labelн&Addressхaddress1_Label§m7_`‹aќbcуe kмtxtAddress2нaddress2п,Foreigners have no ZIP§m7_`‹aпbcуe kмtxtAddress3нaddress3§m 7U8S`* abcтekмtxtPassportнpassportпE.g. A3869038ўd5U`M abВc№мpassport LabelнPa&ssportхpassport_Label§m 7U`‹aqbcуeЅkмtxtStayIDнtblStay.stayIDўd5U`qaqbВc№мstay# LabelнStay No.хstay__Label§o05U6F`bЅcšde”fтh nмtxtPaymethodнpaymethodоValue Listпh0;"Unknown";1;"Cash";2;"Visa";3;"Master";4;"Company"р 0;1134ўd5U`qabВc№мpaymethod LabelнPay &formхpaymethod_Label§h 1U2B`šaqbtcTiмcmdBookн"&Book п"[Event Procedure]ёоBook rooms for the guest. Select the rooms from the Find-rooms screen. Als/žšK[o used for booking additional rooms.§h 1U2I`šabtcTi мcmdCheckinн Check &in п"[Event Procedure]ёџ@Check in the guest. Accounting starts from then on. If the guest has not booked in advance, select rooms first. Also used if the guest wants additional rooms.§h 1U2D`šambtcUi мcmdPrintAccountн&Draft invoiceп"[Event Procedure]ё\Print a draft invoice for the guest to review.§h 1U2O`šaТbtcTi мcmdCheckoutнCheck &out п"[Event Procedure]ёШPrint the final invoice. Also release rooms for any additional days the guest had planned to stay.§m 7U`aqbќcуk мtxtStateн~=Choose([state],"Booked","Checked in","Checked out","Canceled")§m 57U`aqbŽcуk œџџџŸмtxtSimDateоdd/mm/yy§m07зC`abcтkмtxtGrandTotalнH=[txtTotalTillNow]+[txtTotalService]о0.00;0.00;0.00тІ=[subStayRooms].[Form]![txtTotalTillNow]+[subStayServices].[Form]![txtTotalService]ўd5з`aabo c№мLabel19нDTotal rooms and services till now:§h 1U2P`šaХbtcUiмcmdPrintConfirmн&Print confirmп"[Event Procedure]ёXPrint confirmation letter about the booking.§m7W`‹aТeckм phoneн phoneпHOnly last four digits used in searchўd5U`xaОbIc№мLabel37н Phone:§š`œ€пFormFooter§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫўџџџ     ўџџџўџџџўџџџўџџџ !"#$%&ўџџџ()*+ўџџџўџџџ./0123456789ўџџџ;<=>ўџџџ@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ўџџџўџџџbcdefgўџџџijklmnopqrstuvwxyz{|}~€belpsubStayRoomspsubStayServicesh cmdBookh cmdCheckinh cmdCheckoutmtxtStatemtxtSimDatemtxtGrandTotald Label19šFormFooterџtblGuest.guestIDџnameџaddress1џ address2џ!address3џ#passportџ$stayIDџ%tblStay.guestIDџ&paymethodџ'stateh )cmdXrefresh{ tabRS|!tabRooms|!tabServicesh +cmdPrintConfirmh cmdPrintAccountd 1Label33d 3Label35m4txtTotalServiced 5Label36m2txtTotalTillNowm0txtTotalRoomsm6phoned 7Label37ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–23=BabcО e ghm)iwjњ2kе РРРЮђдСEм@т@м tblBreakfastнBreakfast listчArialџd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghф MS Sans Serif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0žšK[џџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ x џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџш џџџџџџџџLR@ ј mс @ўџ` tџџџ џџ @ўџ0 dџџџ џџ @ўџH Tџџџ џџ @ўџЈ Dџџџ џџ @ўџџџџџ@џџџ џџ 0л @ўџ 0џџџ џџ @ўџџџџџ џџџ џџ фс @ўџџџџџџџџ џџ џџџџ(џџcИd §zbcijщ MS Sans Serif§{5bяcJ §™`Хœ€п FormHeaderџd5U7aтb6cуeМм roomID LabelнRoomф DetachedLabelх roomID_Label§d5]7`aтbЉcуeМмBreakfastA Labelнin rest.ф DetachedLabelхBreakfastA_Label§d5]7`2aтbcуeМмBreakfastB Labelнin roomф DetachedLabelхBreakfastB_Label§d5W7`b‹cтeМмLabel6н Breakfastф DetachedLabel§˜`уœ€пDetailџm7UCbХcуeXмroomIDнroomID§m7U;`ЈbcуeXkм BreakfastAн BreakfastAт[Event Procedure]ј6Number of serves for the room. X: nobody in the room.§m7U;`3bcуeXkм BreakfastBн BreakfastBт[Event Procedure]ј6Number of serves for the room. X: nobody in the room.§š`œ€п FormFooter§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ Ь›г,3aж‡i†9K™ХFormHeaderd ХroomID_LabelroomID Labeld ХBreakfastA_LabelBreakfastA Labeld ХBreakfastB_LabelBreakfastB Labeld ХLabel6˜ХDetailmХroomIDmХBreakfastAmХBreakfastBџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј А Ш џџџџh р џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜ џџџџ@ўџџџџџlџџџ џџ џџџџšњќўЬ@€ ЈЖО{ž{{@ўџџџџџhџџџ џџ @ўџџџџџXџџџ џџ @ўџџџџџVџџџ џџ @ўџџџџџPџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџ№џџџџџџџџАЈ(џџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџ@ўџШtџџџџџ ™’{@ўџрpџџџџџ  •{@ўџџџџџlџџџџџ @ўџ\џџџ џџ @ўџXLџџџ џџ ћœ{@ўџp<џџџ џџ џџџџЎЌАВДLт–{{@ўџш,џџџ џџ @ўџˆџџџ џџ @ўџ  џџџ џџ р‘{@ўџИќўџџ џџ @ўџаьўџџ џџ ”{@ўџмўџџ џџ @ўџЬўџџ џџ -‘{@ўџ0Мўџџ џџ 6“{@ўџxЌўџџ џџ Э”{@ўџHœўџџ џџ •{@ўџ`Œўџџ џџ i“{@ўџ|ўџџ џџ @ўџџџџџlўџџ џџ @ўџџџџџ\ўџџ џџ Ÿ“{@ўџРXўџџ џџ @ўџиTўџџ џџ @ўџџџџџPўџџ џџ e‘{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшџџџџџџџџШЈџџџџџџџџиPРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџ@ўџЈhџџџ џџ @ўџџџџџXџџџ џџ @ўџHџџџ џџ @ўџ№Dџџџџџ >‘{@ўџџџџџ@џџџџџ y{@ўџ 0џџџ џџ @ўџџџџџ џџџ џџ w’{џџџџL^—{Y“{@ўџhџџџ џџ @ўџ€џџџ џџ А•{@ўџџџџџџџџ џџ œ{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜Pџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџРЦИ‘{P›{Ћ”{@ўџhxџџџ џџ @ўџџџџџtџџџ џџ а{@ўџџџџџpџџџџџ @ўџџџџџlџџџџџ џџџџи0џџџџx @ џџџџџџџџрџџџџ  @ џџџџџџџџџџџџx Ќ4Ьџџџџџџџџџџџџџџџџџџџџџџ(+Ш Кф{F $*\Rffff*1048465106*\R2*#2e*\R1*#99*\R1*#98*\R2*#24*\R2*#28$*\Rffff*1148465106*\R2*#29*\R2*#2a*\R1*#25*\R0*#f*\R2*#34*\R2*#30*\R1*#72*\R1*#8fпџџџџTЂXr\š`vdph|lxp†t€x‚|Š€ž„ˆ’Œ”–”z˜ІœЈ ўЪ€ € џџџџ€€ 1žšK[€Z(€ џџџџ" ˆЈРи€ џџџџ" рш08€ џџџџ" @€H(Ф*P( 8P XM`И24РVdјv˜PШ а@рј€ џџџџ" €BJ X\ ЈZ  h$!x  ,ЈШ &,ајd @pˆ€ џџџџ"˜ИHIШ€ џџџџ"   @Ph€ џџџџ" pRx>а€ v ˆ  ˜ Ј € џџџџ" А €И  Р р ј    8 @ P  X h p € џџџџ"  x € ˆ    Р ,Ш $ј  0 € џџџџ" 8 € $@ "h 8 Ш € 8ш  &( P € џџџџ" X "` 8ˆ Р € 8р   € $@ &h  € 2˜ 2а € џџџџ"   @PX"p 8˜ а€ 8№(F0€ Šx (€ џџџџ"0 8 @ P `p€ ˜ Ј И!Ш&р№ј€ џџџџ"    0 @DP˜ € џџџџ" Ј$А*и(0€ џџџџ"  88@<x И Ш иш№€ џџџџ"  јTX p€ ˆ  А Ша ш№ ј (0€ џџџџ"  8@H`h€ џџџџ" px €    А&Рш№€ џџџџ" ј   ( 8&Hpx€ џџџџ" €€ˆ€˜  Ј И Ш иш ј< H&X€hˆ8№0( X h €  ЈАИ€ џџџџ" РШр€ џџџџ"  ш№ ј  ( 8 HX$p˜ € џџџџ"  ЈАШ€ џџџџ"а€и 3рH <(@H€ џџџџ" P€ џџџџXџџџџhр Form frmFindStayЭџџ`ЭџџX]ђx ђ  р&E Saved SQL prior to GuestHistory. A one-level stack. Null when empty.x–0 š$ ›G|j L!d"Ђ!h'š L!d"Є!h'œoџџ –p š$ ›G|j š L!d"Ђ(h œ L!d"Є(hЗ'šoџџР–А]ђ0І ЖXSELECT tblGuest.guestID, tblStay.stayID, Min(qryRoomsPerStay.firstRoomDate) AS arrival, ЖoMin([qryRoomsPerStay].[roomID]) & IIf(Count([qryRoomsPerStay].[roomID])>1,' + ...','') AS rooms, tblStay.state ЖhFROM tblGuest INNER JOIN (tblStay LEFT JOIN qryRoo2žšK[msPerStay ON tblStay.stayID = qryRoomsPerStay.stayID) Ж&ON tblGuest.guestID = tblStay.guestID Ж9GROUP BY tblGuest.guestID, tblStay.stayID, tblStay.state '` ЊЖany Ќ Ў œ `ЖHAVING '` ЊЖanyœ `Ж&(Min(qryRoomsPerStay.firstRoomDate)= # ЊЖ mm-dd-yyyy$ЌЖ#) '`kџџ@ ЊЖany Ќ Ў ›G `ЖAND '`j Ќ А Ќ Ў ›G `Ж(tblStay.state =  ЌЖ0$ЌЖ) '`j Ќ А›G `Ж(tblStay.state =  ВЖ0$ЌЖ OR tblStay.state = ДЖ0$ЌЖ)'`jkџџ0 `Ж;'` ` L!d"Ђ(hoџџ–H]ђшЖ:SELECT qselStays.stayID, tblGuest.guestID, tblGuest.name, '` `Ж<[address1] & ', ' & [address2] & ', ' & [address3] AS addr, '` `ЖNtblGuest.phone, qselStays.arrival, qselStays.rooms, qselStays.state AS qstate '` `ЖKFROM qselStays RIGHT JOIN tblGuest ON qselStays.guestID = tblGuest.guestID '` МЖœ `ЖWHERE ( ИЖ) '` Кœ `Ж=  МЖџџџџ`„Іџџџџџџџџџџ Xџџџџџџџџџџџџџџџџџџџџџџџџџџџџ” шИџџџџџџџџџџџџџџџџ˜ џџџџџџМiƒўџџџџџџџџџ џџџџџџ <јџџџџџџџџџџџџџџџџџџџџџџџџџџџџ” nџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџ$$”iƒ^џџџџџџџџџџџџџџ€ „,џџџџџџџџp %`„pџџџџџџџџџџ€ўџџџџџџџИџџџџџџџџџџ%џџџџ8b€Jџџџџџџџџџџџџџџџџџџџџџџаx€(џџџџџџџџШџџџџџџџџјџџџџџџџџЈџџџџhЈИXџџџџH џџџџШџџџџџџџџјџџџџШџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№Кф{F пўЪ € € џџџџ€€ €N(€ џџџџ" x€ˆ€ џџџџ"€˜* Hjа@P`€ џџџџ"h€p€€€€˜  RР € џџџџ (8D@ˆ `˜ јH€ џџџџPfXDРPPX$Ј zа PXH`€ џџџџЈpАD h  €       А  Р а  и € џџџџ&ш * @ H € џџџџ P ` 2€ JИ  € џџџџ" € €( €8 €@  H Rh Р Ш € џџџџ а р Fш 0  l@  А И HР   D  ` h € џџџџp Px Ш  tи  PX` Dp ИРDШ ( 8 H X hx €€ џџџџj˜FPP  0А рш№ 8 @HHP€ џџџџ&˜0Р№ј€ џџџџ 20JhИ€ џџџџ"Р€Ш€и€р шR`h€ џџџџ p€ Pˆ и žшTˆ"р 0 @H 2Pˆ  DА јz€ PˆDи  8 H X h x3žšK[ ˆ    ЈИ Р€ џџџџаNи(0€ џџџџH8€2 Jи(€ џџџџ"08RH ЈdА€ џџџџ" (D8€ˆj€ џџџџ"P€ 6X€> Rр(8(`(ˆ$Аи№€ џџџџ". 4Pˆ€ џџџџB 6˜:а€ џџџџ"€ N  p€$И,Шј*08@(H(p(˜:Р   0 € џџџџ" 8 €@ €H (P (x l  6!H!P!€ 0X!Jˆ! и! ш! ј!" " "€ џџџџ€ &("<P"$"FИ"#L# X# h# x#ˆ# #8 #*и#R$`$€$ˆ$€ џџџџџџџџ˜$р Form frmStayЭџџ`ЭџџX]ђШр? Determines what views to refesh after sending keys to XRefresh– L'Joџџp–x]ђИЖDELETE * FROM tblStayRooms; LB@PІ   ЖjINSERT INTO tblStayRooms ( FirstOfdate, CountOfdate, roomID, roomType, personCount, price, total, stayID) ЖiSELECT First(tblRoomState.date) AS FirstOfdate, Count(tblRoomState.date) AS CountOfdate, tblRoom.roomID, Ж4tblRoom.type AS roomType, tblRoomState.personCount, Ж@IIf([personCount]=1 And [price2]>0,[price2],[price1]) AS price, ЖmIIf([personCount]=1 And [price2]>0,[price2],[price1])*Count(tblRoomState.date) AS total, tblRoomState.stayID ЖMFROM tblRoom INNER JOIN tblRoomState ON tblRoom.roomID = tblRoomState.roomID ЖWHERE tblRoomState.stayID= џџ!єЖŽ GROUP BY tblRoom.roomID, tblRoom.type, tblRoomState.personCount, IIf([personCount]=1 And [price2]>0,[price2],[price1]), tblRoomState.stayID, ЖXIIf([personCount]=1 And [price2]>0,[price2],[price1]) ORDER BY First(tblRoomState.date);'` ` LB@P џџ!NB@poџџ–а]ђђ(]ђ@ђX]ђp]ђˆ џџ!R$  џџ!T$ œЖDYou must fill in at least the guest name and the first address line. ŽA&|џџРkџџИ џџ":ъ KT Є ІЗ f%Ђ›G|jрK Error message made: Select room Є @!B œЖ)You can only book guests into the future.Ќ $8ЖSelect another period. ŽA&|џџрkџџи џџ!є В f%Ў›G|jрH" Error message made: Room not free ВKTЖCThe guest is booked already. Do you want to give him one more room? Z \ $& 0›G|j Є ІЗ f%Ђ›G|jрK Error message made: Select roomЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$V'PЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$X'T І PЌ Є TЌ œЖ.There cannot be gaps in the total stay period.Ќ $8Ж+Select another period or make two bookings. ŽA&|џџˆkџџ€ џџ!є В f%Ў›G|jрH" Error message made: Room not free ДKTЖThis booking is checked in.Ќ $8Ж Do you want to undo the checkin? Z \ $& 0›G|jЖ*SELECT * FROM tblRoomState where [stayID]= џџ!єЖ;'`э ` L%N., ,!Bє ,B@D В ,): ,B@X ,B@Hѓџџш ,B@BSр e.g. checked out or cancelledЖThis stay cannot be booked. ŽA&4žšK[|џџxnџџp В џџ(: b d L N 'J џџB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls XrefreshoџџА–Ј]ђшђ]ђђ0]ђH]ђ` џџ!R$  (qselGuestStays.arrival=#10/21/2002#))Ю1+cе?т@мqselGuestStaysнfsubStayListъ8‰‰‰‰ рhЁымHP LaserJet 5”@w @yXX @MSUD7HP LaserJet 5ф%d ь\winspoolHP LaserJet 5\\ITPRINTSVR1\SA116HPLJ5Mя"[Event Procedure]њ"[Event Procedure]џd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghфMS Sans Serif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35cИd §zbcijщMS Sans Serif§{5bяcJ §™`№œ€пFormHeaderџd5U7bЈcтмstay# LabelнStay No.фDetachedLabelхstay__Label§d5U7`ЄbХcтмname Labelн GuestфDetachedLabelхname_Label§d5U`Hb7cтм Label6нArrival§d5U`bяc№м Label7нRoom§d5U`­b7cтм Label8н State§d5U`b7cтмLabel11н Phone§d5U7`К bЈcтмLabel15нAddressфDetachedLabel§˜`тœ€п Detailџm7U;bЧcтefœџџџŸмStayн stayID§m 7U`‘b‰cтeНfkœџџџŸм Guestнname§m 7U;`bcтe§fkœџџџŸмArrivalнarrivalоdd/mm/yy§m 07U;`{b›cтe fkœџџџŸм Stateн”=IIf([qstate] Is Null,"",Choose([qstate],"Book","Ch.in","Ch.out","Canc."))о Fixed§m 07U;`гb0cтeСfkœџџџŸмRoomн roomsо Fixed§m 7U;`becтeЁfkœџџџŸм Phoneн phone§m 7U`Š b cтe3 fkœџџџŸмAddressнaddr§š`œ€пFormFooter§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ fXж‡i†9K™FormHeaderd stay__Labelstay# Labeld name_Labelname Labeld Label6d Label7d Label8d Label11d Label15˜DetailšFormFooterџguestIDџnameџaddrџroomsџstayIDm Staym arrivalm GuestmAddressmphonem Roomm stateЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫTypeInfoџџџџџџџџџџџџaŸ14џџџџџџџџW`6~5CХP !ЪцЦBlob џџџџџџџџџџџџh PropDataVXџџџџ‚ƒ„…†‡ˆ‰Š‹Œўџџџўџџџ‘’“”•–ўџџџ˜™šўџџџœžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШўџџџўџџџЫЬЭЮЯабўџџџгдежзийклмўџџџўџџџпўџџџстуфхцчўџџџщъўџџџьэюя№ёўџџџѓєѕіїјўџџџњћќ§ўџ–2=Babc|e gh€%iф jz:kƒ РРРШ0tblStayRooms.FirstOfdateЮ’е†ШAт@мtbl5žšK[StayRoomsр"[Event Procedure]ч Arialћ"[Event Procedure]џd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghфMS Sans Serif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35cИd §zbcijщMS Sans Serif§{5bяcJ §™`тœ€пFormHeaderџd5U7`Тb=cтмroom# LabelнRoomфDetachedLabelхroom__Label§d5U7` bЈcтм#persons LabelнPersonsфDetachedLabelх"Ctl_persons_Label§d5U7`,bЦcтмprice1 Labelн PriceфDetachedLabelхprice1_Label§d5U7`qbХcтмLabel13нFromфDetachedLabel§d5U7`аb7cтмLabel14н NightsфDetachedLabel§d5U7`FbХcтмLabel15н TotalфDetachedLabel§f23U5`Pbcтм Line20§˜`№œ€п Detailџm457UC`bЈcтeмtxtFirstOfDateнFirstOfdateоdd/mm/yy§m7U;`„ bПcтeXkмtxtCountнpersonCountт"[Event Procedure]јџrIf a single person stays in a room with more beds, you may record "1" person. This gives the guest a discount. (As a default, the number of persons is the number of beds in the room.)§m0457];C`К b7cтeukмtxtPriceн priceо Fixed§m457UC`*b›kœРРРмtxtCountOfdateнCountOfdate§m0457W;C`ёbcтkœРРРмtxtTotalн totalо Fixed§m457U;C`ШbLeСkœРРРмtxtTypeнќ=Format(![roomid],"00") & ", " & Choose(![roomType],"Double, bath","Single, bath","Double, toilet","Single, toilet","De luxe")§f23U5`Pbcтм Line21§š`œ€пFormFooter§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ…4дъYж‡i†9K™FormHeaderd room__Labelroom# Labeld Ctl_persons_Label#persons Labeld TypeInfoџџџџYџџџџŽBlobDeltaџџџџџџџџџџџџ—к15Ub\`6~5CХJ/kєхЦBlob џџџџџџџџџџџџ›c price1_Labelprice1 Labeld Label13d Label14d Label15fLine20˜Detailm txtFirstOfDatem txtCountm txtPricem txtCountOfdatem txtTotalmtxtTypefLine21šFormFooterџFirstOfdateџCountOfdateџroomIDџroomTypeџpersonCountџpriceџtotalџstayIDЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–џd§e§f§g§h§i§j§k§l§m§n§o§p§r§z§{§™џd§d§d§d§d§d§f§˜џm§m§m§m§m§m§f§š§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–2=Babc|e ghWiХ jkS РРРЮeW^?т@мqryStayServicesр"[Event Procedure]с"[Event Procedure]т"[Event Procedure]ч Arialі"[Event Procedure]џd2œ€ž€§e12bRcR§f5bЅ§g237bЅcЅ§hbЅcghфMS Sans S6žšK[erif§i1gцhтџ§j1gцhтџ§k1bЅcЅ§l23:bИc g[љ§m4bЅg[љœ€Ÿ€§n2cЅd‰h[љ€Ÿ€§o2eЅj[љ€ €§p5bЅcЅ§r35cИd §zbcijщMS Sans Serif§{5bяcJ §™`№œ€пFormHeaderџd5U7bЄc№мdate LabelнDateфDetachedLabelхdate_Label§d5U7`Gbhc№мname LabelнQty.фDetachedLabelхname_Label§d5U7`еbяc№мcount LabelнRoomфDetachedLabelхcount_Label§d5U7`ГbГc№мprice Labelн PriceфDetachedLabelхprice_Label§d5U`FbГc№мLabel17н Total§d5U`ёbќcтмLabel18нService§˜`№œ€п Detailџm07U`GbеcтeXkмtxtQuantityнquantityо Fixed§m 0457];C`ibЂcтe kмtxtPriceн totalо Fixed§m 0457W;C`.b7cтevkм priceн priceо Fixed§m7U`ObTcтkмtxtRoomIDн roomIDп6To help trace service notesч–=DFirst("roomid","tblroomstate","tblroomstate.stayid=forms!frmStay!stayID")јtThe room number. For tracing in case of doubts. (Optional)§o235U`abСcкe3nМ@"";"";"";"";"";"$0.00";"10";"50"мcboServiceIDнserviceIDоTable/QueryпОSELECT tblServiceType.serviceID, tblServiceType.name, tblServiceType.price FROM tblServiceType;р0;1134;567щ1ќџ*"SELECT tblServiceType.serviceID, tblServiceType.name, tblServiceType.price FROM tblServiceType;";"tblServiceType";"";"serviceID";"name";"PrimaryKey"§o5U6E9b efуМ$"";"ddddd";"8";"8"мcboDateнdateоTable/QueryпqryCalendarр567щ=fncsimdate()ы"[Event Procedure]ё"[Event Procedure]і"[Event Procedure]љиThe date the service was received. Format: day-month-year. Toggle date: Shift+Arrow up or Shift+Arrow downњdd/mm/yy§š`œ€пFormFooter§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџУcљ7Qcж‡i†9K™FormHeaderd Date_Labeldate Labeld name_Labelname Labeld count_Labelcount Labeld price_Labelprice Labeld Label17d Label18˜Detailm txtPricem pricešFormFooterџquantityџserviceIDџtotalџstayIDџdateocboDatem PropData[]џџџџЩTypeInfoџџџџџџџџџџџџЪШ16џџџџџџџџ``6~5CХ ЇкvєхЦBlob џџџџџџџџџџџџв…txtQuantityџroomIDm txtRoomIDo cboServiceIDЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–02=Babcce ghsiЅjO)kц  РРРЮэ†Fuќс@ч Arialћ"[Event Procedure]џd2§hbЅcgh€фMS Sans Serif§m45bЅg[љ§˜`mœ€п Detailџm7U` aтbйcумtxtSimDateоdd/mm/yyўd5U`qaтb0 cум Label1нHC7žšK[urrent date for simulation dd-mm-yy§h1U` a6bпcЦiмMakeCalendarнMake calendarп"[Event Procedure]§d5U`qa6b0 cЦм Label3н†To reset data tables, delete them and import from e.g. LargeMockup.§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџеšљуsNж‡i†9K˜Detaild Label1h MakeCalendarmtxtSimDated Label3ЫЫЫЫЫЫPropData_aџџџџнTypeInfoџџџџџџџџџџџџоzDirData^cџџџџрфPropDataџџџџџџџџџџџџшЗInitCalendar$fsubStayServicesfsubStayRoomsfsubStayList fsubRoomGrid2 fsubRoomGrid1 &fsubBreakfastList frmStay frmServiceListfrmRoomsfrmFindStay$frmBreakfastList AsciiTransform frmMessageRoom"frmMessageGuestЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ 0CB0 1CB0 3CB0 4CB0 5CB0 6CB0 7CB0 8CB0 10CB0 11CB0 12CB0 13CB0 14CB0 15CB0 16CB0ЫЫЫЫЫЫЫЫЫ– Custom Popup 10!@щ‰џџџџb;Remember &this window positionb;Remember &all window positions-r: € InitCalendarOpen form 'InitCalendar'OCmdbarsџџџџџџџџk`6~5CХPЂ$ЪцЦ0џџџџџџџџf`6~5CХ`6~5CХBlob џџџџџџџџџџџџы”1eih`6~5CХ`6~5CХpen form 'InitCalendar' InitCalendar ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ– Custom Popup 11š?'kџџџџ -r: €Show &Breakfast listOpen form 'frmBreakfastList'Open form 'frmBreakfastList'frmBreakfastList b;&Print breakfast list=fncPrintBreakfBlob џџџџџџџџџџџџђ˜2џџџџџџџџj`Ї€5CХ`Ї€5CХBlob џџџџџџџџџџџџљь3gol`Ї€5CХ`Ї€5CХastList() ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ– Custom Popup 2@Џџџџџ -r: €&Open service listOpen form 'InitCalendar'Open form 'InitCalendar' InitCalend8žšK[ar -r: €&Print service listOpen form 'InitCalendar'Open form 'InitCalendar' InitCalenўџџџ    ўџџџ !"ўџџџ$%&'()*+,-./01234567ўџџџ9:;<=ўџџџ?@ABCDEўџџџGўџџџIJKLўџџџўџџџўџџџўџџџQўџџџўџџџTўџџџўџџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџdar"-r: € &Add serviceOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar -r: €&Delete serviceOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar -r: € &Undo deleteOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ– Custom Popup 35?к‘џџџџ -r: €&Open Find-guest screenOpen form 'frmFindStay' Open form frmFindStay a;&Delete room line=fncDelRoomLine() -Ђ: € &Cancel stayOpen form 'InitCalendar'=fncCanBlob џџџџџџџџџџџџ l4џџџџџџџџn`Ї€5CХ`Ї€5CХBlob џџџџџџџџџџџџ5msp`Ї€5CХ`Ї€5CХcelStay() -b: €U&ndo check-inOpen form 'InitCalendar'=fncUndoCheckin() ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ– Custom Popup 7 ?ЦСџџџџ -b: €&Open Room-selection screenOpen form 'InitCalendar' Open formfrmRooms -r: €&Repair in progressOpen form 'InitCalendar' -r: €&Cancel repairOpen form 'InitCalendar'"-b: €&Create hotel roomOpen form 'InitCalendar'=fncRoomManagement() InitCalendar -b: €&Delete hotel roomOpen form 'InitCalendar'When a room ceases to exist=fncRoomManagement() -b: € &Undo deleteOpen form 'InitCalendar'=fncRoomManagement() – Custom Popup 8 Y”юџџџџ-r: € &Open roomsOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: €&Repair in progressOpen Blob џџџџџџџџџџџџ#6џџџџџџџџr9žšK[`Ї€5CХ`Ї€5CХBlob џџџџџџџџџџџџ8x7qut`Ї€5CХ`Ї€5CХform 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: €&Cancel repairOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar/p:€macBeepRun macro 'macBeep'Run macro 'macBeep'macBeep-r: € &Add roomOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: € &Delete roomOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: € &Undo deleteOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ– Custom Popup 9Z?Оkџџџџ /Ђ:€ &Add lineRun macro 'macBeep'=fncAddServiceLine()macBeep /Ђ:€DEL Delete lineRun macro 'macBeep'=fncDelServiceLine()macBeepD  ЫЫЫЫЫЫЫЫHotelSysU.­E˜vџџџџ h&RoomsCustom Popup 7 hBlob џџџџџџџџџџџџ>а8џџџџwv`Ї€5CХ`Ї€5CХBlob џџџџџџџџџџџџFpDirDataџџџџџџџџџџџџH&StaysCustom Popup 3 hService &linesCustom Popup 9 h&Breakfast listCustom Popup 11 hService &pricesCustom Popup 2 hToolsCustom Popup 10ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫTest1:г}џџџџ h&RoomsCustom Popup 8ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ"Custom Popup 10"Custom Popup 11 Custom Popup 2 Custom Popup 3 Custom Popup 7 Custom Popup 8 Custom Popup 9HotelSys TestЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫmodCommonmodMenuesЫЫЫЫЫЫЫЫЫЫЫЫModules"{`Ї€5CХPЂ$ЪцЦ0џџџџџџџџz`Ї€5CХ`Ї€5CХPropDataџџџџџџџџџџџџM 1y}|`Ї€5CХ`Ї€5CХPropDataџџџџџџџџџџџџ:žšK[N DirDataџџџџџџџџџџџџO4Reportsџџџџџџџџџџџџ`Ї€5CХ`Ї€5CХScripts~ˆƒ`Ї€5CХPЂ$ЪцЦ0џџџџџџџџ`Ї€5CХ`Ї€5CХBlob џџџџ‚џџџџPMPropDataџџџџџџџџџџџџR 1€†„`Ї€5CХ`Ї€5CХџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ{F3}ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫAutoKeysmacBeepЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫijфЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫBlob џџџџ…џџџџSHPropDataџџџџџџџџџџџџU DirDataџџџџџџџџџџџџV.PropDataџџџџџџџџџџџџWDatabases‡Œ‰`Ї€5CХPЂ$ЪцЦ0џџџџ‹Š`Ї€5CХ`Ї€5CХBlob џџџџџџџџџџџџўџџџDirDataџџџџџџџџџџџџXMSysDbЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ '`dF `ЖLike ('* МЖ*') '`kџџkџџј `ЖVORDER BY iif(qselStays.arrival is null, #1-1-2040#, qselStays.arrival), tblGuest.name;'` ` L!d"Є(hoџџp–Ж fsubStayList џџ!Р(Т џџ!РB@p џџ!Р!r!ФЌ›GЖ No guests match what you ask forA@Цjoџџш–@ЖfrmMessageGuest џџ!Р(Т џџ!РB@p ` џџ!Р!r)Шoџџ–  џџ!Р!ТЖ fsubStayList›G|jрC& Another function has toџџ!T$ œЖDYou must fill in at least the guest name and the first address line. ŽA&|џџјkџџ№ џџ":ъ KT Є ІЗ f%Ђ›G|jрK" Error message made: Select a room Є @!BœЖ#You can only check guests in today.Ќ $8Ж(Book instead or select a room from today ŽA&|џџkџџ џџ!є Д f%Ў›G|jрD" Error message made: Room not free џџ!ZЌœЖ6You have not chosen a paymethod. Check with the guest. XA&;žšB  @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€€€€€€€€€€ € € € € !€"€#€$€%€&€'€(€)€*€+€,€-€.€/€0€1€2€3€ 4€!5€"6€#7€$8€%9€&:€';€(<€)=€*>€+?€,@€-A€.B€/C€0D€1E€2F€3G€4H€5I€6J€7K€8L€9M€:N€;O€<Ѕ€=Ї€>І€?Ј€@Љ€AЊ€BЋ€CЌ€D­€EИ€FЙ€GК€HЛ€IМ€JН€KО€LП€MР€NС€OТ€PУ€QФ€RХ€SЦ€TЧ€UШ€VЩ€WЪ€XЫ€YЬ€ZЭ€[Ю€\Я€]“€^”€_а€`б€aд€bв€cг€dж€eе€fи€gй€hз€iк€jл€kм€lн€mоS ЅYNRRY YY: YD‚ YDM‚ YM:ўId LValueObjectGuidObjectNameProperty ValueƒџџDџџџџ:џџMџџDџџџџ:џџMџџDRSM:D‰ƒџџџџ:џџMџџDџџџџ:џџMџџDRTM:Dƒџџџџ:џџMџџDџџџџ:џџMџџDRUM:DYџџџџYџџџџYџџџџId$ObjectGuidProperty$ObjectNamePropertyRџџHЛv1ьЇb  Q Q QёY NWW Y  YўGrptbcd TbNameƒџџџџџџџџџџџџџџџџPџџџџџџW[‰YџџџџTbIndexWWџџЛv1ьЇђLVALlд ш|| Test1:г}џџџџ h&RoomsCustom Popup 8– Custom Popup 7 ?ЦСџџџџ -b: €&Open Room-selection screenOpen form 'InitCalendar' Open formfrmRooms -r: €&Repair in progressOpen form 'InitCalendar' -r: €&Cancel repairOpen form 'InitCalendar'"-b: €&Create hotel roomOpen form 'InitCalendar'=fncRoomManagement() InitCalendar -b: €&Delete hotel roomOpen form 'InitCalendar'When a room ceases to exist=fncRoomManagement() -b: € &Undo deleteOpen form 'InitCalendar'=fncRoomManagement() – Custom Popup 35?к‘џџџџ -r: €&Open Find-guest screenOpen form 'frmFindStay' Open form frmFindStay a;&Delete room line=fncDelRoomLine() -Ђ: € &Cancel stayOpen form 'InitCalendar'=fncCancelStay() -b: €U&ndo check-inOpen form 'InitCalendar'=fncUndoCheckin() – Custom Popup 2@Џџџџџ -r: €&Open service listOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar -r: €&Print service listOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar"-r: € &Add serviceOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar -r: €&Delete serviceOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar -r: € &Undo deleteOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar – Custom Popup 11š?'kџџџџ -r: €Show &Breakfast listOpen form 'frmBreakfastList'Open form 'frmBreakfastList'frmBreakfastList b;&Print breakfast list=fncPrintBreakfastList() – Custom Popup 10!@щ‰џџџџb;Remember &this window positionb;Remember &all window positions-r: € InitCalendarOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar V иА‰b;эЬЏp@XџўTestа@ZџўHotelSysx@ZџўCustom Popup 9@ZџўCustom Popup 8@XџўCustom Popup 7l@XџўCustom Popup 3ь@XџўCustom Popup 2˜@XџўCustom Popup 11”@XџўCustom Popup 10ŒLVALш p  HotelSysU.­E˜vџџџџ h&RoomsCustom Popup 7 h&StaysCustom Popup 3 hService &linesCustom Popup 9 h&Breakfast listCustom Popup 11 hService &pricesCustom Popup 2 hToolsCustom Popup 10– Custom Popup 9Z?Оkџџџџ /Ђ:€ &Add lineRun macro 'macBeep'=fncAddServiceLine()macBeep /Ђ:€DEL Delete lineRun macro 'macBeep'=fncDelServiceLine()macBeepD  – Custom Popup 8 Y”юџџџџ-r: € &Open roomsOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: €&Repair in progressOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: €&Cancel repairOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar/p:€macBeepRun macro 'macBeep'Run macro 'macBeep'macBeep-r: € &Add roomOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: € &Delete roomOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar-r: € &Undo deleteOpen form 'InitCalendar'Open form 'InitCalendar' InitCalendar q V@@ €Mokmd`fdfof86YMokmd`fdfof88YMokmd`fdfof:YMokmd`fdfof<YMokmd`fdfofDYMokmd`fdfofFYMokmd`fdfofHYWdmQ^kvkYmQkmYЫmтЎr.ШЊŒnPд Ж ˜ ˜Э˜Э˜Э˜Э˜Э˜Э˜Э˜Э˜Эz \ > ъ Ћ l  б ’ t V 8  ь Р Š U я б Г • i 3 йE§Й…QТˆP тЃy5љЭ—Z мЈiябГГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТГТ,€tblCalendar''' ,,€qselRooms### ,€€џўtblCalendar.date/ g,€€џўtblCalendar.date/ g,€€џўtblCalendar.date/ ,€€џўtblCalendar.date/ g,€€џўtblCalendar.date/ g,€€џўtblCalendar.date/ g1€џ№+а 1€№+а G0€№+аl@ '0€№+аtblRoomtblRoomStateH@C7 0€№+а€џўtblRoomState.stayID2 g0€№+аtotalj@' o0€№+а€џўtblRoomState.personCount7 g0€№+а€џўtblRoom.roomID- g0€№+а€џўtblRoomState.date0 g0€№+аtblRoomState))) 0€№+аtblRoom 0€џ№+а 0€№+а G/€ №+а€џўFirst(tblRoomState.date)7 '/€ №+аj@ g/€ №+а€џўtblRoomState.stayID2 g/€ №+аj@ g/€ №+а€џўtblRoomState.personCount7 g/€ №+а€џўtblRoom.type+ g/€ №+а€џўtblRoom.roomID- g/€№+аtblRoomtblRoomStateH@C7 /€№+а€џўtblRoomState.stayID2 g/€№+аtotalœ@ ' o/€№+аpricej@ ' o/€№+а€џўtblRoomState.personCount7 g/€№+аroomType€џўtblRoom.type;!! o/€№+а€џўtblRoom.roomID- g/€№+аCountOfdate€џўCount(tblRoomState.date)M'' o/€№+аFirstOfdate€џўFirst(tblRoomState.date)M'' o/€№+аtblRoomState))) /€№+аtblRoom /€№+а G/€№+а G/€џ№+а /€№+а G.€№+аtblGuesttblStayD@ ;/! .€№+а €џўtblStay.*( g.€№+а €џўtblGuest.*) g.€№+аtblStay .€№+аtblGuest!!! .€№+а G.€№+а G.€џ№+а .€№+а G-€ №+а€џўtblRoomState.roomID2 g-€ №+а€џўtblRoomState.stayID2 g-€№+аfirstRoomDate€џўMin(tblRoomState.date)O++ o-€№+а€џўtblRoomState.roomID2 g-€№+а€џўtblRoomState.stayID2 g-€№+аtblRoomState))) -€№+а G-€№+а G-€џ№+а -€№+а G,€џ№+а ,€№+а G+€№+аX7YZ_____2N@ 1% 7+€№+аX7YZ_____1t@1% 7+€№+а G+€ №+а G+€џ№+а +€№+а G*€ №+а€џўtblCalendar.date/ '*€№+ат@ '*€№+аshow€џўtblCalendar.date7 o*€№+а€џўtblCalendar.date/ g*€№+аtblCalendar''' *€№+а GQ\тФ‚HОy1ё Љ d њ З o Q 3 3Ь3Ь3Ь3Ь3Ь3Ь3Ь3Ь3Ь3Ь3Ь3Ь3Ь3Ь ї їЫїЫїЫїЫїЫїЫїЫїЫїЫїЫїЫїЫїЫїЫй Л ЛЫЛЫЛЫ  = ј Б ‡ i K Ф } S 5  ЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩЩa '4€yID3€ ID€џўtblRoom.pr7€lS€џўtblStay.state,7€lS€џўtblStay.state,7€lS€џўtblStay.state, g77€lS€џўtblStay.state, g77€lS€џўtblStay.state, g7€lS€џўtblStay.state,7€lS€џўtblStay.state, g7€lS€џўtblStay.state, g77€lS€џўtblStay.state, g7€lS€џўtblStay.state, g7€lS7€lS€џўtblStay.state, g7€lSr7€lS€џўtblStay.state, g7€lS7€lS€џўtblStay.sta7€lS€џўtblStay.state, g7€lS€џўtblStay.state, 7€lS€џўtblStay.state, g7€lS€џўtblStay.sta7€lS€џўtblStay.state7€lS€џўtblStay.state, 7€lS€џўtblStay.state, g7€lS€џўtblStay.state, g77€lS€џўtblStay.state, 7€lS€џўtblStay.state, g7€lS€џўtblStay.state, g7€lS€џўtblStay.state, g7€lSroomsЌ@$7€lS€џўtblStay.state, g7€lSroom7€lS€џўtblStay.state, g7€lS€џўtblStay.state, g77€lS€џўtblStay.state, 7€lS€џўtblStay.state, g7€lS€џўtblStay.state, g77€lS€џўtblStay.state, g7€lS€џўtblStay.state, 7€lS€џўtblStay.state,7€lS€џўtblStay.state, g7€џ№+а 7€№+а G6€№+аŠ@ '6€№+а€џўtblServiceReceived.quantity: g6€№+а€џўtblServiceReceived.roomID8 g6€№+аtblServiceReceived555 6€џ№+а 6€№+а G5€№+аŠ@ '5€№+а€џўtblServiceReceived.quantity: g5€№+а€џўtblServiceReceived.roomID8 g5€№+аtblServiceReceived555 5€џ№+а 5€№+а G4€џ№+а 4€№+а G3€џ№+а 3€№+а G2€џ№+а 2€№+а G1€ №+а€џўtblServicereceived.serviceID; '1€ №+а€џўtblServicereceived.date6 '1€№+аtblServiceTypetblServicereceivedn@]Q- 1€№+а€џўtblServicereceived.stayID8 g1€№+аtotal€џў[price]*[quantity]; o1€№+а€џўtblServiceType.price3 g1€№+а€џўtblServicereceived.serviceID; g1€№+а€џўtblServicereceived.roomID8 g1€№+а€џўtblServicereceived.quantity: g1€№+а€џўtblServicereceived.date6 g1€№+аtblServiceType--- 1€№+аtblServicereceived555 1€№+а G1€№+а G#_ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ џџ    џ      џ!!!!!!џ""""""џ# #"###џ!$$$&$'$џ%%(%*%+%џ)&,&.&/&џ-'0'2'3'4'5'6'7'8'9':' ;'џ1(<(>(?(@(A(B(C(D(E(F(G(H(I(џ=)J)L)M)N)O) P) Q)џK*R*T*\*\*\*\*\* \*џS+\+\+\ +\ +\ +џ\,\ ,’Š,’‹,’„,’…,’†,’‡,’ˆ,\,\,џ\ -\-\-\-\-\-\-\- \- \ -џ\.\!.\#.\$.\%.\&.\'.\(.\).џ\"/\*/\,/\-/\./\//\0/\1/\2/\3/\4/\5/\6/\7/\8/ \9/ \:/ \;/ \/ \?/џ\+0\@0\B0\C0\D0\E0\F0\G0\H0\I0\J0џ\A1\K1]1]1]1]1]1]1]1]1]1] 1] 1] 1 ] 1 ] 1џ\L2]2]2]2]2]2]2]2]2]2]2]2]2]2 ]2 ]2џ]3]3] 3]!3]"3]#3]$3]%3]&3]'3](3 ])3 ]*3 ]+3 ],3 ]-3џ]4].4]04]14џ]/\LА^ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€ @€,’‰,’Œ,џ\ -\-\-\-\-\-\-\- \- \ -џ\.\!.\#.\$.\%.\&.\'.\(.\).џ\"/\*/\,/\-/\./\//\0/\1/\2/\3/\4/\5/\6/\7/\8/ \9/ \:/ \;/ \/ \?/џ\+0\@0\B0\C0\D0\E0\F0\G0\H0\I0\J0џ\A1\K1]1]1]1]1]1]1]1]1]1] 1] 1] 1 ] 1 ] 1џ\L2]2``2`a2`W2`X2`Y2`Z2`[2`\2`]2`^2`_2 `b2 ’ 2џ]3]3’}3’~3’v3’w3’x3’y3’z3’{3’|3 ’3 ’€3 ’3 ’‚3 ’ƒ3џ]4].4’t4’s4’u4џ]/5]35]55]65]75]85џ]46]96];6]<6]=6]>6џ]:7]?7`U7`V7’7`N7`O7`P7`Q7`R7`S7`T7 ’ 7 ’ 7 ’ 7 ’ 7џ]@8`8` 8` 8` 8` 8`8`8`8`8`8`8`8`8`8`8 `8 `8 `8 `8 `8 `8 `8џ` 9`9`!9`"9`#9`$9`%9`&9`'9`(9`)9`*9 `+9 `,9џ` 9џ` mvаааааааатФІˆTьЎr2є Ж ‚ N і ž t 6 њ К | >  і и К œ n B  Ъ  > ш d**Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*Ш*ШюД|HЙqCлŸf4њН‚;яП‘ggУgУgУgУgУgУgУgУgУgУgУgУgУgУgУgУgУgУgУ4€v@a '4€4€v@a3€CountOfstate€џ3€CountOfstate€џўCou3€CountOfstate3€CountOfstate€џўCou3€CountOfstate€џўCount3€CountOfstate€џўC3€CountOfstate€џўCou3€CountOfstate€џўCou3€CountOfstate€џўCount(qselRoomState.state)Q)) o2€ z@3 '2€tblGuest!!! 2€qselStays### 2€qselStaystblGuestH@2?3# 2€qstate€џўqselStays.state: o2€€џўqselStays.rooms. g2€€џўqselStays.arrival0 g2€€џўtblGuest.phone- g2€addrd@1% o2€€џўtblGuest.name, g2€€џўtblGuest.guestID/ g2€€џўqselStays.stayID/ g7€tblStay 7€tblGuest!!! 7€tblGuesttblStayD@/;/! 7€tblStayqryRoomsPerStayN@.I= 7€€џўtblStay.state, g7€roomsЌ@-' o7€arrivalD@,+ o7€€џўtblStay.stayID- g7€€џўtblGuest.guestID/ g9€ №+а€џўtblStay.stayID- g9€ №+а€џўtblGuest.guestID/ g9€№+аtblGuesttblStayD@a;/! 9€№+аtblStayqryRoomsPerStayN@aI= 9€№+аFirstOffirstRoomDateH@aE99 o9€№+а€џўtblStay.stayID- g9€№+а€џўtblGuest.guestID/ g9€№+аqryRoomsPerStay/// 9€№+аtblStay 9€№+аtblGuest!!! 9€№+а G9€№+а G9€џ№+а 9€№+а G8€ №+аH@a g8€ №+а€џўqryRoomGrid.price21 g8€ №+а€џўqryRoomGrid.price11 g8€ №+а€џўqryRoomGrid.bedCount3 g8€ №+а€џўqryRoomGrid.type/ g8€ №+а€џўqryRoomGrid.roomID1 g8€ №+а @a g8€№+аqryRoomGridtblRoomStateH@aK?' 8€№+аqryRoomGridtblRoomStateP@aK?' 8€№+аExpr2Ц@a' o8€№+аExpr1H@a' o8€№+а€џўqryRoomGrid.price21 g8€№+а€џўqryRoomGrid.price11 g8€№+а€џўqryRoomGrid.bedCount3 g8€№+а€џўqryRoomGrid.type/ g8€№+а€џўqryRoomGrid.roomID1 g8€№+аRoom @!% o8€№+аtblRoomState))) 8€№+аqryRoomGrid''' 8€№+а G8€№+а G8€џ№+а 8€№+а G, LVALИђЂZN  О p , ,Ь,Ь,Ь,Ь,Ь,Ь,Ь,Ь,Ь,Ь,Ь,Ь,Ь,ЬЖ l tblRoom.roomID = qselRoomState.roomID((tblRoomState.date) Between #10-25-2002# and #10-26-2002#)tblGuest.guestID = tblStay.guestIDtblStay.stayID = qryRoomsPerStay.stayIDFirst(qryRoomsPerStay.firstRoomDate)Format([qryRoomGrid].[date],"dd-mm")(Format([qryRoomGrid].[roomID],'#') & ', ' & Choose([type],'Double, bath','Single, bath','Double, toilet','Single, toilet','De luxe'))qryRoomGrid.date = tblRoomState.dateqryRoomGrid.roomID = tblRoomState.roomIDFirst(IIf([tblRoomState].[state] Is Null,"",Choose([tblRoomState].[state],"BOO","IN","OUT","REP")))Format([qryRoomGrid].[date],"dd-mm")VЂYNccY  Yd Yd roomIDbreakfastAbreakfastBƒџџџџџџџџџџџџџџџџџџce‰ƒџџџџџџџџџџџџџџџџџџcf€YџџџџYџџџџPrimaryKey roomIDџџжЛv1ь@ XbётЯМЉ˜‰vXX 1XX XX  XX   и b @€€ d€ d€ d€d€d€d€d€dи b @€€ d€ d€ d€d€d€d€d€d"жYгNhhггY dateƒџџџџџџџџ4џџџџџџџџџџhk‰YџџџџPrimaryKeyџџЛv18џgџѕъпдЩОГЈ’‡|qf[PE:/$јэтзЬСЖЋ •Šti^SH=2'ћ № х к Я Ф Й Ў Ѓ ˜  ‚ w l a V K @ 5 *   ў ѓ ш н в Ч М Б І ›  … z o d Y N C 8 - "   і ы р е Ъ П Д Љ ž “ ˆ } r g \ Q F ; 0 %    љ ю у и Э Т З Ќ Ё – ‹ € u j _ T I > 3 (    ќ ё ц л а Х К Џ Є ™ Ž ƒ x m b W L A 6 +  џєщогШНВЇœ‘†{peZOD9.# їьсжЫРЕЊŸ”‰~sh]RG<1&њяфйЮУИ­Ђ—Œvk`UJ?4)§ђчмбЦЛАЅš„yncXMB7,! @iт@ iт@iт@рhт@Рhт@ hт@€hт@`hт@@hт@ hт@hт@рgт@Рgт@ gт@€gт@`gт@@gт@ gт@gт@рfт@Рfт@ fт@€fт@`fт@@fт@ fт@fт@рeт@Рeт@ eт@€eт@`eт@@eт@ eт@eт@рdт@Рdт@ dт@€dт@`dт@@dт@ dт@dт@рcт@Рcт@ cт@€cт@`cт@@cт@ cт@cт@рbт@Рbт@ bт@€bт@`bт@@bт@ bт@bт@рaт@Рaт@ aт@€aт@`aт@@aт@ aт@aт@р`т@Р`т@ `т@€`т@``т@@`т@ `т@`т@р_т@Р_т@ _т@€_т@`_т@@_т@ _т@_т@р^т@Р^т@ ^т@€^т@`^т@@^т@ ^т@^т@р]т@Р]т@ ]т@€]т@`]т@@]т@ ]т@]т@р\т@Р\т@ \т@€\т@`\т@@\т@ \т@\т@р[т@Р[т@ [т@€[т@`[т@@[т@ [т@[т@рZт@РZт@ Zт@€Zт@`Zт@@Zт@ Zт@Zт@рYт@РYт@ Yт@€Yт@`Yт@@Yт@ Yт@Yт@рXт@РXт@ Xт@€Xт@`Xт@@Xт@ Xт@Xт@рWт@РWт@ Wт@€Wт@`Wт@@Wт@ Wт@Wт@рVт@РVт@ Vт@€Vт@`Vт@@Vт@ Vт@Vт@рUт@РUт@ Uт@€Uт@`Uт@@Uт@ Uт@Uт@рTт@РTт@ Tт@€Tт@`Tт@@Tт@ Tт@Tт@рSт@РSт@ Sт@€Sт@`Sт@@Sт@ Sт@Sт@рRт@РRт@ Rт@€Rт@`Rт@@Rт@ Rт@Rт@рQт@РQт@ Qт@€Qт@`Qт@@Qт@ Qт@Qт@рPт@РPт@ Pт@€Pт@`Pт@@Pт@ Pт@Pт@рOт@РOт@ Oт@€Oт@`Oт@@Oт@ Oт@Oт@рNт@РNт@ Nт@€Nт@`Nт@@Nт@ Nт@Nт@рMт@РMт@ Mт@€Mт@`Mт@@Mт@ Mт@Mт@рLт@РLт@ Lт@€Lт@`Lт@@Lт@ Lт@Lт@рKт@РKт@ Kт@€Kт@`Kт@@Kт@ Kт@Kт@рJт@РJт@ Jт@€Jт@`Jт@@Jт@ Jт@Jт@рIт@РIт@ Iт@€Iт@.gдѕъпдЩОГЈ’‡|qf[PE:/$јэтзЬСЖЋ •Šti^SH=2'ћ № х к Я Ф Й Ў Ѓ ˜  ‚ w l a V K @ 5 *   ў ѓ ш н в Ч М Б І ›  … z o d Y N C 8 - "   і ы р е Ъ П Д Љ ž “ ˆ } r g \ Q F ; 0 %    љ ю у и Э Т З Ќ Ё – ‹ € u j _ T I > 3 (    ќ ё ц л а Х К Џ Є ™ Ž ƒ x m b W L A 6 +  џєщогШНВЇœ‘†{peZOD9.# їьсжЫРЕЊŸ”‰~sh]RG<1&њяфРƒт@ ƒт@€ƒт@`ƒт@@ƒт@ ƒт@ƒт@р‚т@Р‚т@ ‚т@€‚т@`‚т@@‚т@ ‚т@‚т@рт@Рт@ т@€т@`т@@т@ т@т@р€т@Р€т@ €т@€€т@`€т@@€т@ €т@€т@рт@Рт@ т@€т@`т@@т@ т@т@р~т@Р~т@ ~т@€~т@`~т@@~т@ ~т@~т@р}т@Р}т@ }т@€}т@`}т@@}т@ }т@}т@р|т@Р|т@ |т@€|т@`|т@@|т@ |т@|т@р{т@Р{т@ {т@€{т@`{т@@{т@ {т@{т@рzт@Рzт@ zт@€zт@`zт@@zт@ zт@zт@рyт@Рyт@ yт@€yт@`yт@@yт@ yт@yт@рxт@Рxт@ xт@€xт@`xт@@xт@ xт@xт@рwт@Рwт@ wт@€wт@`wт@@wт@ wт@wт@рvт@Рvт@ vт@€vт@`vт@@vт@ vт@vт@рuт@Рuт@ uт@€uт@`uт@@uт@ uт@uт@рtт@Рtт@ tт@€tт@`tт@@tт@ tт@tт@рsт@Рsт@ sт@€sт@`sт@@sт@ sт@sт@рrт@Рrт@ rт@€rт@`rт@@rт@ rт@rт@рqт@Рqт@ qт@€qт@`qт@@qт@ qт@qт@рpт@Рpт@ pт@€pт@`pт@@pт@ pт@pт@рoт@Рoт@ oт@€oт@`oт@@oт@ oт@oт@рnт@Рnт@ nт@€nт@`nт@@nт@ nт@nт@рmт@Рmт@ mт@€mт@`mт@@mт@ mт@mт@рlт@Рlт@ lт@€lт@`lт@@lт@ lт@lт@рkт@Рkт@ kт@€kт@`kт@@kт@ kт@kт@рjт@Рjт@ jт@€jт@`jт@@jт@ jт@jт@рiт@Рiт@ iт@€iт@`iт@gmРтv€jiliIРiIрiJiJ iJ@iJ`iJ€iJ i JРi Jрi Ki K i K@iK`iK€iK iKРiKрiLiL iL@iL`iL€iL iLРiLрiMiM iM@iM`iM€i M i!MРi"Mрi#Ni$N i%N@i&N`i'N€i(N i)NРi*Nрi+Oi,O i-O@i.O`i/O€i0O i1OРi2Oрi3Pi4P i5P@i6P`i7P€i8P i9PРi:Pрi;QiQ`i?Q€i@Q iAQРiBQрiCRiDR iER@iFR`iGR€iHR iIRРiJRрiKSiLS iMS@iNS`iOS€iPS iQSРiRSрiSTiTT iUT@iVT`iWT€iXT iYTРiZTрi[Ui\U i]U@i^U`i_U€i`U iaUРibUрicVidV ieV@ifV`igV€ihV iiVРijVрikWilW imW@inW`ioW€ipW iqWРirWрisXitX iuX@ivX`iwX€ixX iyXРizXрi{Yi|Y i}Y@i~Y`iY€i€Y iYРi‚YрiƒZi„Z i…Z@i†Z`i‡Z€iˆZ i‰ZРiŠZрi‹[iŒ[ i[@iŽ[`i[€i[ i‘[Рi’[рi“\i”\ i•\@i–\`i—\€i˜\ i™\Рiš\рi›]iœ] i]@iž]`iŸ]€i ] iЁ]РiЂ]рiЃ^iЄ^ iЅ^@iІ^`iЇ^€iЈ^ iЉ^РiЊ^рiЋ_iЌ_ i­_@iЎ_`iЏ_€iА_ iБ_РiВ_рiГ`iД` iЕ`@iЖ``iЗ`€iИ` iЙ`РiК`рiЛaiМa iНa@iОa`iПa€iРa iСaРiТaрiУbiФb iХb@iЦb`iЧb€iШb iЩbРiЪbрiЫciЬc iЭc@iЮc`iЯc€iаc iбcРiвcрiгdiдd iеd@iжd`iзd€iиd iйdРiкdрiлeiмe iнe@iоe`iпe€iрe iсeРiтeрiуfiфf iхf@iцf`iчf€iшf iщfРiъfрiыgiьg iэg@iюg`iяg€i№g iёgРiђgрiѓhiєh iѕh@iіh`iїh€iјh iљhРiњhрiћiiќi i§i@iўi`ji€ji jiРjiрjjjj jj@jj`jj€j j j jРj jрj kj k jk@jk`jk€jk jkРjkрjljl jl@jl`jl€jl jlРjlрjmjm jm@jm`j m€j!m j"mРj#mрj$nj%n j&n@j'n`j(n€j)n j*nРj+nрj,oj-o j.o@j/o`j0o€j1o j2oРj3oрj4pj5p j6p@j7p`j8p€j9p j:pРj;pрjq@j?q`j@q€jAq jBqРjCqрjDrjEr jFr@jGr`jHr€jIr jJrРjKrрjLsjMs jNs@jOs`jPs€jQs jRsРjSsрjTtjUt jVt@jWt`jXt€jYt jZtРj[tрj\uj]u j^u@j_u`j`u€jau jbuРjcuрjdvjev jfv@jgv`jhv€jigm € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € РтI€iI iIРiIрiJiJ iJ@iJ`iJ€iJ i JРi Jрi Ki K i K@iK`iK€iK iKРiKрiLiL iL@iL`iL€iL iLРiLрiMiM iM@iM`iM€i M i!MРi"Mрi#Ni$N i%N@i&N`i'N€i(N i)NРi*Nрi+Oi,O i-O@i.O`i/O€i0O i1OРi2Oрi3Pi4P i5P@i6P`i7P€i8P i9PРi:Pрi;QiQ`i?Q€i@Q iAQРiBQрiCRiDR iER@iFR`iGR€iHR iIRРiJRрiKSiLS iMS@iNS`iOS€iPS iQSРiRSрiSTiTT iUT@iVT`iWT€iXT iYTРiZTрi[Ui\U i]U@i^U`i_U€i`U iaUРibUрicVidV ieV@ifV`igV€ihV iiVРijVрikWilW imW@inW`ioW€ipW iqWРirWрisXitX iuX@ivX`iwX€ixX iyXРizXрi{Yi|Y i}Y@i~Y`iY€i€Y iYРi‚YрiƒZi„Z i…Z@i†Z`i‡Z€iˆZ i‰ZРiŠZрi‹[iŒ[ i[@iŽ[`i[€i[ i‘[Рi’[рi“\i”\ i•\@i–\`i—\€i˜\ i™\Рiš\рi›]iœ] i]@iž]`iŸ]€i ] iЁ]РiЂ]рiЃ^iЄ^ iЅ^@iІ^`iЇ^€iЈ^ iЉ^РiЊ^рiЋ_iЌ_ i­_@iЎ_`iЏ_€iА_ iБ_РiВ_рiГ`iД` iЕ`@iЖ``iЗ`€iИ` iЙ`РiК`рiЛaiМa iНa@iОa`iПa€iРa iСaРiТaрiУbiФb iХb@iЦb`iЧb€iШb iЩbРiЪbрiЫciЬc iЭc@iЮc`iЯc€iаc iбcРiвcрiгdiдd iеd@iжd`iзd€iиd iйdРiкdрiлeiмe iнe@iоe`iпe€iрe iсeРiтeрiуfiфf iхf@iцf`iчf€iшf iщfРiъfрiыgiьg iэg@iюg`iяg€i№g iёgРiђgрiѓhiєh iѕh@iіh`iїh€iјh iљhРiњhрiћiiќi i§i@iўi`ji€ji jiРjiрjjjj jj@jj`jj€j j j jРj jрj kj k jk@jk`jk€jk jkРjkрjljl jl@jl`jl€jl jlРjlрjmjm jm@jm`j m€j!m j"mРj#mрj$nj%n j&n@j'n`j(n€j)n j*nРj+nрj,oj-o j.o@j/o`j0o€j1o j2oРj3oрj4pj5p j6p@j7p`j8p€j9p j:pРj;pрjq@j?q`j@q€jAq jBqРjCqрjDrjEr jFr@jGr`jHr€jIr jJrРjKrрjLsjMs jNs@jOs`jPs€jQs jRsРjSsрjTtjUt jVt@jWt`jXt€jYt jZtРj[tрj\uj]u j^u@j_u`j`u€jau jbuРjcuрjdvjev jfv@jgv`jhv€jiОgl €@ €@ €@ €@ €@ €@ €@ €@ €@ €@ €@ €@ €@ Ртv jjРтvРjkРтvрjlРтwjmРтw jnРтw@joРтw`jpРтw€jqРтw jrРтwРjsРтwрjtРтxjuРтx jvРтx@jwРтx`jxРтx€jyРтx jzРтxРj{Ртxрj|Ртyj}Ртy j~Ртy@jРтy`j€Ртy€jРтy j‚РтyРjƒРтyрj„Ртzj…Ртz j†Ртz@j‡Ртz`jˆРтz€j‰Ртz jŠРтzРj‹РтzрjŒРт{jРт{ jŽРт{@jРт{`jРт{€j‘Рт{ j’Рт{Рj“Рт{рj”Рт|j•Рт| j–Рт|@j—Рт|`j˜Рт|€j™Рт| jšРт|Рj›Рт|рjœРт}jРт} jžРт}@jŸРт}`j Рт}€jЁРт} jЂРт}РjЃРт}рjЄРт~jЅРт~ jІРт~@jЇРт~`jЈРт~€jЉРт~ jЊРт~РjЋРт~рjЌРтj­Рт jЎРт@jЏРт`jАРт€jБРт jВРтРjГРтрjДРт€jЕРт€ jЖРт€@jЗРт€`jИРт€€jЙРт€ jКРт€РjЛРт€рjМРтjНРт jОРт@jПРт`jРРт€jСРт jТРтРjУРтрjФРт‚jХРт‚ jЦРт‚@jЧРт‚`jШРт‚€jЩРт‚ jЪРт‚РjЫРт‚рjЬРтƒjЭРтƒ jЮРтƒ@jЯРтƒ`jаРтƒ€jбРтƒ jвРтƒРjгєYSTЌj:ЌjššNooSSY  YR•d Yd YUd Yd Ytd Y2(guestIDnameaddress1address2address3 phonepassportƒџџџџrџџџџcџџџџ&џџџџnџџosus‰Y‡Yџџџџ.rBPrimaryKeyџџЛv11n(–+РcЂ : и }  З [ џ Ђ @ й s ЅBц"Сc›2Юq Є?жzЙNя)џўAnn Pannellџў310 Upton RoadџўPrahran, Vic 3181џўAustraliaџў03 9121 4161OOA6#?(џўIb Ouretskiџў25 The AvenueџўPrahran, Vic 3181џўAustraliaџў03 9087 6010NN@5"?'џўKim Omdahlџў101 Wellington Crs.џўEast Melbourne, Vic 3002џўAustraliaџў03 9739 9933ZZLA'?&џўB. O'Bryanџў410 Haines StreetџўHawthorn, Vic 3122џўAustraliaџў7763 4589OOD9%?%џўTod O'Brienџў85 Fitzroy RoadџўSt. Kilda, Vic 3182џўAustralienџў7744 3366PPE9$?$џўWayna O'Brienџў2 Main RoadџўMonbulk, Vic 3793џўAustraliaџў7756 2019KK@5"?#џўK. Nordstromџў33 Dandenong RoadџўMalvern East, Vic 3148џўAustraliaџў03 9256 1102XXJ?'?"џўTony Nguyenџў320 Windsor Ave.џўSpringvale, Vic 3171џўAustraliaџў03 9333 1019TTF;%?!џўBent Nelsonџў3 Holden StreetџўFitzroy North, Vic 3068џўAustraliaџў03 9144 5434VVH=$? џўAnne Nelsonџў18 Bradley DriveџўMiddle Park, Vic 3206џўAustraliaџў03 9344 9077UUG<%?џўZ. Nacharџў40 Darren Roadџўoble Park, Vic 3174џўAustraliaџў9977 1133LLA6!?џўBetty Mullerџў530 St. Kilda RoadџўSt. Kilda, Vic 3182џўAustraliaџў9433 2561SSH=(?џўDan Morrisonџў21 Agnes LaneџўMont Albert North, Vic 3129џўAustaliaџў03 8070 3529XXJ@#?џўK. Montgomeryџў1 Brighton RoadџўSandingham, Vic 3191џўAustraliaџў03 9123 6699UUG<&?џўNorma Mitchellџў200 Westley AveџўBrighton, Vic 3186џўAustraliaџў9304 5599QQF;'?џўG. Millџў101 Victoria RoadџўNorthcote, Vic 3070џўAustraliaџў8481 8171MMB7"?џўFrede Merrillsџў30 Elm Ave.џўElsternwick, Vic 3185џўAustraliaџў9122 3754PPE:#?џўTove Meehanџў2 York StreetџўRichmond, Vic 3121џўAustraliaџў8422 1140LLA6"?џўFrode Matiџў38 Irvine CrsџўBrunckswick West, Vic 3055џўAustraliaџў03 8665 4122VVH=!?џўLeo Marshallџў19 Champ LaneџўCoburg, Vic 3058џўAustraliaџў9122 8567KK@5#?џўAnne Manixџў203 Canterbury RoadџўSt. Kilda, Vic 3182џўAustraliaџў9292 5555RRG<'?џўArnold Mahajanџў409 Lamont CrtџўWantima South, Vic 3152џўAustraliaџў9087 2888UUJ?&?џўTerje McMahonџў111 Patricia StreetџўOakleigh, Vic 3166џўAustraliaџў03 8569 0943WWI>*?џўSteve McKayџў48 Bolan StreetџўGlen Waverly, Vic 3150џўAustraliaџў03 8807 3060UUG<$?џўIda McDonaldџў59 Atkinson LaneџўTemplestove, Vic 3106џўAustraliaџў03 9040 2005VVH=&?џўJens McBrideџў48 Langton RoadџўGlenferri, Vic 3122rџўAustraliaџў8306 3053QQF;%?џўLars Luџў20 Ellen StretџўSpringvale , Vic 3171џўAustraliaџў9125 7652LLA6?џўSean Lochrieџў70 Blyth RoadџўAltona, Vic 3018џўAustraliaџў9087 8540KK@5#? џўArne Likiџў31 Widdop CrsџўMoorabbin, Vic 3189џўAustraliaџў9757 5131KK@5 ? џўJean Leonџў25 Melbourne StreetџўMurrumbeena, Vic 3163џўAustraliaџў03 8305 3560VVH=&? џўRom Laceyџў50 Harold RoadџўSydenham, Vic 3037џўAustraliaџў03 9090 8710NN@5!? џўAnn Leџў204 Bridge RoadџўRichmond, Vict 3121џўAustraliaџў9842 7196JJ?4?џўAhmet Issomџў80 Erskine RoadџўEmerald, Vict 3785џўAustraliaџў03 6767 3390QQC8$?џўR. A. Haynesџў12 Highland CourtџўDandenong, Victoria 3175џўAustraliaџў3455 8004WWLA'?џўAndrew Buntingџў50 Buffalo DriveџўLalor, Vict 3075џўAustraliaџў(03) 1533 1217UUE:(?џўYun ChenџўKirschgasse 7џў90482 NurnbergџўGermanyџў+49 970 716 9450JJ8/?џўNiels BieheџўBorups Alle 34џў2200 Copenhagen NџўDenmarkџўA104220 311L??6#_џўOle BrondumџўDyssegaardsvej 12џў2900 HellerupџўDenmarkџў+45 1244 2800џўA305220 102ZM>5&џўLise B. HansenџўNordtoftevej 12џў2860 SoeborgџўDenmarkџў+45 3956 1712џўA102103 512ZM>5'џўJohn Simpsonџў55 Westbank TceџўRichmond, Victoria 3121џўAustraliaџў(03) 9421 3700YYI>%?In)œ<р П c ќ ˜ 8 е x  Б W њ Ÿ D ь“2нƒ(СY§™1аk ЇEсƒ&Щe ЉRџўN. Sorensenџў30 Albion RoadџўBox Hill, Vic 3128џўAustraliaџў03 9355 7711PPB7#?QџўY. Suџў109 Faelen RoadџўBurwood, Vic 3125џўAustraliaџў03 8787 1405JJ<1 ?PџўMia Spokesџў130 Woods AvenueџўMordialloc, Vic 3195џўAustraliaџў03 8171 0303SSE:$?OџўLotte Sooџў5 Cooper StreetџўEssendon, Vic 3040џўAustraliaџў9816 0601LLA6"?NџўPeder Schmidtџў4 Pitt RoadџўRingwood, Vic 3134џўAustraliaџў9714 3021LLA6"?MџўK. Smithџў360 Erasmus RoadџўSyydenham, Vic 3037џўAustraliaџў8122 8009MMB7"?LџўHanne Skidmoreџў79 Stanley StreetџўBrighton, Vic 3186џўAustraliaџў9507 2233SSH=)?KџўT. Siketaџў305 Altona RoadџўKensington, Vic 3031џўAustraliaџў03 8310 0203QQC8"?JџўErik Shearerџў35 Glass StreetџўKew East, Vic 3102џўAustraliaџў03 9218 1766RRD9%?IџўTom Selivanovџў6 Lincoln RoadџўRichmond, Vic. 3121џўAustraliaџў9320 8131PPE:%?HџўDan Schroeterџў111 Yvonne RoadџўDandenong, Vic 3175џўAustraliaџў03 9607 0806TTF;&?GџўW. Saundersџў1 St. Kilda RoadџўMelbourne, Vic 3000џўAustraliaџў9181 5531PPE:%?FџўErik Salomonџў102 Rosamond Crs.џўDoncaster East, Vic 3109џўAustraliaџў9595 8888WWLA'?EџўLiz Salomannџў132 Towerhill RoadџўGlen Iris, Vic 3146џўAustraliaџў8644 1415SSH=(?DџўR. Rutterџў1 Ormond RoadџўElwood, Vic 3184џўAustraliaџў03 9730 7714KK=2 ?CџўJon Rothfildџў80 Tootonga RoadџўMalvern East, Vic 3148џўAustraliaџў03 9468 1213WWI>&?BџўC. Rodestaџў303 Buckingham Drv.џўHeidelberg, Vic 3084џўAustraliaџў03 9347 5612VVH='?AџўM. LarsenџўBanebrinken 200џў2400 Copenhagen NVџўDenmarkџў2547 6081JJ?6"?@џўC. AndersenџўHothersvej 55џў2200 Copenhagen NџўDenmarkџў3144 9087II>5"??џўJan MoldeџўGladsaxegade 20џў2860 SoeborgџўDenmarkџў2070 4467DD90"?>џўIb ThorningџўHaandvaerkerhaven 1џў2400 Copenhagen NVџўDenmarkџў3217 5544PPE<(?=џўLars HansenџўLaesoe Allщ 316џў7500 HolstebroџўDenmarkџў7120 2731HH=4$?<џўRene RathjeџўPetuniagade 27џў3390 HundestedџўDenmarkџў2940 3709GG<3#?;џўB. KristensenџўKjeld Abellsgade 25џў7100 VejleџўDenmarkџў7070 7530JJ?6*?:џўBent KristensenџўFolehavevej 55џў3400 HillerodџўDenmarkџў4637 1805JJ?6'?9џўR. DreckmannџўPaa Bjerget 57џў2400 Copenhagen NVџўDenmarkџў3755 3210LLA8$?8џўBo SorensenџўHedehusvej 102Bџў2640 HedehuseneџўDenmarkџў4650 8542II>5$?7џўLouis Robertsonџў90 Percy StreetџўMontmoreney, Vic 3094џўAustraliaџў9787 9010UUJ?(?6џўJane Riceџў10 Frank StreetџўFrankston, Vic 3199џўAustraliaџў03 9318 3041PPB7"?5џўDan Reeveџў2 Malvern RoadџўSyndal, Vic 3149џўAustraliaџў03 9151 3577LL>3!?4џўSusan Randlџў102 Albion Crs.џўGemsbrook, Vic 3783џўAustraliaџў03 9135 8265RRD9$?3џўM. Quargџў110 Hillingdon PlaceџўPrahran, Vic 3181џўAustraliaџў9805 0816OOD9&?2џўMeg Powerџў760 Edinburgh StreetџўRichmond, Vic 3121џўAustaliaџў03 8122 4977SSE;'?1џўThomas Powellџў10 Burke RoadџўHawthorn East, Vic 3123џўAustraliaџў03 9686 3676VVH=$?0џўPer Plumbџў110 Devoy LaneџўOakleigh, Vic 3166џўAustraliaџў9373 9390KK@5!?/џўP. Phungџў888 Hammond RoadџўDandenong, Vic 3175џўAustraliaџў03 8307 9493PPB7"?.џўCarl Pedersenџў4 Queens LaneџўAltona, Vic 3018џўAustaliaџў03 9436 7805NN@6$?-џўKarl Petersenџў440 Queens StreetџўAltona, Vic 3018џўAustraliaџў9488 0605PPE:(?,џўJean Petchџў23 The GroveџўCoburg, Vic 3058џўAustraliaџў03 9699 1117KK=2 ?+џўVic. Pearsonџў200 Hunter RoadџўRichmond, Vic 3121џўAustraliaџў9422 8182OOD9%?*џўMie Pascoeџў120 Burbank AvenueџўTullamarine, Vic 3043џўAustraliaџў9807 3301SSH=&?.nŸ@TџўA. Sykesџў87 Bayswater StreetџўCroydon, Vic 3136џўAustraliaџў9805 5500NNC8%?SџўJan Sorensenџў1 Westbank Trc.џўRichmond, Vic. 3121џўAustraliaџў9341 2201PPE:%?5 n @€ @€ @€ @€ @€ @€ @€ @€ @€ @€€p€p€p€p€p€p€p€p€ p€ p € p € p €p €p €p€p€p€p€p€p€p€p€p€p€p€p€p€p€p€p€ p€!p€"p €#p!€$p"€%p#€&p$€'p%€(p&€)p'€*q€+q€,q€-q€.q€/q€0q€1q€2q€3q €4q €5q €6q €7q €8q€9q€:q€;q€<q€=q€>q€?q€@q€Aq€Bq€Cq€Dq€Eq€Fq€Gq€Hq€Iq€Jq €Kq!€Lq"€Mq#€Nq$€Oq%€Pq&€Qq'€Rq(€Sr€Tr^šYџџџџџџџџџџџџNuuY Y Y Y Y   roomIDbedCounttype price1 price2ƒџџџџџџjџџџџtџџџџmџџџџPuwrt‰YxYџџџџ.rBPrimaryKeyџџЛv1€@@ZtяоЭМЋš‰xCШBCШBpBФ\:ДBpBмB B  BФ\:  BФ\: мB Bш t€@ € v€ v€ v€v€v€v€v€v€ xY"Nyy""" "Y Y Y Y Y  stayID roomIDdatepersonCount stateƒџџџџџџџџ џџџџџџџџy{‰ƒџџџџџџџџџџџџџџџџџџy|€ƒџџџџџџџџџџџџџџџџџџџy€YџџџџYџџџџYtPrimaryKeyRoomStatestay#&tblRoomtblRoomStateџџЛv1ьЇ  x"щвЛЄv_H1ьеОЇybK4я и С Њ “ | e N 7 ђ щ Vт@ъРVт@ъ Vт@т@Vт@т Vт@срUт@сРUт@ъ€Vт@ъ`Vт@сVт@урUт@з@Vт@з Vт@зVт@з@Vт@з Vт@зVт@р  Vт@р €Vт@ Vт@ рUт@ъ РVт@ъ  Vт@ъ €Vт@й Vт@й Vт@й рUт@и РUт@ъ €Vт@и Vт@и Vт@и рUт@ф `Mт@ф @Mт@ x€ РтM@z€ РтM`z€ РтUрz€ РтVz€ РтV z€ РтV€z€ РтUРz€ РтUрz€ РтVz€ РтV z € РтV€z € РтV z € РтVРz € РтUрz € РтVz€ РтV€z€ РтV z€РтVz€РтV z€РтV@z€РтVz€РтV z€РтV@z€РтUрz€РтVz€РтV`z€РтV€z€РтUРz€РтUрz€РтV z€РтV@z€РтV z€РтVРz €РтV z!ю x @€ @€ @€ @€€z €z€зz€зz€зz€зz€зz€зz€иz€иz€иz€иz€йz€йz€йz €рz€рz€сz€сz€сz€тz€тz€уz€фz€фz€щz!€ъz€ъz €ъz €ъz €ъz€ъz€ъz€ъz ж "YN~~Y Y Y Y  Y  stayID roomIDserviceIDdatequantityƒџџуџџќџџџџ1џџуџџќџџџџ1џџу~€1ќу€ƒџџуџџќџџџџ1џџуџџќџџџџ1џџу~1ќу€ƒџџуџџќџџџџ1џџуџџќџџџџ1џџу~‚1ќу€Y‡YџџџџYџџџџYџџџџYƒL{CDD1965B-66CA-11D6-8769-000086394B13}serviceIDServicestay# stayID@tblServiceTypetblServiceReceivedџџЛv1ьЇ€€Ž}щвЛЄи Vт@уVт@срUт@и рUт@ќ }€€€€}€@ € € €€ќ }€и€и€с€уЌLY N„„ Y  YrdY serviceIDname priceƒџџџџaџџџџ џџџџaџџџџDџџ„†EC‰Y}Yџџџџ.rBPrimaryKeyџџЛv1@ щƒ сТЃ‡oX>%  @AџўChampagne  Р?џўSweets Р?џўPeanuts @џўBeer €@џўSauna €?џўTelephone Р@џўBreakf. room €@џўBreakf. rest :Ф\џў(choose one) Я ƒ @€€…€…€…€…€…€…€…€ …€ …Љ OY ъNˆˆ  Y Y Y Y   stayIDguestIDpaymethod stateƒџџџџџџџџdџџYџџџџџџџџˆŠd €ƒџџџџџџџџ џџџџџџџџџџˆ‹ Y‰Y}YnYџџџџYџџџџ.rDL{CDD1965A-66CA-11D6-8769-000086394B13}guestIDPrimaryKeyџџжЛv1ь7‡ ётгФЕІ—ˆyj[ъ щTчTфутсрйизН ‡ @€€‰€‰€‰€‰€‰€‰€‰€‰€ ‰ €T‰€T‰ Н ‡ @€€з‰€и‰€й‰€р‰€с‰€т‰€у‰€ф‰€ч‰€щ‰ €ъ‰ a—YџџџџџџџџџџџџNY Y Y Y Y Y Y eY FirstOfdateCountOfdate roomIDroomTypepersonCount price total stayIDџџdЛv@@„ŒЫ– ирUт@€[@ t@(  џ иРUт@T@T@(  џЉ YЖ‚ С tblServiceTypetblServiceReceivedtblServiceReceivedserviceIDtblServiceTypeserviceIDВ „rNџtblRoomtblRoomStatetblRoomStateroomIDtblRoomroomIDrfXL4џ{CDD1965B-66CA-11D6-8769-000086394B13}tblServiceReceivedstayIDtblStaystayIDЄ˜Š~Zџ{CDD1965A-66CA-11D6-8769-000086394B13}tblStayguestIDtblGuestguestID”†vhZџ{CDD19659-66CA-11D6-8769-000086394B13}tblRoomStatestayIDtblStaystayID˜Œ~rZџ2 x€@ @ @ @ @€ z€ z€ z€ z€ z€ z€ z€ z€ z€ z € z € z € z € z € z€ z€ z€z€z€z€z€z€z€z€z€z€z€z€z€z€z€z€z €z!QQэvcP=*Г z№ н Ъ З @ -  Ѓ  } j ѓ р Э К C 0  ї € m Z G а Н Њ — њƒp]цгРI6#Ќ™†ќщr_LеТЏ8%›ˆuўыиaN;ФБž'€џџч €џџ ч €џџ ={‰]mѓОьAѕТ#G0-вВїƒ€Tu0PюЙPЉЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎЄ™RУ >оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5oџџP–@]ђ€]ђ ]ђРэ$L.FэЖ tblCalendar F%N.HЖdelete * from tblCalendar LB@Pџ .ў R T’rU€€€ h!!51С™щ9a‰)Ё‘Й Йс YЁY )!q"™#Б"с"#I#q# $y%9&‰'ё' ((љ)Ё*Й* ,Ё-љ.щ9/Y//Љ/Щ/ё*ЉF)G™G9?QyЁџџџџ)@LС !ЩtttбџџџџџџџџџџџџџџџџQџџџџџџџџџџџџџџџџџџџџџџџџ‘џџџџџџџџ@PЉ aб џџџџџџџџџџџџбџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@T сzzzџџџџџџџџџџџџџџџџџџџџ@ X с1 ‚‚‚Qџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@\С ! бџџџџџџџџџџџџџџџџQџџџџџџџџџџџџџџџџџџџџџџџџ‘џџџџџџџџ@`щ 1”””џџџџб џџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@d Q˜˜˜џџџџџџџџџџџџџџџџџџџџ@ h сй rrrџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@lщ i|||џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@pщ ‘~~~џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@tq ЁЙxxxQ ‘ @ x сй„„„‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@|С !ёˆˆˆбџџџџџџџџџџџџџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@€щ  ŒŒŒџџџџQ џџџџџџџџџџџџ‘ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ „ с!†††бџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ˆ A]žšK[€€€џџџџџџџџџџџџџџџџџџџџ@ŒЙ Сс pppџџџџџџџџџџџџџџџџџџџџџџџџ)”/i‡Сп7wЗї7wЗ_Ÿп_Ÿп_Ÿп_Ÿп_Ÿп _ Ÿ п  _ Ÿ ,ЬCxџlxџF8џѕѕ:hџNXџXџl Hџ Hџћя(џ:џћяџѕѕ:јўNшўшўlиў иўћяШў:ИўћяЈў`1xџ6XџHџ(џшўџиўШўЈў@lxџœў:hџ% ўЄў$ јЄў H ў 0œў @)Єў ўœў рЬ( xџ8 Єў ўœўXџHџ(џџшўиўШўЈўˆ8Cxџ lxџ*1xџ lxџ*1xџ  єаtGlxџ *F(џѕѕ:Xџ!NHџHџl Mhџ@8џ 8џћяџ`1xџ6Hџ(џ8џџ єкЦGlxџ"*F(џѕѕ:Xџ!NHџHџlMhџ@8џ 8џћяџ`1xџ6Hџ(џ8џџ lxџ#*1xџ  єаGAЪjoџџ0–€]ђРэЖ tblCalendar L%N., ,"Z R @(B ,B@BЖfrmRooms B@ьAјoџџА–рoџџ џџџџ˜џџџџЗAttribute VB_Name = "Form_frmFindStay"  œBasœ0{28453494-54A1-11D6-8769-086394B13} |GlobaBlиSpacIFalse dCre atablTru PredecdlaIdД"E`xpose_TemplateDeriv–Cus`tomizD$' ‘ ‘ Option CШompK D_€” €Glicit € Dim sa€:HSelАs,Guest‚ ' S SQL prior to ‚Hi€Jry. A one-level stack. Null when pty.LPqu Su b fnc/ckA€*() If Not IsEС( &) TExxitAУ JР^CurrentDb.QueryDe fs!qs„6.s‹ ˆ8= е E’nBubP3UnB>џЫ3ц2о.Р7Ъ;У2Ѓ-Ш—Ч3 Cƒz=‚m W9QEŠ(arsl@—e As Variant, includТInteИger@wš S€љ ng„€%"SEL€ECT tbl"Ф.gсNID,!a .€*yсMin(qryRoomsPerbfirst!Ё) AS Є, " & _+у AK"С[ь].„[rР ID]) IIf(Count(ј>1,' + ...','ў'BAg х ˜ЭFROM† INNER JOIN (ф LEFTуCЌ ONŒ!р&l§Є$)ЮcJ+ e„-ЎGROUP BўY&з2E Р4С#.yЩC<> "any" OrЦC< cXAnyЂzЇ4s`s@1"HAVINGў Ж7aU С‚!Х†(_F= #!5ЁЈ atIZHmm-d(d-y"СC"#g +' !dIfчѕAр…Ebh ІANDьХ> cBooРkOrIn охH!A1 чр(ф `0яC* %=(т­g)'ы<Ъ ЂedЧ OŽR)VСЈ,cIn(їD<Щ)F;ФON|]a#7OKp…feгE:s(cr@d KГH, e0qualСIаleњaа vѓ4MџKcq ѕKgfѕJj7Mn№ W2/[add@ress1]'R,`w& 52?s<3]O@ПЦphљ€y, ч R'LћГ<аTq“dvТLцр RIGHЄKu1KЛїeF=ўD•/0(v0 B"?AР2& "WРHERE (‘$џ },“/A– s+Ёаui7E€Ÿ:1DzDL€ike ('*‘§Є* _TЁй+Ÿ, ORD_Uiif(‡Ф is nр’, #РЋ-20Ш40#?l),$я1пkТ&"/Ё‹32 с P1йђ‹ubp Т˜qё’Ёlх˜Me.su bQLP.SourceObjecrtР"fШДRП№p˜c ьбI.Д= Recor!В0т$ m€0ag`"No ђ#s match Ѕat you ask fo 0 Then‡УРNot  s!D .closeOK‚ Exi tТ*'†cann@ $forced B GƒЁ€ase Ю ,€SaveYeРDСС' OnXly РmCwoo w may=open in this versiоoФ/ИСCOР 2=, CC"Add§0мcK‡cП[Aњ Ру П[gП[п-й-ур!lcSou A#PMє"fht"ЈNП[C%?:o!=':ЁЂ:c#Х sDel`bed.ƒLnјew uj!ПЈаƒў!šƒ%Tс€ЎBАЋџ!VвMп+G Щ+‡(СрФФ"7с!A"ID џђƒџŒА§ŒС`Ÿ_џHо‡џ#2!aŽsŽпaЅ:aa{F"c+чЯБFc)СЃс1Edit•-1Ї' DРon't uцЊQ. It also Аos AllЄow01itPRsxausing much confUрoрTfрTeЁr tabs frфom"ex u   gan empўtZуb6рџ†ѕ†}‡YK/ReР Vs@ad†St„wNullУрcritNamReitРriHtPhёd= ŽDБw= ЂŠRoomФmodCom@mon.si3- ЄфInclu~d РdA tAяi}Ayyz•Е“,ќ 0є‰XB‚ЁB`–^žš"LVALаxт є КbW@MR2т€ColumnWidthColumnHiddenRecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOnReplicable1  <  MR2~€RecordLocksODBCTimeoutMaxRecordsColumnWidthColumnHidden  <A& tblCalendar.date   )show   MR2т€RecordLocksODBCTimeoutMaxRecordsColumnWidthColumnHiddenReplicableRecordsetType FilterOrderByOrderByOn1  <   A& tblCalendar.date   MR2Ь€ColumnWidthColumnHiddenRecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOn9FirstOfstate ь 1  <  MR2ђ€RecordLocksODBCTimeoutMaxRecordsRecordsetTypeMR2т€ColumnWidthColumnHiddenRecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOnReplicable1  <  MR2~€RecordLocksODBCTimeoutMaxRecordsColumnWidthColumnHidden  <A& tblCalendar.date   )show   MR2т€RecordLocksODBCTimeoutMaxRecordsColumnWidthColumnHiddenReplicableRecordsetType FilterOrderByOrderByOn1  <   A& tblCalendar.date   MR2Ь€ColumnWidthColumnHiddenRecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOn9FirstOfstate ь 1  <  MR2ђ€RecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOnColumnWidthColumnHiddenCaptionReplicable1  <  UBreakfastA *   Breakf. rest="tblRoom.roomID § 5BreakfastB “ MR2$€RecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOnReplicableColumnWidthColumnHiddenDescription"DatasheetFontName&DatasheetFontHeight&DatasheetFontWeight&DatasheetFontItalic,DatasheetFontUnderlineTabularCharSetTabularFamily$DatasheetForeColorЭ  <   Guests. &Guests.arrival DESC Arial        " ="tblGuest.phone Џ  )addr е  ; tblGuest.name   MR20€ Title AuthorCompanyT hotelsys" Soren Lauesen ITUuA‰vџьйЦO<)В Ÿ Œ   я x e R л Ш Е > +  Ё Ž {  ё о g T A ЪЗ@-ЖЃ,ЂŽ{ёzgTнЪS@ЩЖ?,ЕЂ%€ў ч %€џў ={‰]mѓОьAѕТ#G0-вВїƒ€Tu0PюЙPЉЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎЄ™RУ >оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5€џџч >€џџ ={‰]mѓОьAѕТ#G0-вВїƒ€Tu0PюЙPЉЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎЄ™RУ >оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5€ў ч =€џџч =€џџ ={‰]mѓОьAѕТ#G0-вВїƒ€Tu0PюЙPЉЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎЄ™RУ >оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ЋFіџџџџ› &†€tblRoomЌ qtblRoomState+hџџџџM›&†€tblRoomЌ qtblRoomStateкН#џџџџ<&†qtblGuestЌ qtblStay>,ˆ]џџџџ?Ќ qtblRoomStateВEQџџџџŒ сuрІџџџџЛ сuрІџџџџј&†DtblCalendarY1‡bџџџџ'ЊЌ €tblRoomStateNš|Ыџџџџ'&†SqselServiceAЌ qtblRoom2’SqselServiceBР \qryBreakfastRooms™V+џџџџяИ&†€qselStaysПtblGuest=”wџџџџLCwstblGuesttblGuestЧŠ'ѕtblRoomtblRoom0‰єtblRoomStatetblRoomState/ytblServiceReceivedtblServiceReceivedФ$[tblServiceTypetblServiceTypeŸHџЄtblStaytblStayЖ  AtŽЯlѕŒ€Œ Œœ‹;‹иŠŒМYo,Aт@N>Ÿ]{Aт@tblStayRooms чЙ@ FFF:::::::8 џ@gjMѓnр=т@1€zЯПAт@tblCalendar чЫ@DDD88888886 џ@5€}ФГт=т@7œ. у@qselServiceA чх@šє@›RFF:::::::8 џ@1€>0МБт=т@ўљЃ…p?т@qryStayServices чх@š@@›XLL@@@@@@@> џ@-€B1sUAт@мГ‰UAт@qryRoomsPerStay чR@šє@—XLL@@@@@@@> џ@(€fЂЭЇт=т@љ|іИЖAт@qryBreakfastList чю@•и@—ZNNBBBBBBB@ џ@'€љИ]Jpzт@ъ(epzт@Guests ч–@•@@—F::......., џ@$€_ o0Гт@_ o0Гт@~sq_ffrmServiceList ч4€MR2€KeepLocal TˆˆˆHHHHHHHF џ@#€г_‡вUЧт@г_‡вUЧт@~sq_ctestBreakfast~sq_csubBreakfastList ч4€MR2€KeepLocal TАААpppppppn џ@ €Oъ— у@Oъ— у@~sq_cfrmStay~sq_csubStayServices ч4€MR2€KeepLocal TЂЂЂbbbbbbb` џ@6D‰vџьйbO<Х В ; ( Б ž ' А  &  œ ‰  џ ˆ u b ыиХN;(Бž‹юwdQкЧД=* z№нfS@ЩЖЃ,|iђпЬ4€џџ ч 3€џџч 3€џџ ={‰]mѓОьAѕТ#G0-вВїƒ€Tu0PюЙPЉЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎЄ™RУ >оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5ь мьAѕТ#G0Ы{NŠT ЉU—рџiѕЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎ{––›А.ˆх}аиИ-+ТУЪJ~xT5г{б#СX3Њt{5 +  Ё Ž {  ё о g T A ЪЗЄ-}jѓр9€џџч 9€џџ ={‰]mѓОьAѕТ#G0-вВїƒ€Tu0PюЙPЉЃЃm=Р]uќМ@ь*U(M…€-ДЎтЎЄ™RУ >оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5оAHЕa [ЄrDЪJ~xT5г{б#СX3Њt{5€OrderByOnColumnWidthColumnOrderColumnHiddenDecimalPlacesDefaultValueRequiredDisplayControlRowSourceTypeRowSourceBoundColumnColumnCountColumnHeadsColumnWidthsListRowsListWidthLimitToList FormatValidationRuleValidationText FilterOrderByDescriptionInputMaskCaption _ roomID “   џ  0  mbedCount *   џ  0  m Value List> 61;"Bad";2;"Toilet";3;"Delt"       567;1441  1985twip ‰type С   џ  0  o Value ListЎ І1;"Double, bath";2;"Single, bath";3;"Double, toilet";4;"Single, toilet";5;"De luxe"       1440;1440  2880twip q price1 „     0  m  Fixedq price2 H     0  m  FixedMR2Ь€OrderByOnColumnWidthColumnOrderColumnHiddenRequiredAllowZeroLengthDisplayControlDescription ;guestID §  Qname Э     mqaddress1 ц     m Free useaddress2 ›     m4 ,Foreigners have no ZIPYaddress3       m{passport џџџџ     m" E.g. A3869038Ѓ phone c  P HOnly last four digits used in search   m@LVALЧRMR2Р€OrderByOnColumnWidthColumnOrderColumnHiddenDecimalPlacesDefaultValueRequiredDisplayControl FormatDescriptionRowSourceTypeRowSourceBoundColumnColumnCountColumnHeadsColumnWidthsListRowsListWidthLimitToList cquantity џџџџ   џ  0  mЎdate     Short Date T LThe date when the service was receivedЋserviceID џџџџ   џ  0  o Table/QueryЦ ОSELECT DISTINCTROW [tblServiceType].[serviceID], [tblServiceType].[name] FROM [tblServiceType];      975;1050  2025twip   roomID §   џ  0  m Table/Queryц оSELECT DISTINCTROW [tblRoomState].[roomID], [tblRoomState].[date], [tblRoomState].[stayID] FROM [tblRoomState];      765;780;705  2250twip > 6To help trace service notesз stayID С   џ  0  o Table/Query tblStay        0twip MR2Ц€OrderByOnColumnWidthColumnOrderColumnHiddenDecimalPlacesDefaultValueRequiredDisplayControlRowSourceTypeRowSourceBoundColumnColumnCountColumnHeadsColumnWidthsListRowsListWidthLimitToList Format FilterOrderByC . &tblRoomState.stayIDЛ stayID џџџџ   џ  0  m Table/Queryд ЬSELECT DISTINCTROW [GuestStays].[stay#], [GuestStays].[guest#], [GuestStays].[name] FROM [GuestStays];        645;615;1440  2700twip ‡ roomID џџџџ   џ  0  m Table/QueryЂ šSELECT DISTINCTROW [Room].[room#], [Room].[bath], [Room].[#beds] FROM [Room];       615;675;735  2025twip ipersonCount џџџџ   џ  0  mVdate џџџџ   dd/mm/yy + state џџџџ   џ  0  o Value ListP H1;"booked";2;"in";3;"out";4;"repair"       567;1441  2008twip ХLVAL@ 1xлMR2т€RecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOnReplicableColumnWidthColumnHidden1  <  ="tblStay.stayID H  I.(FirstOffirstRoomDate    MR2‚€ FilterOrderByOrderByOnColumnWidthColumnOrderColumnHiddenM8 0tblStayRooms.FirstOfdate CFirstOfdate G  CCountOfdate џџџџ  9 roomID џџџџ  =roomType џџџџ  CpersonCount џџџџ  7 price џџџџ  7 total џџџџ  9 stayID џџџџ  MR2š€OrderByOnColumnWidthColumnOrderColumnHiddenDecimalPlacesDefaultValueRequiredDisplayControlRowSourceTypeBoundColumnColumnCountColumnHeadsListRowsListWidthLimitToListRowSourceColumnWidths ЗguestID џџџџ   џ  0  o Table/Query         3450twip Ь ФSELECT DISTINCTROW [tblGuest].[guestID], [tblGuest].[name], [tblGuest].[address1] FROM [tblGuest];" 737;1232;14729 stayID џџџџ  ;paymethod џџџџ   џ  0  o Value ListX P1;"Cash";2;"Visa";3;"Master";4;"Company"       567;1134   1701twip 1 state џџџџ   џ  0  o Value ListT L1;"booked";2;"in";3;"out";4;"canceled"       1440;1440   2880twip MR2Ž€OrderByOnColumnWidthColumnOrderColumnHiddenRequiredAllowZeroLengthDisplayControlDecimalPlacesDefaultValue FilterOrderByValidationRuleValidationTextDescription FormatCaptionInputMask ?serviceID Ђ  Qname ь     m‰ price п   џ  0  m  $0.00 !\$999.00!LVALааV 7MR2д€AccessVersion Build"Show Values Limit,Show Values in Indexed4Show Values in Non-Indexed*Show Values in RemoteAppTitleStartUpForm&StartUpShowDBWindow(StartUpShowStatusBarStartUpMenuBar$AllowShortcutMenusAllowFullMenus(AllowBuiltInToolbars&AllowToolbarChanges$AllowBreakIntoCode AllowSpecialKeysAppIcon,StartupShortcutMenuBar6Track Name AutoCorrect Info0Perform Name AutoCorrectCpgConversionHijriCalendarAuto Compact8Log Name AutoCorrect Changes4Four-Digit Year FormattingProjVerG 08.50 ю ш     Hotel system               ф (  Form.frmFindStay    #MR2 €RecordLocksODBCTimeoutMaxRecordsRecordsetType FilterOrderByOrderByOnReplicableColumnWidthColumnHidden"DatasheetFontName&DatasheetFontHeight&DatasheetFontWeight&DatasheetFontItalic,DatasheetFontUnderlineTabularCharSetTabularFamily$DatasheetForeColor‹  <   Arial         " ="tblGuest.phone А  )addr   A& qselStays.stayID В  ; tblGuest.name   - qstate Ѓ  LVALжљ@!ЕЪОx™„‚xtblStayRooms qselGuestStays frmFindStayAsciiTransformў№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$frmBreakfastList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$jfrmFindStayList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ПfrmMessageGuest№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$frmMessageRoom№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$MfrmRoomseRoom№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$jMfrmServiceList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ПMfrmStayceList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$MfrmTestceList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$˜fsubBreakfastList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$j˜fsubRoomGrid1ist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ϘfsubRoomGrid2ist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$˜fsubStaLVALM&Tƒ ‡dƒx;Tƒ‡ƒИ9Tƒ ‹р?Tƒ‡ƒP№9T=T" =T >T$=T"0=T№=T4=T"@=TИ=TD=T"P=Tˆ=TT=T а:T„џџџџˆƒ[address1]…Œ=T•ƒ', '‰ М=T ;T„џџџџˆƒ[address2]…є=T•ƒ', '‰ $>T @;T„џџџџˆƒ[address3]…\>T„=T„ƒX=T`T„ƒ(>Tx>T„œ>T"Ј>Tа>TЌ>T (:T›д>T%…р>Tф>T%№>Tƒ є>T?T`?T„?TK[|џџXkџџP ВKTЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$V'P P @!BœЖ#You can only check guests in today.Ќ $8Ж0You may have to change the booking for the guest ŽA&|џџhkџџ` џџ!ZЌœЖ6You have not chosen a paymethod. Check with the guest. XA&|џџkџџјЖ*SELECT * FROM tblRoomState where [stayID]= џџ!єЖ;'`э ` L%N., ,!Bє ,B@D Д ,): ,B@X ,B@Hѓџџ@ ,B@B ДKTЖGThe guest is checked in already. Do you want to give him one more room? Z \ $& 0›G|j Є ІЗ f%Ђ›G|jрK" Error message made: Select a roomЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$X'T Є @!B œЖ!You can only check in from today. ŽA&|џџиkџџа Є TЌ œЖ)There cannot be a gap in the stay period. ŽA&|џџxkџџp џџ!є Д f%Ў›G|jрD" Error message made: Room not freeSр e.g. checked out or cancelledЖ"This booking cannot be checked in. ŽA&|џџˆnџџ€ Д џџ(: b d L N 'J џџB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls XrefreshoџџР–€]ђРђи]ђ№]ђ џџ!R$  џџ!T$ œЖDYou must fill in at least the guest name and the first address line. ŽA&|џџkџџ џџ":ъ ДKTЖdateЖ tblRoomStateЖtblRoomState.stayID= џџ!єЖ0$Ќ$V'P P @!BœІ Ж$The guest has been checked in today.Ќ $8ЖCDo you want to check him out and give him an invoice for one night? Z \ $& 0œЖ2Do you want to cancel the stay without an invoice? Z \ $& 0›G|j  џџ(:р# Cancel the staydџџp @!B'Tр- Free the rooms from tomorrowkџџ8dџџ0 @!B set the query џџ!Ь$  џџ!ЬЖany џџ!Ь$†›G|jрo Date not valid, focus not changeable. Since this cmd is the default, it cannot be canceled, so it has to checkAІAО џџ!РB@oџџP–р]ђ  џџ!Р!ТЖ fsubStayListœ џџ!Р!r"в'аAžЖany ЎAЈЖtblGuest.guestIDЗ аAЖAО џџ!РB@dџџЈ B@дkџџoџџˆ–8AžЖany ЎAЈЖtblGuest.guestIDЗ аAЌ 'Tр- Free the rooms from todaykџџ№ џџ!ZЌ џџ!: ДœЖ6You have not chosen a paymethod. Check with the guest. XA&|џџ€ kџџx џџ!: Д›GЖXAt this point the system would print the final invoice. This test system prints nothing. XA&jрJ Delete any remaining days from the stay, set invoiced days to checked outЖ*SELECT * FROM tblRoomState WHERE [stayID]= џџ!єЖ;'`э ` L%N., ,!Bє ,"Z TœЖAОЖstayID= иX  џџ!Р!r!tB@к џџ!Р!r!t!x џџ!Р!r(x џџ!РB@oџџШ–Ир Guest and stay to be created р тЖfrmStay$оЌœ ф"ц!ш›G|jр3 Stay cannot be forced close тЖfrmStay ъ B@Bр1 Only one Stay window may be open in this versionkџџиЖfrmStayааа юаЌ B@ьoџџЈ–ј р тЖfrmStay$оЌœ ф"ц!ш›G|jр3 Stay cannot be forced c ,B@D  ,): ,B@Xdџџ№ ,B@`kџџи ,B@HѓџџР ,B@BSџџЈ Ж?You can only check guests out if they are currently checked in. ŽA&|џџP nџџH џџ!: Д›G  џџ(:jр+" Stay may have been canceled above b d L N 'J џџB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Sav<žšK[Tru PredecdlaIdД"E`xpose_TemplateDeriv–Cus`tomizD$' ‘ ‘ Option CШompK D_€” €Glicit € Dim sa€:HSelАs,Guest‚ ' S SQL prior to ‚Hi€Jry. A one-level stack. Null when pty.LPqu Su b fnc/ckA€*() If Not IsEС( &) TExxitAУ JР^CurrentDb.QueryDe fs!qs„6.s‹ ˆ8= е E’nBubP3UnB>џЫ3ц2о.Р7Ъ;У2Ѓ-Ш—Ч3 Cƒz=‚m W9QEŠ(arsl@—e As Variant, includТInteИger@wš S€љ ng„€%"SEL€ECT tbl"Ф.gсNID,!a .€*yсMin(qryRoomsPerbfirst!Ё) AS Є, " & _+у AK"С[ь].„[rР ID]) IIf(Count(ј>1,' + ...','ў'BAg х ˜ЭFROM† INNER JOIN (ф LEFTуCЌ ONŒ!р&l§Є$)ЮcJ+ e„-ЎGROUP BўY&з2E Р4С#.yЩC<> "any" OrЦC< cXAnyЂzЇ4s`s@1"HAVINGў Ж7aU С‚!Х†(_F= #!5ЁЈ atIZHmm-d(d-y"СC"#g +' !dIfчѕAр…Ebh ІANDьХ> cBooРkOrIn охH!A1 чр(ф `0яC* %=(т­g)'ы<Ъ ЂedЧ OŽR)VСЈ,cIn(їD<Щ)F;ФON|]a#7OKp…feгE:s(cr@d KГH, e0qualСIаleњaа vѓ4MџKcq ѕKgfѕJj7Mn№ W2/[add@ress1]'R,`w& 52?s<3]O@ПЦphљ€y, ч R'LћГ<аTq“dvТLцр RIGHЄKu1KЛїeF=ўD•/0(v0 B"?AР2& "WРHERE (‘$џ },“/A– s+Ёаui7E€Ÿ:1DzDL€ike ('*‘§Є* _TЁй+Ÿ, ORD_Uiif(‡Ф is nр’, #РЋ-20Ш40#?l),$я1пkТ&"/Ё‹32 с P1йђ‹ubp Т˜qё’Ёlх˜Me.su bQLP.SourceObjecrtР"fШДRП№p˜c ьбI.Д= Recor!В0т$ m€0ag`"No ђ#s match Ѕat you ask fo 0 Then‡УРNot  s!D .closeOK‚ Exi tТ*'†cann@ $forced B GƒЁ€ase Ю ,€SaveYeРDСС' OnXly РmCwoo w may=open in this versiоoФ/ИСCOР 2=, CC"Add§0мcK‡cП[Aњ Ру П[gП[п-й-ур!lcSou A#PMє"fht"ЈNП[C%?:o!=':ЁЂ:c#Х sDel`bed.ƒLnјew uj!ПЈаƒў!šƒ%Tс€ЎBАЋџ!VвMп+G Щ+‡(СрФФ"7с!A"ID џђƒџŒА§ŒС`Ÿ_џHо‡џ#2!aŽsŽпaЅ:aa{F"c+чЯБFc)СЃс1Edit•-1Ї' DРon't uцЊQ. It also Аos AllЄow01itPRsxausing much confUрoрTfрTeЁr tabs frфom"ex u   gan empўtZуb6рџ†ѕ†}‡YK/ReР Vs@ad†St„wNullУрcritNamReitРriHtPhёd= ŽDБw= ЂŠRoomФmodCom@mon.si3- ЄфInclu~d РdA tAяi}Ayyz•Е“,ќ 0є‰XB‚ЁB`–р’цF@P~""™Ь’oG‚|сa_Chanќge!‡ /// ЏЯšQ ЯсЅ[Ђa€ddress1›А', '`23'Ф.Tex~tЁгЄq_AfterUpdЇ #U@LIsA%(t§)Ѓ’р &@ЙЧp˜Т_= CёКЯЃпеŸ$e.!ў,!ЌСє*ПП`Тщ:Ѓ‘_Be№žeФ@CancelAТIРnteger„€…!^(/) OrХчёaIsJЃС)BMsgBox("E0r a" q aspy-Р:th-year, e.g. 2€5-12-02€!vbExclam>aQQ” Aƒ[Г EvenєХЁрUndўoзМБ#oN—НuKeyDownђ(pCoC`ж4жXhif‚з^S’=сВ‘Mask And f= vbљ UpЕDё$)Uci!fere with droдppАЛd Г01 џ1М*”RЂ*зe&џР„R'Ab Ф!пД џ•Ц^ь 0KЬб Ÿ4> V\O  +џе`v С џŸ&fћя;я;tы;0Г Call queryStayl@ist E€nd If Sub P€rivate 8 critInclude_Bef@oreUpd8(Cancel As Integer)žsavedSelЪs = 0Null2fnBc(Me.^DљN,  kLДЈName_Cha0nge(Ž8Ad dr S„ PhonТe Room‘ xƒŠ ˆwGuest‚ˆ ("tbl.n€V", False†a.TextџГ€‚Z-СQ4•F@D@>pСXŽ@Т0ј@'_A0fter„Њ€RDiDm С_, mˆЌ СrAVariќanФФзА‡mL‚4‘XУ„Л€cAnyУЩФƒХР"any" С1жСЏDLoo@kup("r€ЇI^DUšBˆ.ƒ= ЁnA"„LIf Isс (r) Th enу Сƒmessage ("This @not a С numbєerЅEрXЄцЮs Žъteˆтѓ) aР“ faџAa$ХЁ jy #0т ЧС under reРpair tС ,D! Ѓ!­freцeЖт> уЧ!Ё“‚Ёs(b;, A?O$1СLi‡qsЋ.ёЦ)Tru ‡с QОџС aЈОiјЊE-­jСџ@.СIТ+ХƒЭХЉњЬџŸЬt`Ћjd„jПНŸЅеНp8wb!?пitСWџЪ?TЦж>„Ј?"Ќ>4;Form_KeyPr0>(€Asc<>žšK[es the guest and the stay, calls XrefreshoџџP –( џџ!: ДœЖCYou can onlylose тЖfrmStay ъ B@Bр1 Only one Stay window may be open in this versionkџџр џџ!Р!ТЖ fsubStayListœр Guest and stay to be createdЖfrmStayааа юаЌ B@ьdFр, Guest selected. Only new stay to be createdЖfrmStayааа юа џџ!Р!r"в B@ьkџџ№oџџш–8 џџ!Р!ТЖ fsubStayListœ B@дdF џџ!Р!r"єЌ œ р тЖfrmStay$оЌœ ф"ц!ш›G|jр7 Stay ca print invoice outlines for guests that are checked in. ŽA&|џџи kџџа ЖVAt this point the system would print a draft invoice. This test system prints nothing. XA&oџџ` –h џџ!: ВœЖ5You can only print confirmation letters for bookings. ŽA&|џџјkџџ№Ж\At this point the system would print a confirmation letter. This test system prints nothing. XA&oџџx–ЈрC Hidden button activated through SendKeys after changing RoomStatesnnot be forced close тЖfrmStay ъ B@Bр 1 Only one Stay window may be open in this versionkџџаЖfrmStayааЖstayID= џџ!Р!r"єX  іаЌ B@ьр„ Don't use acFormEdit. It also sets AllowAdditions, causing much confusion if the user tabs from the existing stay into an empty oneјdF B@дkџџрkџџиoџџа–xЗ'šЗ џџ(њЗ џџ(ќЗ џџ(ўЖany џџ(Ь @!BЌ џџ(Ќ џџ(З џџ(З џџ( џџ!ЬЌAЈЖЗЖAЖAОoџџ–ИЗ'šЗ џџ(њЗ џџ(ўЗ џџ(З џџ(Ж,address1 & ', ' & address2 & ', ' & address3З џџ!ќ!dAЖAОoџџX–ј џџ!Ь$ ›GЖany џџ(Ьj џџ!ЬЖany›G џџ!ЬX џџ(ЬjЗ'š џџ!Ь џџ!AЈAОoџџШ –8 џџ!Ь$  џџ!ЬЖany џџ!Ь$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& B@ џџB@ џџB@kџџ oџџ –˜ ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!ЬЖanyœ B џџ(Ьdџџx џџ!Ь$†›G|j | ‚œ џџ!ЬXЌ џџ(Ьdџџ0 џџ!ЬXЌ џџ(Ьkџџ kџџ B@ џџ!Ь џџ!AЈAОkџџа oџџШ –З'š џџ!Ь џџ!AЈAОoџџ –xЗ'šЗ џџ(ќЗ џџ(ўЗ џџ(З џџ(Ж tblGuest.nameЗ џџ!њ!dAЖAОoџџ –ИЗ'šЗ џџ(њЗ џџ(ќЗ џџ(З џџ(ЖtblGuest.phoneЗ џџ!ў!dAЖAОoџџ€ –ј]ђ8ђP]ђhЗ'šЗ џџ(њЗ џџ(ќЗ џџ(ў Ў џџ(Жany џџ(ЬЗ џџ(ЖroomIDЖtblRoomЖtblRoom.roomID=critroom$ ' $ œЖThis is not a room numberA@Цdџџx ЖstayIDЖ tblRoomStateЖ?tblRoomState.roomID=critRoom and tblRoomState.date=critRoomDate$ 'и иЌ›GЖRoom under repair this dateA@Цj и$ ›GЖRoom free this dateA@Цj иЌ œЖany ЎAЈЖqselStays.stayIDЗ иAЖAОkџџPkџџHoџџ@–€ Ќ ›GAjoџџ–РЗ'šЗ џџ(њЗ џџ(ќЗ џџ(ўЖany џџ(Ь Ў џџ(З џџ( џџ!Ь ЎAЈЖqselStays.stayIDЗ џџ!AЖAОoџџX–  ( *›GAЪjoџџ0–€]ђРэЖ tblCalendar L%N., ,"Z R @(B ,B@BЖfrmRooms B@ьAјoџџА–рoџџ џџџџ˜џџџџЗAttribute VB_Name = "Form_frmFindStay"  œBasœ0{28453494-54A1-11D6-8769-086394B13} |GlobaBlиSpacIFalse dCre atabl=žšK[iiСP}Ц= vbРReturn#6cmdFind_Click‡OФ„LoadбyЂWsсRecordseдWSet rЁƒCurrentDb.Open‡V"tPendaЦGmodCommo`n.simqаrs!’+ cTodaфUrs.CloseГ9DoCmdђС "frmЭсs$WХ Reр п ~ Љ’в ‘ П‘ 9Hџ€XiƒЌџџџџџџџџџџџџџџ€`„`џџџџџџџџџџ Ж`џџџџџџџџџџ№фдџџџџыл зeдџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџџџџџN0{F4033C4B-4EDD-11D6-8769-000086394B13} џџџџX \xџџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€`„`џџџџџџџџџџF% zјџџџџџџџџџџџџџџџџИџџџџџџџџ ”iƒ|џџџџџџџџџџи€iƒ~џџџџџџџџџџџџџџ€ ˆxџџџџџџџџџџџџџџџџ8џџџџџџџџ”iƒŠџџџџџџџџџџX€iƒŒџџџџџџџџџџџџџџ€ <Иџџџџџџџџџџџџџџџџџџџџџџџџџџџџ” ’џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”€ўџџџџџџџ џџјџџџџџџџџ%џџџџаИџџџџџџџџџџџџјxxџџџџџџџџџџџџјџџџџџџџџИџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0Кф{F пўЪ9€€€ џџџџ" €* ьP@вX0вH d8 А$Ш№€ џџџџ" јTX p €˜  И Раи€ џџџџ" рш<ј8HP`€ џџџџ"h p €€ џџџџ"˜ € џџџџ€ џџџџ Ј€ џџџџ€ИР€ џџџџ€Шар€ џџџџшџџџџјЭџџxЭџџp–]ђ`ЖDELETE * FROM tblBreakfast; LB@P:ІЖFSELECT tblRoomState.roomID, First(tblRoomState.state) AS FirstOfstate Ж,FROM tblRoomState WHERE tblRoomState.date =# џџ!bЌ Жmm-dd-yy$ЌЖ# Ж0GROUP BY tblRoomState.roomID, tblRoomState.date;'` ` L!d"f(hІЖ>SELECT tblServiceReceived.roomID, tblServiceReceived.quantity ЖZFROM tblServiceReceived WHERE tblServiceReceived.serviceID=3 AND tblServiceReceived.date=# џџ!bЖmm-dd-yy$ЌЖ#;'` ` L!d"j(hІЖ>SELECT tblServiceReceived.roomID, tblServiceReceived.quantity ЖZFROM tblServiceReceived WHERE tblServiceReceived.serviceID=4 AND tblServiceReceived.date=# џџ!bЖmm-dd-yy$ЌЖ#;'` ` L!d"l(hЖUINSERT INTO tblBreakfast SELECT roomID, breakfastA, breakfastB FROM qryBreakfastList; LB@P џџ!nB@p џџ!n!r!tB@v џџ!n!r!t!x џџ!n!r(xoџџШ–x ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!b$†›G|j | ‚œ џџ!bXЌ џџ(bdџџ  џџ!bXЌ џџ(bkџџЌA@\kџџшoџџр–ј Š$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& 'Œр% 0kџџp џџ!nB@poџџX–x B џџ(bЌA\oџџ(–ИЩ” B@BЃ–|џџИЃ”А (!*A@&х–˜oџџџџџџˆџџџџіДAttribute VB_Name = "Form_frmBreakfastLi st" АBasА0{F4033C4B-4EDD-11D6-8 769-086€394B13} |@GlobalтSpacIFals e dCta?žšK[blTru Pre declaIdЙ"Expose_Templa€teDeriv–CustomizD$Option Comp@ DfaT€‰  €‡KQueryDef`s!qryFH-sа.SQL@Hsƒ5 KServiceRxeceˆ†L€q€uantityI ‡JMsID=р3 AND=A9G”TSšCsel„ Aw?!?!рh.?!Ћ*?!Dœ=4?!ŽK?!b.C '!B+!АnINSE€RT INTOС3-&J фlEkb…ЈA,њ fBcu)QaЌХ4 csubF A.Re>q!XcT cordsetClo€ne.Moveb{мBookmark `_ C E E nd›ѕœKeyDown(рCodehœ, ShifNt( žЁŠIf$= acbMask A Ц= vb@ Up Or e „с ) Then ' Don't iРЊrfere with dr(oppОd  lРл$„Not IsЁД• ExitџУь€g Су+Ež= CŽ Р чoџџP–@]ђ€]ђ ]ђРэ$L.FэЖ tblCalendar F%N.HЖdelete * from tblCalendar LB@Pџ .ў R T’ HB@V > . H)Z HB@Xџ .ўШ!ј HB@B > @(BoџџаџџџџШџџџџВAttribute VB_Name = "Form_InitCalendar" "  Bas 0{E3F99AD5-4E73-11D6-8769-086394B13} |Glob„alкSpacI False dCr@eatablTru PredeШclaIdЕ"РExpose_Template Deriv–CuРstomizD$Option CШomp@ DT€‰  €'dF  0$8'kџџИѓџџАoџџЈџџџџ џџџџKВAttribute VB_Name = "Form_AsciiT ransf8" " ЈBasЈ0{E3F99ACC-4E73-11D6-8769-086394B13} |Glob„alоSpacI False dCr@eatablTru PredeШclaIdЗ"РExpose_Template Deriv–CuРstomizD$Option CШomp@ DT€‰  €ResuРŒPУ E 126 ThenCb & "<"@Str(cZ)>€СE€­:r E ChСCA>I€f WendXEBЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫ–03=Babc%ghЂij—kŠ  РРРЮТўuњо>т@џd2§m45bЅg[љ§˜`тœРРРпDetailўm47UC`bL cмjМм txtMessage§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ`ХЈI]ж‡i†9K˜ХDetailmХtxtMessageЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫrU€€€€~~~~~~~q џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ џџџџ  џџџџџџџџџџџџџџџџџџџџ ‰Љ  ‰щ  ‰q ( ‰Й 8 ‰ H ‰ X ‰С h arrivalDateincludecritequalvalsGuestStayCancelKeyCodeShiftKeyA“K*mџџџџ  rU €€€~~~~~~~~~~~~~~~~5 ЩЃгЪ^OЗЊCG .л  фџџџџџџџџџџџџџџџџщџџџџџџџџџџџџџџџџџџџџџџџџIƒa Йџџџџ ) Q q Ё Щ с Aa‘СёAyБ IqЁйQy™џџџџџџџџџџџџџџБџџџџџџџџџџџџсƒa qџџџџ!YЁСщ1YЩ qБё)a‘Щ 1a™Щёс ё!y™IyЉсAџџƒџџџџџџџџџџџџџџ9ƒa џџџџщQџџi‰a џџџџАџџџџщ1џџ™џџџџџџџџџџџџЙџџџџџџџџџџџџџџџџџџџџёџџџџџџџџџџџџџџџџџџџџџџџџAџџџџџџџџџџџџy‰ЁБhotelsysFormAžšK[_AsciiTransformForm_InitCalendarForm_frmBreakfastListForm_frmFindStayForm_frmServiceListForm_fsubStayRooms Form_frmRoomsForm_fsubRoomGrid1Form_fsubStayList modCommonForm_fsubStayServices modMenuesForm_fsubRoomGrid2Form_fsubBreakfastList Form_frmStayяРFcritRoomLabel7 /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA Ёџџџџ q` ЩџJ™_ЏNЊ? 3C:\Program Files\Microsoft Office\Office\MSACC9.OLBAccess йџџџџ qp^РF=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLLDAO сџџџџ ‘€0РFC:\WINDOWS\System32\stdole2.tlbstdole љџџџџ!iWсРFCC:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLBVBIDE йџџџџ ™ ДrZFлр0 The me.record may have been saved thru +{enter}]ђшђ J b р тЖfrmRooms$оЌ›G fBžj J d р тЖ frmFindStay$оЌ›G џџ"€b џџ"є ˜Bжj џџ!: ДЗЗ$Д џџ!d!r(f џџ!: ДЗЗ$Д џџ!d!r(h џџ!: ДЗЗ$Д џџ!d!r(j J ›G џџ!d!rB@pj J L›GA2j J N›G џџB@jЌ'Joџџ`–р" Name and address may have changed р тЖ frmFindStay$оЌ›G ˜BОjoџџ№–X џџ!:Ќ џџ!R$  џџ!T$ 'ш ш›GЖ Please close the unfinished stay XA&jiџџh–ИрG OpenArgs: -1 existing stay; 0 New guest; >0 guestID for existing guest B џџ(> lX ЌœЌ џџ(:р Temporary booking lX Ќ œ l џџ(€bр( Connect to existing guestdџџ€Ж џџ)р Create a dummy guestkџџHkџџ@Ќ'J џџ!: ДЗЗ$Д џџ!d!r(f џџ!: ДЗЗ$Д џџ!d!r(h џџ!: ДЗЗ$Д џџ!d!r(jЗ џџ(fр) Prevent user creating more than one stayA2 џџ!d!rB@p џџB@oџџH–ј]ђX]ђx џџ!:'pр May be deleted later џџ!:Ќœр Temp stay recordЖ%You must select a room for the guest.Ќ $8ЖWant to cancel instead? Z \ $& 0œЗ'^р* Stay in the form - user must select rooms|џџ0kџџ(BД*Oи:|ФPЌšЋЫжOšЭ§2†ƒЏˆ”4E(ЁTж‡i†9K›3ЯН?вLƒ~СЪw_рЉћм31ЯЭ‡Њ?Form@CžМ7№Э‡Њ? txtSimDatecritNamecritAddrPCžМ7№Э‡Њ? subStayListSCžМ7№Э‡Њ?Detail critPhoneECžМ7№Э‡Њ? cmdNewGuestcritStayACžМ7№Э‡Њ?Label15LCžМ7№Э‡Њ?critDate critRoomDatecmdReset cmdOpenStay cmdNewStay critIncludecmdGuestHistorycmdFindLabel36 fncStackSQL fncUnstackSQL fncSelStaysfncSelGuestStays queryStaylistmessage cmdFind_ClickcmdGuestHistory_Click showNewStaycmdNewGuest_ClickcmdNewStay_ClickcmdOpenStay_ClickcmdReset_ClickcritAddr_ChangecritDate_AfterUpdatecritDate_BeforeUpdatecritDate_KeyDown name_LabelcritInclude_BeforeUpdatecritName_ChangecritPhone_ChangecritRoom_AfterUpdatecritRoomDate_AfterUpdatecritStay_BeforeUpdate Form_KeyPress Form_Load Form_Open Ќ4D fncOpenAscii fncSimDatecompressNumber€]хЏNЊ? 888џџџџџџRє• BžšK[Y№ЅђеОыГFЙІЙу_XвAЦX9Q'ЅJЕ?т—њ2a fXж‡i†9KЋєуыЩC†ђ[ёЫбStay FormHeader stay__LabelLabel6Label8Label11 FormFooterarrivalAddressRoomphonestateGuest Form_DblClick „ tblCalendarСЩЄsжа˜П Щ ШйРцЬh)aЏNЊ?q™џџџџq€Њm.Є Date1€Њm.ЄS€Њm.ЄQ€Њm.Є frmRooms`чGХX–юЊGPтqXХPxVнBOBлЮќ2лсДb6Ls%MМЉђwZЈДя뉋\ж‡i†9K-ЁдšLž^D]Q:сшcboFromLabel17 cboDeparture txtNightsLabel31txtWeekdayFromtxtWeekdayDept subRoomGridcmdBookcboTypetxtRoom cmdCheckinLabel26fncSelRoomState fncSelRooms fncRoomGridSetGridColumns setSelection updateGrid getSelPerioduseRoomcboDeparture_AfterUpdatecboDeparture_BeforeUpdatecboDeparture_GotFocuscboDeparture_KeyDowncboFrom_AfterUpdatecboFrom_BeforeUpdatecboFrom_GotFocuscboFrom_KeyDowncboType_AfterUpdatecboType_BeforeUpdatecboType_GotFocus cmdBook_ClickcmdCheckin_ClickForm_DeactivatesubRoomGrid_EntersubRoomGrid_ExittxtNights_AfterUpdatetxtNights_GotFocustxtRoom_AfterUpdatetxtRoom_GotFocus ˜\щ;|фЭ‡Њ?Fщ;|фЭ‡Њ?dщ;|фЭ‡Њ? frmMessageRoom fsubRoomGrid1 fsubRoomGrid2Ctl26_10 >No rooms match what you ask forVBE6.DLL ™ џџџџ- ˜( ˜SELECT tblRoomState.* FROM tblRoomState WHERE ((tblRoomState.date) Between # mm-dd-yyyy # and # #); qselRoomState{€Њm.Єy€Њm.Є ™ џџџџ” И- ЎSELECT tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2,  VCount(qselRoomState.state) AS CountOfstate ) œFROM tblRoom LEFT JOIN qselRoomState ON tblRoom.roomID = qselRoomState.roomID *WHERE tblRoom.type =  0 0WHERE tblRoom.roomID >= . В GROUP BY tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2  JHAVING (Count(qselRoomState.state)=0) ; qselRoomsControlSource‚^] Э‹ EЎbйC‡„Дь—7шмЄJDœѕ"D№/уpŽлшu Pж‡i†9KOxF6П—N’Д| KCtl25_102 РSELECT qselRooms.roomID, qselRooms.bedCount, qselRooms.type, qselRooms.price1, qselRooms.price2,*  tblCalendar.date FROM qselRooms, tblCalendar WHERE ((tblCalendar.date) Between # qryRoomGrid col€ЛБ(aЏNЊ?tХpYŒыЭ‡Њ?name dd-mmCtl27_10Ctl28_10Ctl29_10 Room_Label Beds_Label price1_Label price2_LabelCtl20_10_LabelCtl21_10_LabelCtl22_10_LabelCtl23_10_LabelCtl24_10_LabelCtl25_10_LabelCtl26_10_LabelCtl27_10_LabelCžšK[Bedsprice as_singleCtl22_10Ctl23_10Ctl24_10 Form_Current ЌgHeight gWidth gLeft any . АSELECT tblGuest.guestID, tblStay.stayID, Min(qryRoomsPerStay.firstRoomDate) AS arrival, 9 оMin([qryRoomsPerStay].[roomID]) & IIf(Count([qryRoomsPerStay].[roomID])>1,' + ...','') AS rooms, tblStay.state  L(Min(qryRoomsPerStay.firstRoomDate)= #6 аFROM tblGuest INNER JOIN (tblStay LEFT JOIN qryRoomsPerStay ON tblStay.stayID = qryRoomsPerStay.stayID)  LON tblGuest.guestID = tblStay.guestID  rGROUP BY tblGuest.guestID, tblStay.stayID, tblStay.state  HAVING  #)  AND  "(tblStay.state =  ) & OR tblStay.state = ) qselStays tSELECT qselStays.stayID, tblGuest.guestID, tblGuest.name, x[address1] & ', ' & [address2] & ', ' & [address3] AS addr,  ZEnter a date as day-month-year, e.g. 25-12-02) œtblGuest.phone, qselStays.arrival, qselStays.rooms, qselStays.state AS qstate ' –FROM qselStays RIGHT JOIN tblGuest ON qselStays.guestID = tblGuest.guestID  WHERE ( =    Like ('* *') T„ƒА>Tˆ>T„ƒ?T№?T„LVAL}АFАџџџџhЊфD/ ј?ПHs ј?ФЅ…†АT”?ƒљ‹ИПH˜@ПH„№ПH„@ПHƒƒ›и ’ЋŠЂ Џ<“T|ПHВПHђПHПH"ПH\ПH„ПHПHXПH ПHрПHПHПHHПHpПHПHПHШПHШПHаПH0ПHˆ ПH|ПHВПHђПHшПH"ПHˆАПHƒƒƒ …ƒƒ ‚‚ d…Ž ‚‚ d…†‡ Ž ‚‚ƒƒ Ђ/qselStays.tblStay.stayID‰ tblStayƒtblGuest.guestID‰tblGuest‰tblGuest.name‡addr‰tblGuest.phone…tblGuest‰!qselStays.arrival‡qselStays.roomsƒ qstate… tblStayƒ state‡ƒ ПHƒƒ ПH„ч ƒПH„№ ПH˜џџ…РПHџџџџfmёЄ. у@ˆџџџџ„`ПHxПH† HПH`ПH† 10ПH@ПH† ПH0ПH†‚ ПH ПH† |ПH!>† ВПH!>„ ђПH!>„‚ПH!>„ "ПH!>„ \ПH!>„ „ПH!>„ ПH!>„qselStays‡ƒ№ ПHƒƒр ПH„чƒ ПH„Ш ПH˜џџ…РПHџџџџfmёЄ. у@ˆџџџџ„tblGuest‰ƒHПHƒѓ„ПH„0ПH˜џў…РПHџџџџ1€zЯПAт@ˆџџџџ„ tblStayƒ„ПHƒѓƒрПH„№ПH˜џў…xПHџџџџѕ{ЯПAт@ˆџџџџ„qryRoomsPerStayƒƒ8ПHƒƒ0ПH„чƒрПH„ПH˜џџ…xПHџџџџмГ‰UAт@ˆџџџџ„tblRoomState‰ƒјПHƒїиПH„иПH˜џў…0ПHџџџџ•ЄD˜UЧт@ˆџџџџ„qselGuestStays…xПH`ПHˆ„Š И ПHр ПHˆŽˆŠ  ПHш ПHˆŽƒ„Š рПH№ ПHˆŽџџџџџПHј ПH‡Žƒ„Š ПH ПHˆ’„Š HПH ПHˆ’„Š pПH ПHˆ’„Š ПH ПH‡ŠqselStays.stayID‰И ПH„ ПH„рПH…ПH„ПH„HПH„pПH„ПH„ ПHЈ ПH† x ПH@ПH† ˆ ПH0ПH† Ј ПH ПH† |ПH!>† \ПH!>„ „ПH!>„tblGuest‰ƒpПHƒїXПH„XПH˜џў…xПHџџџџ1€zЯПAт@ˆџџџџ„ tblStayƒqryRoomsPerStayƒtblRoomState‰qselStays‡ Ј ПH@ПH0ПHМˆ‹ПHјПH‡Žџџџџџ \ПH ПH‡Žџџџџџ „ПH(ПH‡Žƒ„Š 8ПH0ПH‡ŽИ ПH„tblStay.stayID…HПH„pПH„ПH„tblStay.state‡tblGuestџџћ|ПH!>†tblStay‡џџџџџ„Š ПHаПHџџџџџџ„Š HПHиПH“И ПH„ПH„№ПH ПH†tblRoomState‰qryRoomsPerStayƒ ПHџЅtblRoomStateџџ“ВПH!>„ ђПH!>„ "ПH!>„tblGuestџџџџџ„Š ВПHИПH‡џџџџџ„Š ђПHРПH‡џЌџџџџџ„Š "ПHШПH‡У ПH„рПH„ПH„tblGuest‘ ЁПH„ ПHƒp<ПHƒ$џџџџРПH8ПHXПHxПH˜ПHИПH№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH„№ПHџџџџ–ПH”8ПHЈРПHƒўЁПH„ф‚vџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ‚X!ПHƒљ‡џџџџ„@!ПHиЁПH„§‚vџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ‚&ПHƒљ‡џџџџ„€&ПHиЁПH„џ‚vџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ‚€+ПHƒљ‡џџџџ„`+ПHиЁПH„у‚vџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ‚ј/ПHƒљ‡џџџџ„Ш/ПHP1ПHдƒ‡=„0†ŠˆПH„џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ПH ПqH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПH ПHˆ ‡ш6ПH…‚ №ПH9ПH ƒ ƒр5ПHˆ ј ПHџџџџЁПHˆ‡@ПHџџџџш4ПHџџџџ„tblGuest‰ј”€ˆПH@ПHƒŒHž”€ˆПH@ПH‚ ŒHž”€ˆПH@ПH‚ ŒHž”€ˆПH@ПH‚ ŒHž”€ˆПH@ПH‚ ŒHž”€ˆПH@ПH‚ ŒƒX!ПHˆƒ!ПHЈ"ПH„ƒШ!ПHИ"ПH„„"ПHШ"ПH„ƒ8"ПHи"ПH„ƒp"ПHш"ПH„‹‡„0†4ˆПH„№%ПH„@ƒ‚ џџџџ(%ПHƒƒp%ПHƒи1ПLVALБHœа#ПHЊ™ƒа3ПHˆЁПH„xџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџќ ƒƒ‚h1ПHŒи1ПH„ƒ(%ПHƒ‡ƒј/ПHƒ‡ƒ&ПHƒ‡„'ПH„P‡ƒ‡ƒ@-ПHŒ Р%ПHа%ПHƒ‡ƒа,ПHŒа%ПH№%ПHИ2ПHЈ1ПH„‚№2ПHИ1ПH„‚(3ПHШ1ПH„‚ЁПH8&ПHџџџџ@0ПHџџџџ„ЁПHˆ‡X(ПHџџџџа.ПHџџџџ„ tblStayƒј”€ˆПHXПHƒŒј”€ˆПHXПH‚Œј”€ˆПHXПH‚Œƒ&ПHј"ПH„ƒШ&ПH8'ПH„„'ПHH'ПH„l'ПHx'ПHИ'ПH|'ПH ‚'ПH„џџџџˆƒtblStay.state‡ М'ПHШ'ПHƒ Ь'ПHи'ПH(ПH„ м'ПH€ƒƒƒœ†(ПH(ПHˆ (ПH€ƒƒƒœ†<(ПH„h'ПH„ƒ€'ПHX'ПH„ЁПH„XПHџџџџŒ8(ПHЈџџџџ”Œƒ0†"ˆПH„pПH„@ƒ‚ џџџџј*ПHƒƒ(+ПHƒ˜,ПHœ )ПHЊ™ƒИ-ПHˆЁПH„xџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџќ ƒƒ‚X,ПHŒ˜,ПH„ƒј*ПHƒ‡ƒ€+ПHƒ‡ƒИ+ПH(‡ƒ‡ƒ№+ПHŒP+ПH`+ПH@-ПHˆ,ПH„‚tblRoomState‰ј”€ˆПHpПHƒŒј”€ˆПHpПH‚Œј”€ˆПHpПH‚Œƒ€+ПHH(ПH„ƒИ+ПH(,ПH„ƒ№+ПH8,ПH„ƒƒ@†ƒƒ@ƒ‚‹‚ƒ‡‚ј”€‚h&ПH‚ПH )ПHƒŒј”€‚h&ПH‚ПH )ПH‚Œј”€‚h&ПH‚ПH )ПH‚Œј”€‚h&ПH‚ПH )ПH‚Œƒ˜,ПHH,ПH„ƒа,ПHx-ПH„ƒ-ПHˆ-ПH„ƒ@-ПH˜-ПH„ƒ|и(ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHИ-ПHŠПHƒ}и(ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПHD.ПH‰ПHЁПH„D.ПHџџџџƒ…P/ПHX/ПH„l/ПH‰џџџџ”(‡‚‹&ПH“„/ПH ƒа.ПHœЌ/ПH„€/ПH„ƒˆ/ПHЈ-ПH„tblGuest‰PrimaryKey…ј”€ˆПHˆПHƒŒƒј/ПHИ/ПH„ЁПH„ ˆПHџџџџР0ПH ‹‰и0ПHр0ПH„є0ПH"‰џџџџ”PrimaryKey…(‡‚‹Ш&ПH“ 1ПH ƒ@0ПHœ41ПH„1ПH„ƒ1ПH00ПH„PrimaryKey…ƒƒ@†ƒƒ@ƒ‚ƒƒ@ƒ‚‹‚ƒ‡‚ƒ‡‚‹‚ј”€‚(!ПH‚ПHа#ПHƒŒј”€‚(!ПH‚ПHа#ПH‚Œј”€‚(!ПH‚ПHа#ПH‚Œј”€‚(!ПH‚ПHа#ПH‚Œј”€‚(!ПH‚ПHа#ПH‚Œј”€‚(!ПH‚ПHа#ПH‚Œј”€‚(!ПH‚ПHа#ПH‚Œƒи1ПH@1ПH„ƒ2ПH`3ПH„ƒH2ПHp3ПH„ƒ€2ПH€3ПH„ƒИ2ПH3ПH„ƒ№2ПH 3ПH„ƒ(3ПHА3ПH„ƒ|#ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHа3ПHŠПHƒ}#ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH\4ПH‰ПHЁПH„\4ПHџџџџƒ…h5ПHp5ПH„„5ПH‰џџџџ”(‡‚‹X!ПH“œ5ПH ƒш4ПHœФ5ПH„˜5ПH„ƒ 5ПHР3ПH„ƒ‡ƒр8ПHƒ ‡dƒ!ПHƒ‡ƒ2ПHƒ‡ƒИ2ПHƒ‡ƒH2ПHƒ‡ƒ№2ПHƒ‡ƒ(3ПHƒ‡ƒX!ПHƒ ‡dƒШ!ПHƒ ‡d„"ПHƒ ‡dƒ8"ПHƒ ‡dƒp"ПH˜ƒƒ@† ƒdƒ@ƒ‚ ƒ‡‚ƒ‡‚ƒ‡‚ƒ‡‚ƒ‡‚ƒ‡‚ ƒd‡‚ ƒd‡ ‚ ƒd‡ ‚ ƒd‡ ‚ М7ПH%…Ш7ПHЬ7ПH%и7ПHƒ м7ПHш7ПHP8ПH„ь7ПHј7ПH@8ПHќ7ПH И2ПH„џџџџˆ"ƒ!qselStays.arrival‡D8ПH(‰ T8ПH`8ПHˆ8ПH„ d8ПH:…>`->…јш@ŒŒ8ПH˜8ПHˆ œ8ПH И2ПH„џџџџˆ"ƒ!qselStays.arrival‡ф8ПH„И7ПH„ƒ 8ПHа5ПH„„8ПH№8ПH„ј”€ˆПH ПHƒŒHž”€ˆПH ПH‚ Œј”€ˆПH ПH‚Œј”€ˆПH ПH‚Œј”€ˆПH ПH‚Œј”€ˆПH ПH‚Œј”€ˆПH ПH‚Œј”€ˆПH ПH‚ŒHž”€ˆПH ПH‚ ŒHž”€ˆПH ПH ‚ ŒHž”€ˆПH ПH ‚ ŒHž”€ˆПH ПH ‚ Œƒ9ПH9ПH„ƒH9ПHА;ПH„ƒ€9ПHР;ПH„ƒИ9ПHа;ПH„ƒ№9ПHр;ПH„ƒ(:ПH№;ПH„ƒ`:ПH<ПH„ƒ˜:ПH<ПH„ƒа:ПH <ПH„ƒ;ПH0<ПH„ƒ@;ПH@<ПH„ƒx;ПHP<ПH„ƒ‡ƒ€9ПHƒ‡ƒ˜:ПHƒ ‡dƒH9ПHƒ ‹X>ПHƒ ‡dƒx;ПHƒ‡ƒИ9ПHƒ ‹р?ПHƒ‡ƒP№9ПH=ПH" =ПH >ПH$=ПH"0=ПH№=ПH4=ПH"@=ПHИ=ПHD=ПH"P=ПHˆ=ПHT=ПH а:ПH„џџџџˆƒ[address1]…Œ=ПH•ƒ', '‰ М=ПH ;ПH„џџџџˆƒ[address2]…є=ПH•ƒ', '‰ $>ПH @;ПH„џџџџˆƒ[address3]…\>ПH„=ПH„ƒX=ПH`<ПH„ƒР=ПHh>ПH„ƒ(>ПHx>ПH„œ>ПH"Ј>ПHа>ПHЌ>ПH (:ПH›д>ПH%…р>ПHф>ПH%№>ПHƒ є>ПH?ПH`?ПH„?ПILVALYH ?ПH8?ПH?ПH `:ПH› ƒƒœ† d?ПHp?ПHЈ?ПH„t?ПH•ƒ' + ...'‰Ќ?ПHИ?ПHˆМ?ПH•ƒ''…ф?ПH„˜>ПH„ƒА>ПHˆ>ПH„ƒ?ПH№?ПH„LVALў АFГЪОx™„‚xtblRoomStateqselGuestStays frmFindStayAsciiTransformў№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$frmBreakfastList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$jfrmFindStayList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ПfrmMessageGuest№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$frmMessageRoom№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$MfrmRoomseRoom№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$jMfrmServiceList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ПMfrmStayceList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$MfrmTestceList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$˜fsubBreakfastList№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$j˜fsubRoomGrid1ist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ϘfsubRoomGrid2ist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$˜fsubStaLVALДyListist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$уfsubStayRoomsist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$jуfsubstayrooms1st№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ПуfsubStayServices№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$уfsubStayServices1№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$.InitCalendarces1№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$j.macBeepmodCommonф5џџџџ^Щ3ТLVALв:LVALJyListist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$уfsubStayRoomsist№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$jуfsubstayrooms1st№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$ПуfsubStayServices№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$уfsubStayServices1№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$.InitCalendarces1№kіВ0эb эbАэbKГ0 Г0@юbћAїП eЯ`џЪ1<0xїЪˆЩPїЪЈу$рЗ…ц|ј€|&0ЯxїЪч€“ЯР0ј€6&0PїЪ8”ЯˆЩФшЯ90ј€`џЪќ90р2$р2$j.macBeepmodCommonфЁџџџџ^Щ3K[єЖ; L%N., ,!Bє ,B@` ,B@Hѓџџp ,B@BkџџXр Check that guest is meaningful: lЌ pЌœр  New guest with temporary stay џџ!R$  џџ!T$ œЖ#Do you want to keep the guest data? Z \ $& ^›G|jkџџxэЖ%select * from tblGuest where guestid= џџ!€rЖ; L%N.,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџўџџџ!"#$%&'()* ,-./0123456ўџџџ89:;<=>?ўџџџABCDEFGHIJўџџџLMNOPQRST-W?Z§џџџ[\]Ј_`abcdefghijklmnopqrstuvwxyz{|}~€ ,!Bє ,B@` ,B@Hx#ѓџџp# ,B@Bdр/ Existing guest or new guest with non-temp stay џџ!R$  џџ!T$ ›G|jЖCYou must fill in at least the guest name and the first address line ŽA&З'^р Cancel the close.kџџx"oџџp"џџџџh"џџџџ˜ЗAttribute VB_Name = "Form_frmStay" ŒBasŒ0{EF2CB1A9-59D8-11D6-8769-0863@94B13} |G lobalаSpac’False dCreatab"lTru Pr@edeclaIdА"Expose_TemplateDeriv–CustomiІzD$'   Opti€on CompI< D]€’ €Elicit Dim observe As Integer ' Determines what views to refesh af€ sendin g keyXRefrBPub!2 SubtO 2(64) …@=E EnFd updHRoomList(+€/sAS€ŒngУCurrent€Db.ExecС‘"DELETE * FROM tЬbl‘s;@ƒ s™INSERT INTO ( FirstOfЅ ,€UunrР#ID, СType, personCo ricРtotal, s€ЏID) " ˜& _ƒ+A"S(tCTC(Р'С&Р(t„e.A) ASP я …*Ф.E) Хўt@.AG1DC!Š4Э IIf([H]=H1 A@p[pС>20]>0,…1]Л‚4Т,Cџ № *ТџT"Є/JC1Ž%D!0 ANER JOINѓсA†2 Oц+ GŠ ƒУ-Ž WHEREJ Ъ.У=a*MeЄŒC GROUP BЎY%І9d.Ё7,ы џ*6?*0* П5П?Ё?јORD +@kа6sMЏysуfЁ%ubРSyс2s.Requery•‡cmdBoPok_C@’ke‡fЁzс‡Є€tlastџЅ#Ѓa ‹a! ЊС’r"Recordse­с|If €IsNull( txtЮ) OrЋAdd@Јs1) ThenЇ„Call MsgBox("You m С fi in @Дlethe Јgue@nчa qKAcac lЛ.€", vbExРжmaсХ„Б!ExiЮtCАЂ`If'#Select CбСяMe!€"tРтсBcAкg`NotG"ељƒ6get P‘`оod(", Ё0l, t Е@iError message madxe: d!7к< modppmon№.siml Ќcan only b@#уs inрoВuture.A;Chr(10)E ;"„ano0rёa`iodOG ‘‹Ьms.us^eq$С(hcё-eоdM_Rб  PƒўeTСУ ѓѓч €gе'€)4&is"‹al ’dy. Do„ yа)wantё‚Rg№Œ ha†n oreЂr?Т'YesаNo +`(Q+0‹ђ) Tvb@Б/ІJџo$o$o$o$o$а,k$2$ђ?= DMin(і"ёx  "щ^§I]‘™„aty"0")˜6Чс.!pDMa=ќte‚„bcp9A <АBPŒт - Ж1qG32>27B+pџ‘Q!šGр02б#вbАFapЁ1 1‚v_RŽц/1?2;2 1=aРke twoв$Ѕўs3; 3QЃYJpЏ"э3 3‘O 33' ћ“ƒ3IH[@G3Ф2ГA check€3i†nD4undoтљinП3а^П3*\a{BЎЄІ*ЖА‘@0!№жwhe[ ID] >‰"5yБSet 0n= zOpen‰o(s8.Whi€гСrs.EOFg;Ё1dБШС5rsЖ!p@ =ѕNUђРnMoveNex;$wёW@ЪgрClOиSrElpф'Р e.g. ’Аoutб)а.celјledуA<1№qц w1‘cedo,'+,пBЯ"uSaŽt`ЯрAt*sгuGridA0TuFindТ=+м uAQвqPaИжA€Focusр-Tžo t`7„унceСZ­‘ modCommonp.simѕŒЌRWcan only checkƒTs @Ztoday." & Chr(10)@"Bookstead Р(sGC% fromў Т и\A!Ы]BЬ^вQ8useT•СІIDр, cInЧOP‰A nРffrepCЉPaymethod = 0!aNhavechHose€І p….УРLASwith‚ЅBЊёCЂInf‡MЂТ@JЃŸBLEУ}УbedG‚‚ё= DMin("d€ћ1"tbІl`teэ.)&=с<VatЉ+"0ќ")Шe`%Ї N!рf?ЬyN N€“‚-toй Tan`bA}b`Q‘ў Р)g,р•}*^,џAэТ џA џA„ ТПds`U"SELECT * FROM ‰= wherшe [c<]‚<€]У Сy;"чGSet РЙ= CurrentDb.OpEžšK[enfЛ(s(AWhile !rs.EœOFЧ!adiЄСѓB€rscЇ@€v UpСUЮMoveˆNexh WenЈ^y@ ClРo#cdIŸшЪ;ЄЪр­dЧisуžDedAžalrрšy@. Do y Яwˆantр™ gi }вh щonРБo@*А?bMYesNo :+@ЬQЁбсЫ vbŸ€ЪК_Фst_Ф_Фb/ё~!` DMaџ@uAAAAТ~! љrA уЂЂ+ 1 ‹ а€  1cbe a ИgapQ"БGBp}ћ  6†" \] !sПnПnb ПnТ‚Пn C b1El Œ' eˆ.g.ж/outё|aрcellyeњ˜Tўh3…WЗВƒ24пз?ЋaCSуIteƒР*VBobser8€= uGridР6 uFindВn+ 2uСLi€ АPricФ} MFoc$usPTop”ke… ŠmrreceQ=ЁСkeysгSАE‚Kа ("+{0P€er}%x")№њSР~sgfіІ Pˆ0Ћ s XreА…shL В aЅ  vƒpx cmdCQ–Р_Click(џ UКr ZКR&ѓЖИљИ %ИИИб)ћя9Иaа‘ИФЦИџИЂ0њxaИ”ЏЂ+ИџQ1УТ ї‰__ ДPќteпNпNжNсioЗ_8 € %ЭРФghрas beЃч3гГm\З_Лq"j "j€<Са6k№Нinvop1’’!lnigh~tяkРдэkŸ˜ =aўnАC22‚+СŽaE/]/n†МПЩACг'р*j[ЁNqЯ'\ FТb Q~sUЭmњoPйwьœ\яЏшйў-PhяFдЗ1AЂѕ KЫAр9IHЗn Then  Call MsgBox("You have not chosen a paymethod. Check with the guest.", vbInform@ation) ТE€xit Sub*@End IfIf Me.sta€te = cIЇ šAtqis poin e system wo@uld prfinal inv`oice.ё4tІ/‚sphing^' Dele€Iany remain€ dayРs from€Z@y, set9dto –ed (out‡us€p"SELECT * FROM tbl RoomS‚WH ERE [+ID ]=" &„yIЂD€";"‡%S€:r(CurrentDb.Open@RecordI(sХWhile Nvrs.EOF‡‡Aƒ€`rs!DA`€<= lastA ча‹ di56!€ CqOI=.U pd@KElse{KC.` L„ M@oveNexH%W˜end‡-Cl@Дƒ УCase ‹ NХcan onlyuОsAv ifСy are c'Уa… Р~inC˜ExИclaŽЧ‹ЦХS@œ>cФ0C'Ч Ь€Z '‚ Рy mayC№,beРю@-cd ab@GУobser@|= uGrid + uFindЂ`!QListyсPr@hЃР  MFocus@ To ke `ЁVcceiC` a‚keyscSр/K  ("+{РSer}%x")›A`ŒsТg"ˆ a@:#aaN, c@’s XrefreshL т"с‡ vCaTР‰ cmdРntAccount€_Click($^љЉ&<>fŠ!F7thatу=СЁпП<  Ё…ŸŠAСš=œРa draf†џ›Гќ)ConfirТmћ)BookыЩ-}*c# ‚Ф ЋteГ —РЦ b  @ЋseЯС@С7П(љФa P)љ|)ub P!нASХWХ(! ^Hidd€rbuˆttoръctiaYdр`rough цe70Вc3|_хќ.u`БGЏЂхHяpяч….€showNewQO`(Me![0xБ.ћђH€w,PwБlPwEW4ubAS№S€Qs.Q.AllowAŽd№p СxIIf .†pIn, Trђu FapnяяboЗяд‘я 2‚п mг ^EР Ÿ AQЏ ™ ;Ћ ѕ)#ƒReрqueryOBЁ!џqeDЂB“ •‚0^МceЇVaQ@Зl0obg`ˆabЂAfАF“‡(!hNameRgadJd@fsw4chP7eяtƒP1п/п/mг/я'а>П‚20ц'’Б$l vcЋ SDFun№A`Bcљ1‹OKumф@Є‘œy&0 Or IsNˆullatxtAЮ)^ *1)„(0Ё…]›ЗPle’ 2{u№anishŸ№_{_Q{ k{!ВLoad! ' ЋArgs: -p1 exр!Oq; 0 :Cw; >>0“`А!cІ; #P) Sim2Ќ= s“ № CLn„g(…) >=;—kё,tA…a№UemРporaryUiv)џmZс(ŽD• `ѕАun S аС KЈEpInq*= "'0 Crea €umќmyгУ еpuz1ё ЯЏAЄAKK, …KЏO8POKЏЏayяTwK3ХЏT Xв РPHrev`Ї uЏ цcСЁ%mo€КœёМфe & пH ИЯ|N?ЊЯ._Unl1с.CanРИawInрteger8Бy0Ÿ xFл{гz„ рF=2^‚*' M`ОbЈe dРНt`8lp!~rЂ.A Ц,В<-‚ЖВ record  If MsgBox("You must select a room for the guest." & C@hr(10)"Want to cancel instead?", vbYesN(o +Qtio0n) =(Th,enƒC<= True ' S8tayJu}m Р- user œšsBExit SubEnd I"f ' DЮteMYў*has been update„ˆSet rs€TCurrentDb.OpenRšset("!„* fr€tbl+where "s€]ID=“MeF.ƒ”;")ƒGW€hile No20.EOFƒ ƒrs.U MoveNˆext WenS€Close …v 'Эeck uatƒз is meaningf`ul: €їfAФrg80 A€J€|0= 0 e@_NewФwith temporary‚6C!0(IsNull(:txtName) Or JAddres№s1))ТУA;РЁžDo yРžwФ’АkeepBkBœ €fОa”š/W0uG­І CuB"id…u[Р|Х‚.ID]Пx›xЬlsЦР7st€rФg…цn knon-l џjt Ы)Call‰o…fi in N˜lea IF… nBŒ aрKAfir€‚aЃA lineb„Exclamat_ƒcCфacс].^_b~ DPџџџџџџџџџџџџџџџџ0џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€!b Fџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€P€BCC-6133-11D6-8769-000086394B13} џџџџ :№џџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ<џџџџџџџџџџ`€iƒ>џџџџџџџџ џџ€€iƒ^џџџџџџџџџџџџџџ€omst`„`џџџџџџџџџџstay „,џџџџџџџџаyID) %`„иџџџџџџџџџџ DPџџџџџџџџџџџџџџџџ0џџџџџџџџ”iƒ^џџџџџџџџџџFžšK[џџџџ€!b Fџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€P€ўџџџџџџџиџџАџџџџџџџџ%џџџџPџџџџџџџџ№џџџџШџџџџџџџџАџџџџџџџџPџџџџџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшКф{F пўЪ'€€" €€(&0|Xи№ј€ H `.p  ЈИР Ш€ џџџџИи  ІАXh"p˜ АРШ€ џџџџ" аи№€ џџџџ" ј€ џџџџџџџџ(ЭџџxЭџџp–]ђ ђИ]ђи[й џџ!@е џџ!@е џџ!8"bжЖ*SELECT * FROM tblRoomState where [roomID]= џџ!@Ж AND date=# џџ!8"bЌ Жmm-dd-yy$ЌЖ#;'`asэ ` L%N.,NAЌ'и ,!B›G ,"є'иjQBрB There can at most be one record since roomID and date are the key иЌ œHPЖThere was no guest in this room $A&KЗ'^ џџB@651|џџ@kџџ8 ,B@BervІЖ.DELETE * FROM tblServiceReceived WHERE roomID= џџ!@Ж AND date=# џџ!8"bЖmm-dd-yy$ЌЖ # AND stayID= иЖ AND serviceID= <Ж;'` ` LB@PM >Ќ œ48І ЖINSERT INTO tblServiceReceived ЖVALUES ( иЖ,  џџ!@Ж,  <Ж, # џџ!8"bЖmm-dd-yy$ЌЖ#,  >Ж);'`i ` LB@PCkџџ р тЖfrmStay$оЌœVCB  N иBJ51 иBBormkџџ8oџџ0–№Ќ џџ!@ ^A:Foџџ–PЌ џџ!H ^A:oџџрџџџџиџџџџCДAttribute VB_Name = "Form_fsubBreakfastL@ist" ДBasД0{2CD39BCC-6133-11D6-@8769-086394B13} |GlobalфSpacIFalse dCtab"lTru Pr@edeclaIdК"Expose_TemplateDeriv–CustomizD$Optio@n Comp@ ЬDaT€‰  €<licit P.2 Sub u pd†Ќ(serviceID As Integer, quantity Vari€, Cancelˆ) Dim s Sфng, r‚Recordse>Sta!%Long€ebug.Jnt M$e.Ц"A,roPomID‚PР5n`t!cbo7Р^ sAˆSELECT * FROMр tblR Р‘€where [C`]=" &Р" AND @=#cССšat(€!  - 1, "mm-dd-yy")С#;@‘!Set:= CurrentDb.OpernF=(s€F >= 0 AIf NoA.EOF  Then BF=Є!s€ ID '€1can at most be one rBV s iРb C9 and‚4 Сthe kŒeyFB< 1ТCС"Call M€sgBox("€"@was no gue€in this‚", v€bOKOnlyФ5ѓC‚ƒ= CНС€RUndoGExi–tžCEР*IfУРrs.Clon…Kуb 0L3ТINSERT INT>O\aWhт'"V€ALUES (џe@W€2dEРC*ќ, Кa ,ac†  >)Ѕa6Щ?  Sy€sCmd(acGetObject te, accсs` frmРp Sub&_Current() ' Happens for i nstan“when user moves curup/down€ gж Me.SelH`eightPa€Jnt.gƒ Wpidth ‚Э LŒefЬB+ 1@.Access 2YР cРA@1aE ' DebugТ.>nt "С*„<"; 'RecјordB@/AХE-EndAMQEndAMQџџџџџаЌ€ўџџџџџџџџџиrU€€€ џџџџџџџџ8(`§џџџџџџџџџџџЙ/$Љ`§џџџџџџџџџџџ(б`§џџџџџџџџџџџa0n€€ rU€€€€~| №ьдАџџџџѕЁзeЩџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(<џџи<џџJ< џџ<џџџџџџџџџџА "@џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ &€џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ (Рџџџџџџџџџџџџџџџџџџџџ џџџџџџŒ *џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ ,@џџџџџџџџџџџџџџџџџџџџ џџџџџџŒ .иџџџџџџџџџџџџџџџџџџџџ џџџџџџŒ „жџџџџџџџџ˜џџџџ% „,џџџџџџџџИ %`„`џџџџџџџџџџџџџџ 4џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџŒ „жџџџџџџџџ0r fu% „,џџџџџџџџPdon'%`„`џџџџџџџџџџ$џџџџˆ€џџџџ@@Риџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ xКф{F пўЪP€ :€ џџџџ€@€H€ џџџџB P’X№€ џџџџB јvx€ џџџџB €|ˆ€ џџџџB `x€ џџџџB €Ўˆ8€ џџџџB @€H€P"`0ˆИРШ и>ј8@ŠH€ џџџџDи  8 H Xh p€ џџџџ € 2 Jи(€ џџџџB 0€8€@"P.xЈАИШ2иD h €    А Ра и€ џџџџ ш ј2J@џџџџ р4 modMenues: All the functions called from the menues%Эџџ8Эџџ0–ЖVOn the Stay-screen, just enter the new service data at the bottom of the service list.Ќ $8ЖChecked-in guests only. $$&'"iџџ –@Ж9On the Stay-screen, select the service line and push DEL.Ќ $8ЖChecked-in guests only. $$&'&iџџА–€Ж6On the Stay-screen, select the room line and push DHžšK[EL.Ќ $8Ж"Booked and checked-in guests only. $$&'(iџџ –РЖThis is a manager function.Ќ $8Ж$You don't have permission to use it.$&'*iџџр–ІЖXAt this point the system would print a list of occupied rooms for the waiter to fill in.Ќ $8Ж)This test version doesn't print anything. $$&',iџџ –@]ђ€]ђ ђР р тЖfrmStay$оЌœЖ!Open the stay you want to cancel. $A&zџџ kџџ˜э ф"ц.ж ж": Д ж": ВœЖ/You can only cancel booked or checked-in stays. $A&zџџ kџџІ Ж%Are you sure you want to cancel stay ж"єЖ?Ќ $8ЖYou cannot revoke it again. Z$& 0›GzjЖ*SELECT * FROM tblRoomState where [stayID]= ж"єЖ;'`э ` L%N., ,!Bє ,B@` ,B@HѓџџP ,B@B  ж): жB2 жB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls Xrefreshiџџ–и]ђ]ђ8ђX р тЖfrmStay$оЌœЖOpen the stay you want to undo. $A&zџџkџџэ ф"ц.ж ж": ДœЖ#You can only undo checked-in stays. $A&zџџЈkџџ Ж*SELECT * FROM tblRoomState where [stayID]= ж"єЖ;'`э ` L%N., ,!Bє ,B@D В ,): ,B@X ,B@Hѓџџш ,B@B В ж): жB2 жB@р! To make frmStay receive the keysЖ +{enter}%xA@Pр- Saves the guest and the stay, calls Xrefreshiџџ(џџџџ џџџџeЕAttribute VB_Name = "modMenues"  ' 4: All the functions called f(rom2mn  OpB Compare Da@tabase0E€xplicit+HPub FV fncAddServiceLinРe() ЎMsgBox("OnStay-screen, just enternew sU d at!‚ bott`of‚…list." & Chr(10)€"Checked-in gts only.", vbOKЦO€€TEnd†eo8Delo oselecaZne a@push D„ELи`RoomLg—€/Eч.rР l€yБ.Boo@^‚can™*Manag:eР­t™ H2Thˆis €a mТ rЦТЭYYou don't have permissЭ to use i—#‹PrintBreakf№astL€Ѕˆ*ˆ+fA‡€+po@Зystem would p a`/Рd _occupiCрy!2s foУfw„ai"ho fi €єinb_CrСrd$Dteр verТdoesС „ nyt0hing_f-‚Canc fР{ЁDim curЁ} As Form_fr’mс rsсRecordse(t, тSРng#If SysC md(acGe0tObj@jРte, acс , " $ ")`+0 Th,enˆ@  †pe%Уsр y`@waњn€0o ЅСЬ'apExitH†B`xIЂfУ Set†=bМs!†@„!! Й<> cIn >A€$iиWcaцn‚›$ bуo`BШoѕСsŸoф%!Ѓ…`ЭЅ&AФa%su‹& Ё !БhyID3ВˆP"?lЕ„no`t rev€‡@n agaсWсЕYes„No!:vbNo‚:. №0С+Ѓ0s€?"SELECT * FROM tblCA…ТE wheР[!ID]=ђ";`ъA A:@T= CuФrr дDb.aGцU (s`ƒWhile Ns.EOFFc!rs.Р­et`ъСDMoveNexръWenЦd# Clo№сccKC= c36УCЃq-.up№reБ сGк.  Focu@s ' TopQkЧ‚“8pceiаOAƒPkeysƒS@ KAа ("+{вy}D%xА5' S Rs_rJвuТ^Б1,€(lls Xrefr`esh vn„UШndo2{in_C_Cў _CQD_C_C_C_C_CїЄ‹_CTCu№ я5П*ќ щ5&дp+qL?CПє;CoAжMjAЁ Џ@𐂠@5К Ÿ5Ÿ5eђ Ÿ5ayЁ “@Ÿ5Ÿ5?’`Ÿ5P›5a №2EdчсЉС5rsДА2STѓ-ї.U’2no9#§o9 Ѕ^Џao9o9№Hоyo9o9o9o9)`=o9dУ„@no9k9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџџџџџN0{37F963C3-6351-11D6-8769-000086394B13}№LдџџџџSГ зe№eџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџџџџџN0{37F963C3-6351-11D6-8769-000086394B13} џџџџР @џџџџџџџџџџџџџџџџџџџџџџџџџџџџ” zРџџIžšK[џџџџџџџџџџџџџџ€џџџџџџџџ ”iƒ|џџџџџџџџџџ €iƒ~џџџџџџџџџџџџџџ€ ˆ@џџџџџџџџџџџџџџџџџџџџџџџџ”iƒŠџџџџџџџџџџ €iƒŒџџџџџџџџџџџџџџ€ €џџџџџџџџџџџџџџџџџџџџџџџџџџџџ” 2јџџџџџџџџџџџџџџџџРџџџџџџџџ ”iƒ^џџџџџџџџџџџџџџ€`„`џџџџџџџџџџ Rџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџ ”iƒ^џџџџџџџџџџџџџџ€€ўџџџџџџџ€џџXџџџџџџџџ%џџџџp€Рџџџџ@@јџџџџџџџџџџџџџџџџ`џџџџџџџџXџџџџџџџџјџџџџџџџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Кф{F пўЪ7€€€ џџџџ"€ "€ "@€ hh€ ар€ џџџџ" шT№H ` pˆ Ј АРШ€ џџџџ" аи<ш(8@€ џџџџ"HPh€ џџџџ" p€xb€BшB0x АРШаи€ џџџџ" р`шHX`hp€ џџџџ€ џџџџџџџџ€ЭџџxЭџџp–р If IsNull(Me.date) Then%р Me.cboDate = simDateџџџџрb Me.txtRoomID = DFirst("roomid", "tblroomstate", "tblroomstate.stayid=" & Me.Parent.stayID)р End Ifoџџ–@ ~ € | ‚ | „œрO' Don't interfere with dropped down list!– џџ!b$†›G|j | ‚œLџџ џџ!bXЌ џџ(bdџџp џџ!bXЌ џџ(bkџџP B@џџ!kџџ8oџџ0–Р Š$†œџџЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& 'Œр% 0kџџРoџџИ–@ џџ!8"B@poџџ–€]ђр џџ!8": Д›GЖAYou can only record services for guests who are checked in. Undo?'`j џџ!Ќ ›GЖ&The quantity must be at least 1. Undo?'`j џџ!Ќ›GЖ%You must select a service type. Undo?'`j `Ж›G|j ` Z \ $& ^œ џџB@dџџ8З'^kџџ(oџџ –јЖCAre you sure you want to delete this service from the Guest's bill? Z \ $& ^œ џџ!8B@|џџ kџџ˜З'^oџџˆџџџџ€џџџџ•ДAttribute VB_Name = "Form_fsubStayServic es" АBasА0{37F963C3-6351-11D6-8 769-086€394B13} |@GlobalтSpacIFalse dCreataDblTru P€redecla IdЙ"Expo se_TemplateDeriv–Custom izD$Opti€on Comp@Ь DT€‰  €<licit P/3 Sub cbo€e_GotFocus( ) ' If IsNull(Me.d) Tјhen„€ „vsim# txt@RoomIDDFirst("rid", "tdblst..@yid=" &J РPР4ntIDE(End If С€2U6Key Down(РCode As Integer, S№hiftH€A6Р>!C= acBMa0sk A†= vb€Up Or ХСƒK ' €Don't i€rfere with dropp…€xd@& lisРeуNot_СS_CYExitAn ў  Ь%Уj…СŠkЂC- 1‡EП=h+JРIfХDoCmd.CancРelEven;фo€!InL@$(Ne*wРaс5S…ng, Respon`Ї:g8Ш(Dc(чCall MsgB ox("EA4 a" ] asрy-month-yea€Ee.g. 2€5-12-02VvbExР}ma!oЄAfЁGErrBCрinueрA0УМЂžAfterМUpсr †a!€kGrandTotal.Reque ryЖaт Before у1‹_Dim| sч+# aЇЂu Р<> cIn‚р€ДYou can only re@cord sdЕ € guests who с“checkр_in. рUndo? ВСc @Quantit`y < 1ш РZ qEm Ё be at leastќ 1‘ РgЄЦтЉ Ё‚select`?Ad typeŽ syИ""ЃЫpСЃHs,р‚YesNo Z+ QСГ)@vўbрЂу*Ф9СЋn9ф3= уШЁFm_тD@te(Б;A'”"A€‘yр6su‚w@. to dB this…8 fˆrom e G!'s bill?Ђ`ПaЦH.reрfresh!ы)…A|Ёд^ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(0”џџr> џџџџ< џџ<џџџџџџџџџџШ%€ d GuRJžšK[%ژ№ дАџџџџE зeџџџџЖџџџџџџџџ4џџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(0”џџr> џџџџ< џџ<џџџџџџџџџџШ%€ d GuR%ژBџџџџџџџџџџџџџџЪ˜ДBџџџџџџџџџџџџџџЪ˜(BџџџџџџџџџџџџџџЪ˜PBџџџџџџџџџџџџџџЪ˜ЎBџџ џџџџџџџџџџџџЪ˜‚xBџџ џџџџџџџџџџџџЪ˜Ќ Bџџ џџџџџџџџџџџџЪ˜T€nBџџџџџџџџџџџџџџЪ˜RШdBџџџџџџџџџџџџџџЪ˜d№BџџџџџџџџџџџџџџЪ˜LјBџџџџџџџџџџџџџџЪ˜NџџџџBџџџџџџџџџџџџџџ@џџџџlџџџ џџ  ˜`џџџџџџџџџџџџ x џџџџŒIƒ`џџџџџџџџ џџџџџџ€ и`џџџџџџџџр\џ+џџџџ џџџџŒ џџџџ`џџџџџџџџџџџџ  џџџџ Œiƒ2џџџџџџџџџџџџџџ€`„.џџџџџџџџџџ@„џџџџџџџџ џџ`„0џџџџџџџџџџџџџџxЊ€џАџџ0@џџџџџџџџъ€и(џџџџ@џџџџџџџџъ€B@,џџџџ@џџџџџџџџЪ˜ВhBџџџџџџџџџџџџџџЪ˜ИBџџџџџџџџџџџџџџЪ˜АрBџџ џџџџџџџџџџџџЪ˜€0Bџџ џџџџџџџџџџџџЪ˜фXBџџџџџџџџџџџџџџЪ˜bЈBџџџџџџџџџџџџџџЪ˜ аBџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџАџџџџPјџџџџXxиШџџџџˆ( џџџџр˜hи@И0€Ј№аџџџџƒ@џџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџB@ўџџџџџ\џџџ џџ џџџџј8џџџџˆџџџџџџџџџџџџиџџџџјџџџџџџџџџџџџџџџџџџџџА8џџџџџџџџџџџџџџџџџџџџџџџџџџџџ&Кф{F *\R1*#91$*\Rffff*1148465106пўЪ)€ € џџџџ€€ „(€8€@€ џџџџ€ ‚H„`а„R0„>ˆ€ џџџџ„TШ€ x „:˜„Bи„H € џџџџ„4h€ џџџџB   ЈИ€ џџџџB РШа€ џџџџB  и€р€шј(.@px€џџџџр Module modCommonЭџџ`ЭџџX] ЮЌђˆmS] ђА] ђир{ The following constants also appear in cboBoxes as literals. The named constants cannot be used there without programming.'Open]$Ќђ@ЌђЌђhЌђЌђ(ЌђИрQ Stay states and Room states]$ЌђPЌђрр%5 Special values for include stays. Sequence importantus not]$ЌђЌђxр(! Special values for include roomsle]$Ќђ0рA Column number (1...) for first RoomGrid column containing a datet.рr Must be 6 for Access 2000 for some reason. Maybe because there are 2 hidden columns that Access 2000 counts as 1.]$Ќђ р( Total number of date colums in RoomGrid ']$ЌnђXр/ Last date in calendar table is today+cCalAheadЬ]$Ќdђ€р6 Simulated today is first date in calendar plus cToday]$ЌђШЌђЈЌђ№ЌђаЌђј–8 ` B@ьiџџ`–˜ B'iџџH–и]ђ8]ђPђh,Ќ'.Ж' .KžšK[ 2 єB .Ќ '. 2 .Ќ$њ'0 0Ж0 0Ж9›G  0'jѓџџШ 'iџџИџџџџАџџџџњГAttribute VB_Name = "modCommon" ' Module P O@ption ”pare Database0Explicit Pub frmStays(3) €As Form6intIntegersim[ez' The following constants also appear in cb oBoxes  liter.< nчd8cannot be us@ed the€iwithout p€rogramm€5 .†KC: cTemp˜0, cBˆook€= 1TIn€ 2O = 3€Cance l 4RepaФir ' ‚}atUnd Rooœm ƒ72Or‚.Q9Any€!7!pecial va$lu#fo€clude$ys. SequeA i№mpor˜ .@‚= 7€(@Freеƒ6лr€+sfDzƒ„FkColumB5€number (1...)€qr firstqB=Grie €utainAxa daЖtР–€Ђu@ €i6Access 2H000Тso€Џreason. M„ay becaРt„tЊ2 hidde€‡'s€at ‰couB“s 1Љ|ot6s€]8Р4˜Tot]„4ofТ){Р•0sA SС4MZC€alAhead@ф36WLaР59Т­рalendРАРдРнi€(oday+cл… TР1РA€“№imulРKРБТРУCXЮplusРАЁ ю7ub1ЂYuFind‚T= `ZuSeИrvi / `YuLiр= 8, XuPr`6h Func†fncOpenAscii@(s) D`oCmd.сС‚ ]€IEР`eдS#ƒ(/d $`sc A§compr`HN)‚R(aсŒSЂngСР Dim i!†’!b`cЧ iр P0 bР"РЅWhia6 < Len(aЄi + 1c€Mid(a, i, 1„If c >РЏ0" A c Јшј€ џџџџ"  €8џџџџHЭџџxЭџџp– џџ!єЌ œ р тЖfrmStay$оЌ›G тЖfrmStay ъ B@Bjgridр1 Only one Stay window may be open in this versionЖfrmStayааЖstayID= џџ!єX  ќаЌ B@ьdF B@дkџџoџџј–`]ђР ( *›G .Aњje WHERoџџРџџџџИџџџџ;ВAttribute VB_Name = "Form_fsubStayList" "  Bas 0{1805097F-5866-11D6-8769-086394B13} |Glob„alкSpacI False dCr@eatablTru PredeШclaILžšK[dЕ"РExpose_Template Deriv–CuРstomizD$Option CШomp@ DT€‰  € Р0 Then SysCmd(acGetObjectиte, ac4, "frBmс") <…# ФDo.ClСSaveYes' Only one A window may be open in thisр vers@FЧCNOР$G$, A"9=" & CS(tr(Ц=)A"EdЄit -1E@‰B:0BeepDn€d If EР#Yв\KeyŒss‚(AsciiK]№Dim ‰Рa† = vbReturnd CallLti@p†!769-000086394B13}џџџџ <@џџrU€€€ џџџџџџџџЌ$ `ЬџџџџџџџџnrU€€€ XY13Y33‰C+БCџџџџ1+@4щ щšššџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@8щ  0œœœџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@<щ )0žžžџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@@Й С9ЄЄЄџџџџџџџџџџџџџџџџџџџџ@Dщ ‰ŒŒŒџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@Hщ йCЂЂЂџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@Lщ I0   џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@PЙ Сс ŠŠŠџџџџџџџџџџџџџџџџџџџџ@TЉ aб џџџџџџџџџџџџџџџџ  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@X i0rrrџџџџџџџџџџџџџџџџџџџџ@\ ‰0tttџџџџџџџџџџџџџџџџџџџџ@` Љ0vvvџџџџџџџџџџџџџџџџџџџџ@d б0xxxџџџџџџџџџџџџџџџџџџџџ@h љ0zzzџџџџџџџџџџџџџџџџџџџџ@l !1|||џџџџџџџџџџџџџџџџџџџџ@p I1~~~џџџџџџџџџџџџџџџџџџџџ@t q1€€€џџџџџџџџџџџџџџџџџџџџ@x ™1‚‚‚џџџџџџџџџџџџџџџџџџџџ@| С1„„„џџџџџџџџџџџџџџџџџџџџ@€ щ1†rU€€€ џџџџџџџџ˜,a`џџџџџџџџџџбё//,Ё`‘џџџџџџџџџџ !&&,с`•џџџџџџџџџџбё//0!` ™џџџџџџџџџџ9бё0//$a`џџџџџџџџџџ$Ё`Ёџџџџџџџџџџ8 `ЅџџџџџџџџџџIayџџџџ//##0I` Љџџџџџџ `  џџџџџџџџqџџџџ@l4‰џџџџ@t8Ёџџџџ@|<Йџџџџ@„@nxpose_Template Deriv–††џџџџџџџџџџџџџџџџџџџџ@„ 2ˆˆˆџџџџџџџџџџџџџџџџџџџџ@ˆщ 92ŽŽŽџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ŒЙ СБpppџџџџџџџџџџџџџџџџџџџџ@щ Q2џџџџџџџџџџџџџџœщ Щ2–––џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ щ б+˜˜˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЌ Р„%xџ ќxџWhџќ" txџ5hџ%xџ ќxџWhџќ" lxџ5hџ2xџ ќxџWhџ(Xџћ”Hџќ" \xџ6hџHџˆ4„$  xџhџHџTXўЪ€дф8gƒзeџџџџŠЖџџџџџџџџЈџџЌLаДrЛJŠШkM Ё@Žлшu Pж‡i†9K'ьњНžєKŽнр*9)$2џџџџџџџџџџџџx'ьњНžєKŽнр*9)$2ЌLаДrЛJŠШkM Ё@џџMEџџџџџџџџMžšK[џџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџrU€€€ џџџџџџџџЌ$`дџџџџџџџџџџ$A`иџџџџџџџџџџ,`мџџџџџџџџџџAa/&0СџџџџџџџџџџPSLџџџџS џџџџSџџџџ6ЂџџџџLџџџџ<џџ<џџ<џџџџџџN0{75E8DB8E-500D-11D6-8769-000086394B13} џџџџ іџџџџ`џџџџџџџџ№HџkџџџџџџџџЬ”€ўџџџџџџџhџџ@џџџџџџџџ%џџџџџџџџpџџџџƒўџџџџџџџАџџџџџџџџџџџџџџ %‚ єџџџџўџџџрџџўџџџџџџџџџџџ %џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈ   ўџџџ KU !"#$ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@XBCDEFGHIJKLўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8˜šœ@ўџџџџџxџџџ џџ @ўџ№hџџџ џџ @ўџџџџџXџџџ џџ Ct@ўџџџџџHџџџ џџ abelџџџџАџџџџџџџџ@џџџџџџџџџџџџџџџџ@џџџџџџџџџџџџИˆЌаЬџџџџџџџџџџџџџџџџџџџџџџ€Кф{F $*\Rffff*1;48465203*\R1*#8fпš4œ8ž<Є@ŒDЂH LŠPџџџџTrXt\v`xdzh|l~p€t‚x„|†€ˆ„ŽˆpŒ’””˜–œ˜ ўЪ € € џџџџ€€ € џџџџ"H(%p%ˆ:2 € Lр0€ џџџџџџџџ@р Form frmRoomGrid1Эџџ`ЭџџX–р< Happens for instance when user moves curser up/down in grid џџ!8!p џџ(˜x џџ!8!l џџ(šsed џџ!8!nЌ џџ(œр) Access 2000 compensationџџ рF Debug.Print "gridCurrent"; Me.CurrentRecord; Me.SelLeft; Me.SelHeightoџџШџџџџРџџџџеБAttribute VB_Name = "Form_fsubRoomGrid1"D ЄBasЄ0{75E8DB8E-500D-11D6-8769-086394B13} |GlobalмSpacAIFalse dC€reatablTru PredeclaIdЖ"Expose_Templat@eDeriv–C€ustomizD $' ’ frm†‘ Option Compy€K D_• HlаicitP€:€> Sub&_Current() ' Happens for instan“when user moves curup/down‰€ gж Me.SelHeАightP€J0nt.gƒ Wi8dth ‚Э LeFfЬB+ 1@.A€ccess 2Р, cРA@1aE ' Debug.a>nt "С*„<" ; 'Reco|rdB@/AХE-E ndAMQФKO+ i… Upd€[ Nex&tACl‚№4дџџџџ;зeкЕџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџ|/фhэ1Л2f зeџџџџŠЖџџџџџџџџ”џџДb6Ls%MМЉђwZЈДя뉋\ж‡i†9K-ЁдšLž^D]Q:сшџџџџџџџџџџџџx-ЁдšLž^D]Q:сшДb6Ls%MМЉђwZЈДяџџMEџџџџџџџџџџпџџŒџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€[LџџџџS џџџџSџџџџ(LџџJ<џџи>Ђџџџџ”џџџџLџџџџLџџџџLџџџџš џџџџ”џџџџLџџџџLџџџџџџџџ”џџџџ”џџџџLџџџџLџџџџLNžšK[џџџџџџџџLџџџџLџџџџџџџџџџџџLџџџџLџџџџ”џџџџLџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<џџ<”џџ<˜џџ<œџџ< џџ<Єџџ<Јџџ<Ќџџ<Аџџ<Дџџ<Иџџ<Мџџ<Рџџ<Фџџ<Шџџ<Ьџџ<аџџ<дџџ<иџџ<мџџ<рџџ<фџџ<шџџ<ьџџ<№џџ<єџџ<јџџ<ќџџ<џџџџџџN0{168913DB-5C8B-11D6-8769-000086394B13} џџџџˆ*j€l 8tџџ@џџџџџџџџj€pџџџџ@„џџ@џџџџџџџџƒўџџџџџџџ0џџџџџџџџџџџџџџ r`џџџџџџџџИœўkИџџџџŒ”iƒtџџџџ џџ џџи€iƒvџџџџџџ џџџџџџ€`„`џџџџxџџџџџ zЈ`џџџџџџџџ№ џkPџџџџ”iƒ|џџџџ џџџџp€iƒ~џџџџџџџџџџџџ€`„`џџџџxџџџџџ †@`џџџџџџџџ€œўkшџџџџ” ”iƒtџџџџ џџ џџ€јiƒvџџџџџџ џџџџџџ€`„`џџџџxџџџџџ Šј`џџџџџџџџИаўk€џџџџ˜'”iƒŒџџџџ џџџџ €iƒtџџџџџџ џџР€iƒvџџџџџџ џџџџџџ€`„.џџџџzџџџџџ ”8`џџџџџџџџ(tџkџџџџџџџџœ8” žx`џџџџџџџџџџџџ џџџџџџџџ @”,Ђ8`џџџџџџџџџџџџ И џџЄ FМiƒЄџџџџџџџџ џџи€iƒІџџџџџџџџ џџј€iƒЦџџџџџџџџ џџ€omIDiƒўџџџџџџџџџ џџџџџџ type,Ў@`џџџџџџџџџџџџ x џџЈRМiƒиџџџџџџџџџџ˜€ate)iƒ:џџџџџџџџџџИ€'`iƒўџџџџџџџџџ џџџџџџ (`„Аџџџџџџџџ џџM C@„џџџџџџџџ џџall `„0џџџџџџџџџџd ca „,џџџџџџџџ8 per % Ц `џџџџџџџџј$<џk€џџџџЌq”iƒ`џџџџ џџџџџџџџ€.pri Жр `џџџџџџџџџџџџ џџџџџџџџА w” М@ `џџџџџџџџџџџџ џџџџД ”iƒ^џџџџџџџџџџџџџџ€mm-d О€ `џџџџџџџџџџџџ џџџџџџџџИ Š” Р `џџџџџџџџџџџџ РџџџџМ Ž”iƒ|џџџџџџџџџџр€а iƒ~џџџџџџџџџџџџџџ€Ќ Т@ `џџџџџџџџ8)4џkџџџџџџџџР ›” Ф `џџџџџџџџЈ'јўk€џџџџФ Ё”iƒ^џџџџ џџџџџџџџ€col Цр`џџџџџџџџ|џkџџџџџџџџШЊ” Ш``џџџџџџџџ`&4џk џџџџЬ Ў”iƒ|џџџџ џџџџ@€џџџџiƒ~џџџџџџџџџџџџ€џџ Ъ `џџџџџџџџ€!HџkџџџџџџџџаЛ” а `џџџџџџџџџџџџ рџџџџдР”iƒ^џџџџџџџџџџџџџџ€ в@ `џџџџџџџџШ |џkџџџџџџџџиЧ” д  `џџџџџџџџџџџџ џџџџџџџџмЫ” „жџџџџџџџџ˜ % м `џџџџџџџџџџџџ џџџџџџџџрк” „жџџџџџџџџј џџџџ% ЪИ `џџџџџџџџАиўkџџџџџџџџф))щ”@„`џџџџlџџџ џџ@„оџџџџ\џџџ џџ`„рџџџџXџџџџџ`„тџџџџPџџџџџ `„.џџџџNџџџџџ џџ јј `џџџџџџџџџџџџ џџџџџџџџш ” ц8 `џџџџџџџџШpџ+џџџџџџџџь ” <x `џџџџџџџџШhџkџџџџџџџџ№$” .ј `џџџџџџџџh џkИ џџџџє *”iƒ^џџџџ џџџџџџџџ€и „,џџџџxџџџ№ џџ % ъ8 `џџџџџџџџp|џkџџџџџџџџј5”  ˜ `џџџџџџџџpџ+x џџџџќ 9”iƒ^џџџџ џџџџџџџџ€ +1 ьи `џџџџџџџџP#єўkџџџџџџџџ B” ю `џџџџџџџџ˜"|џkџџџџџџџџK” №X `џџџџџџџџџџџџ џџџџџџџџO” ђџџџџ `џџџџџџџџOžšK[џџџџ џџџџџџџџ  T”€ўџџџџџџџР џџ˜ џџџџџџџџ%џџџџ0b€hј Dџџџџ@џџџџџџџџj€j4lџџ@џџџџџџџџj€n(<|џџ@џџџџџџџџ ј ј (џџџџџџџџ@8 @ри €а џџџџџџџџ  џџџџџџџџ р ˜ ј 8 Јџџџџ џџџџџџџџџџџџџџџџ@ И џџџџџџџџџџџџ џџџџx џџџџX џџџџџџџџџџџџ`џџџџx јx88@ @%‚ fџџџџўџџџ`џџўџџџџџџџџџџџ%џџџџИ и џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ˜џџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџLR@ЊИp@ўџ€tџџџ џџ @ўџPdџџџ џџ @ўџhTџџџ џџ @ўџџџџџDџџџ џџ @ўџџџџџ@џџџ џџ @ўџА0џџџ џџ @ўџџџџџ џџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜џџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџhџџџџџџџџ‚ЬЪЊ@ўџџџџџlџџџ џџ @ўџџџџџhџџџ џџ   џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ˆ џџџџX p џџџџџџџџph€џџџџШјˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџЊ†ИrЮ‚zЬ@ўџ˜Hџџџ џџ @ўџА8џџџ џџ @ўџџџџџ4џџџ џџ @ўџр$џџџ џџ @ўџ@џџџ џџ @ўџXџџџ џџ @ўџџџџџџ @ўџџџџџџџџџџ Pф†h–ŠjpК@ўџџџџџ№ўџџ џџ @ўџџџџџрўџџ џџ @ўџџџџџмўџџџџ @ўџџџџџиўџџџџ (lЌnЦџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџџџџџИџџџџџџџџџџџџџџџџЈˆџџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXџџџџџџџџЌL@ўџИhџџџ џџ @ўџ Xџџџ џџ @ўџаHџџџ џџ @ўџш8џџџ џџ @ўџ(џџџ џџ @ўџџџџ џџ @ўџ0џџџ џџ @ўџxјўџџ џџ @ўџHшўџџ џџ @ўџ`иўџџ џџ @ўџШўџџ џџ @ўџџџџџИўџџ џџ @ўџџџџџЈўџџ џџ @ўџРЄўџџ џџ @ўџи ўџџ џџ @ўџџџџџœўџџ џџ џџџџџџџџPџџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8иџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€Ќ‚L@ўџРhџџџ џџ @ўџџџџџXџџџ џџ @ўџ№Hџџџ џџ @ўџ8џџџ џџ @ўџ (џџџ џџ @ўџџџџџџџџ џџ @ўџPџџџ џџ @ўџhџџџ џџ @ўџџџџџ џџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџшџџџџџџџџџџџџџџџџpPџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџЌL@ўџ€hџџџ џџ @ўџhXџџџ џџ @ўџ˜Hџџџ џџ @ўџА8џџџ џџ @ўџШ(џџџ џџ @ўџрџџџ џџ @ўџјџџџ џџ @ўџ@јўџџ џџ @ўџшўџџ џџ @ўџ(иўџџ џџ @ўџXШўџџ џџ @ўџџџџџИўџџ џџ @ўџџџџџЈўџџ џџ @ўџˆЄўџџ џџ @ўџ  ўџџ џџ @ўџџџџџœўџџ џџ рџџџџР€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџp8џџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџџџџџXџџџџŽ Ќфтъ@ўџ€tџџџ џџ @ўџ dџџџ џџ @ўџИTџџџ џџ @ўџаDџџџ џџ @ўџА4џџџ џџ @ўџ2џџџџџ (ш@ўџ0џџџџ ј@ўџP џџџ џџ @ўџhџџџ џџ @ўџџџџџџџџ џџ @ўџ˜ќўџџ џџ @ўџШјўџџ џџ @ўџршўџџ џџ @ўџџџџџфўџџ џџ @ўџџџџџдўџџ џџ @ўџ0вўџџџџ H @ўџџџџџаўџџџ X0 џџџџ0 џџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPžšK[џџџџџџџџ”џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШџџџџџџџџp–ln@ўџјxџџџ џџ @ўџџџџџtџџџ џџ џџџџx џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШџџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџџџџџ–pljn@ўџрxџџџ џџ @ўџџџџџtџџџ џџ @ўџџџџџpџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџџџџџ”U˜{Г—{юš{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€ џџџџџџџџџџџџџџџџА џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh џџџџџџџџ–pljnю’{{@ўџ˜ xџџџ џџ @ўџџџџџtџџџ џџ @ўџџџџџpџџџџџ B—{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh!џџџџџџџџ”ц‘{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8"P"џџџџh"џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ "џџџџџџџџЬ‚ЮЪ’{{@ўџџџџџxџџџ џџ @ўџ€"hџџџ џџ @ўџџџџџXџџџ џџ Д”{@ўџџџџџHџџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8#џџџџџџџџ”••{e”{7“{{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ$ $џџџџ8$џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№#џџџџџџџџКŽ&ЊИЪ@ўџр$xџџџ џџ @ўџP$hџџџ џџ @ўџh$Xџџџ џџ @ўџ˜$Hџџџ џџ @ўџ€$8џџџ џџ ї‘{@ўџА$(џџџ џџ @ўџШ$џџџ џџ @ўџџџџџџџџ џџ @ўџџџџџјўџџ џџ @ўџџџџџєўџџ џџ \{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџА%џџџџџџџџј%џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜%џџџџџџџџ–Ќ{О‘{@ўџШ%xџџџ џџ jš{@ўџр%tџџџ џџ У–{@ўџ&pџџџ џџ @ўџ(&`џџџ џџ e{@ўџџџџџ\џџџ џџ @ўџ@&Lџџџ џџ @ўџџџџџ<џџџ џџ Ч{џџџџ€џџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ'0'џџџџH'џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ'џџџџџџџџ€‚„Њ†КИ  @ўџ`'xџџџ џџ д@ўџx'hџџџ џџ @ўџџџџџXџџџ џџ G @ўџџџџџTџџџ џџ Р@ўџ'Dџџџ џџ trib@ўџџџџџ4џџџ џџ m_fџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`(x(џџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџH(џџџџџџџџЊ†Ž& pD@ўџџџџџxџџџ џџ P/@ўџР(hџџџ џџ nce@ўџЈ(Xџџџ џџ If M@ўџи(Hџџџ џџ S@ўџ№(8џџџ џџ tиt@ўџ)(џџџ џџ <…# @ўџ )џџџ џџ es@ўџџџџџџџџ џџ dow @ўџџџџџјўџџ џџ sр vџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№)*џџџџ *џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџи)џџџџџџџџЊКИЪ@ўџ8*xџџџ џџ @ўџP*hџџџ џџ @ўџџџџџXџџџ џџ @ўџџџџџTџџџ џџ @ўџh*Dџџџ џџ @ўџџџџџ4џџџ џџ џџџџ8"!!xџџџџа ˜ џџџџџџџџX џџџџ(˜ џџџџџџџџџџџџ8P˜lџџџџџџџџџџџџџџџџџџџџџџ :HКф{F $*\Rffff*1348465106*\R2*#2e*\R1*#99*\R1*#98*\R2*#24*\R2*#28$*\Rffff*1148465106*\R2*#29*\R2*#2a*\R1*#61*\R0*#13*\R1*#63*\R1*#5d*\R1*#5b*\R1*#72*\R1*#8f*\R0*#f*\R2*#34*\R2*#30*\QžšK[R1*#d*\R1*#19*\R1*#25*\R1*#92*\R1*#91*\R1*#39*\R1*#a*\R1*#3*\R0*#1*\R0*#14*\R1*#1*\R0*#20пtLџџџџPzT‚X\”`˜drh|l~pxt„xˆ|Œ€†„€ˆpŒўЪX€ € џџџџ€€ €(€0€ tP€ џџџџ" Ш€а€ 0иTT`@Иа€ џџџџ" и€р€ ~ш`h: Ш\ FRhHRАh јD` Ј@Иа€ џџџџ" и€р€ Tшh@^ ЈT@`x€ џџџџ" €€ˆ€ @=а№€ @€ LH6˜ ар€ Fј6Ž@6Žx А,Ри€ џџџџ"Lр<0 -p -ˆ :3  р ш € џџџџ" № <ј 8 P X € џџџџB  ` h $p  ˜ PИ   ( 0 €8 t@ И € џџџџB  Р €.Ш €ј €   $0 X x € .˜  xШ 2@ x  €  ˆ  ˜  Ј Ш ш    D( $p r˜   0 @PX€ џџџџ" `hˆN˜А€ џџџџ" ИРи4№(@Hhp€ џџџџ"  x€<˜ и ш ј€ џџџџ"  (€ џџџџ"  0T8 Ј :Иј  0PX€ џџџџ"`0hW€ Ј€ џџџџ" А И<+а   0@H€ џџџџ"PX`€ џџџџ" hTp#Ш р 5№ 5(W0 P`h€ џџџџ"p;x˜ € џџџџ"  ЈА:Ш  (€ џџџџ"08@€ џџџџ" H€PX(`ˆ˜ЌЈX` hx€€`ˆш€ џџџџ" №€ј(0@`PАИ Ра€и`р@€ џџџџ"H€P€h€p*?x€ vЈ€ " IH€ $h,/ И/Ри€ р,f€ џџџџ4S0€ ,h8˜А)И")Ш >r№ 0P >rX ˜ИР6Ш р ш )№ BX,`˜€ џџџџ"  ЈИ а р №€ џџџџ"€ f€ X€3и3№3:9 `€ џџџџ"RžšK[h p €Z € џџџџ" €€  38HX p€Z Ј € џџџџ"   € џџџџ" ( € 0 € ЊР 3p!3ˆ!3 !:9И!ј!€ џџџџ"","(+" @"P"WX"x"€"€ џџџџ"ˆ""˜"€ џџџџ"  " Ј"И"Р"€ џџџџ" Ш"а"и"€ џџџџџџџџш"р Form frmRooms+{enЭџџ`ЭџџX]ђа ] ђј ђђ ђ(рn gLeft uses the correct column number, not the +1 number erroneously used by Access2000. The code compensates.џџџџ–x]ђјр* Selects RoomStates for the desired periodЖLSELECT tblRoomState.* FROM tblRoomState WHERE ((tblRoomState.date) Between #'` ` tЖ mm-dd-yyyy$ЌЖ# and # vЖ mm-dd-yyyy$ЌЖ#);'` ` L!d"x(hoџџ(–]ђрw Selects RoomStates of the desired type. If typeID shows any room, then minRoom may be >0 meaning from this room and onЖWSELECT tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2, '` `Ж+Count(qselRoomState.state) AS CountOfstate '` `ЖNFROM tblRoom LEFT JOIN qselRoomState ON tblRoom.roomID = qselRoomState.roomID '` | € ›G `ЖWHERE tblRoom.type =  |Ж0$Ќ'`j ~Ќ ›G `ЖWHERE tblRoom.roomID >=  ~Ж0$Ќ'`j `ЖY GROUP BY tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2 '` | ‚ ›G `Ж%HAVING (Count(qselRoomState.state)=0)'`j `Ж;'` ` L!d"„(hoџџ(–Ј]ђ(рM Cartesian product of all rooms of interest and calendar for the shown periodЖ`SELECT qselRooms.roomID, qselRooms.bedCount, qselRooms.type, qselRooms.price1, qselRooms.price2,'` `ЖPtblCalendar.date FROM qselRooms, tblCalendar WHERE ((tblCalendar.date) Between #'` ` tЖ mm-dd-yyyy$ЌЖ# and # vЖ mm-dd-yyyy$ЌЖ#);'` ` L!d"ˆ(hoџџ€–@]ђрр: Sets column headings for all shown dates in crosstab fsub Œ Žааа  B@ьџ .ўЌЌ’р: Avoid control name conflicts by renaming them to col1 ...рF The dirty constant 16 is the item number of the last non-column item.Жcol .Ж0$Ќ .Ќ Œ$ф#(џ .ўШџ .ўЌЌ’р? Now give the columns the right control name and control source t . Жdd-mm$Ќ .Ќ Œ$ф#(’ t . Жdd-mm$Ќ .Ќ Œ$ф#(џ .ўШ т Œ ъ B@Boџџ –јр@ Resets current grid selction to value saved at subRoomGrid_Exit pЌ œр) During open, the grid is not yet created p џџ!–!r(˜ l џџ!–!r(š nЌ џџ!–!r(œр, Access 2000 compensationkџџoџџ–8ЌA@ р) Saves selection before redoing the query џџ!–!Т џџ!–(ТA@”oџџ –xЗ'ЂЩЈр frmRooms may not be open џџ!–!r!˜Ќ›GšЈj џџ!ЊXЌ џџ!–!r!œ Ќ Ќ 'ЄрR Access 200 compensation Є џџ!–!r!š Ќ 'ІЗ'ЂzџџШЃЈР Ц›GЖ$You must select a room and a period.Ќ $8Ж%Select it from the Find Rooms window. ŽA&jiџџ@–8]ђир Matrix to hold entire room grid]ђ№ђ]ђ З'Ў џџ!–!r!tB@v j p џџ!–!r!t%В'Аџ ў j j p Ќ ’џ 0ў n n l Ќ ’р' Debug.Print rooms(c, r - 1) 0Ќ Ќ $А$ œр4M Include the hidden guestID and type column thaSžšK[t don't count in the selectionЖ$The room is not free in that period. ŽA&zџџ€kџџxџ 0ўШџ ўШэЖ tblRoomState L%N.,џ ў j j p Ќ ’џ 0ў n n l Ќ ’ ,BV и ,)єЌ Ќ $А ,)@р(! RoomID in hidden column 1 (1...) џџ!ЊXЌ 0 Ќ ,)ZЌ Ќ $АЌ ЌЌ$Д ,)Fр<; Rooms with more than one bed have personCount=2 as default : ,): ,B@Xџ 0ўШџ ўШЗ'Ўiџџ –@ЖfrmMessageRoom џџ!–(Т џџ!–B@p ` џџ!–!r)ШoџџH–  џџ!ИX џџ(И џџ!ИX џџ!ЊXœЖ%Departure must be after the from-date ŽA& џџ!ЊXЌ џџ(ИkџџИ џџ!ИX џџ!ЊX џџ(КAЪoџџˆ–р џџ!И$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& B@ џџB@ џџB@kџџ№oџџш–@A”oџџа–€ ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!И$†›G|j | ‚œ џџ!ИX џџ!ЊXЌ ›G џџ!ИXЌ џџ(Иjdџџ џџ!ИXЌ џџ(Иkџџр B@ џџ!ИX џџ!ЊX џџ(КkџџЈ oџџ  – џџ!ЊX џџ(Њ џџ!ЊX џџ!К џџ(ИAЪoџџP –@ џџ!Њ$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& B@ џџB@ џџB@kџџИ oџџА – A”oџџ˜ –р ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!Њ$†›G|j | ‚œ џџ!ЊXЌ џџ(Њdџџ№ џџ!ЊXЌ џџ(Њkџџа џџ!ЊX џџ!К џџ(И B@kџџ˜ oџџ –` џџ!Ь ‚›GЗ џџ(ЮjAЪoџџX –  џџ!Њ$†›G|jЖ+Enter date as day-month-year, e.g. 25-12-02 ŽA& џџB@ B@oџџа – A”oџџИ –@ ]ђ€ A”Щкр There may not be an open stayэ ф"ц.ж ж": ДœІ ЖDYou cannot book additional rooms when the guest has been checked in.Ќ $8Ж@You can check him into the room - or make a new booking for him. ŽA&|џџ  kџџ˜ жBд|џџ€ Ѓкx ЖWhich stay to check in?Ќ $8Ж'Open a stay from the Find Guest window. \A&oџџ –  ]ђр A”Щкр There may not be an open stayэ ф"ц.ж ж": ВœЖ The guest is not checked in yet.Ќ $8Ж Use check-in in the Stay window. ŽA&|џџHkџџ@ жBм|џџ(Ѓк ЖWhich stay to check in?Ќ $8Ж'Open a stay from the Find Guest window. \A&oџџИ– ]ђ@ ђX ђp ]ђˆ ]ђ  џџ!Њ$† џџ!И$†›G|jрo Date not valid, focus not changeable. Since this cmd is the default, it cannot be canceled, so it has to checkр Define period of interest: џџ!Њ џџ!ИXЌ Arр Define room type of interest џџ!ЮЌ œ ‚ џџ!ЮAzdF џџ!ЬЌAzkџџ р Define period to be shown џџ!ЊXЌ џџ!ЊX ф Ќ A† h џџ!ЊX џџ!–!ТЖfrmMessageRoomœр& Me.subRoomGrid.Requery ' Doesn't work џџ!–!Т џџ!–(ТdF џџ!ЊX'h џџ!–!ТЖ fsubRoomGrid1œЖ fsubRoomGrid2 џџ!ЊXЌ џџ!ЊX ф Ќ AŠЖ fsubRoomGrid2 џџ!–(ТdFЖ fsubRoomGrid1 џџ!ЊXЌ џџ!ЊX ф Ќ AŠЖ fsubRoomGrid1 џџ!–(Тkџџ@kџџ8 џџ!–!r!ФЌ œЌ'jЌ'p џџ!К'l ЌЌ 'n џџ!–B@р . subRoomGrid_Enter will set the grid selectiondFЖNo rooms match what you ask forA@Цkџџhoџџ`–И @!B џџ(Њ TžšK[@!BЌ џџ(ИЌ џџ(К ‚ џџ(ЬЗ џџ(ЮAЪoџџ№–ј р` When the focus passes from the subform to another main form, the rectangular selection is lost.рR No exit event occurs, but this event proc saves the selection for later resetting џџ!–!r!˜'p џџ!–!r!š'l џџ!–!r!ш'j џџ!–!r!œЌ 'nр, Access 2000 compensationoџџ˜–8 ‚ џџ(ЬAЪр Sets gHeight, etc. џџ!ЊB@рF Access removes the selection area without warning, but this resets itoџџј–x ]ђи р Debug.Print "frmOpen"эЖ tblCalendar L%N., ,"Z R @(B ,B@B @!B џџ(Њ @!BЌ џџ(ИЌ'pрK Prevents premature setting of grid selection when first control gets focusјoџџ№–ј A”oџџи–8 р‰ When the focus is passed to another control on the form, the rectangular selection is lost. This event proc saves it for later resettingрЃ Debug.Print "subExit"; Tab; Me.subRoomGrid.Form.SelTop; Tab; Me.subRoomGrid.Form.SelHeight; Tab; Me.subRoomGrid.Form.SelLeft; Tab; Me.subRoomGrid.Form.SelWidth џџ!–!r!˜'p џџ!–!r!š'l џџ!–!r!ш'j џџ!–!r!œЌ 'nр, Access 2000 compensationoџџ–˜ џџ!КЌ œЖAt least one night, please ŽA&Ќ џџ(КkџџЈ џџ!ЊX џџ!К џџ(ИAЪoџџx–и A”oџџ`– ‚ џџ(ЬAЪoџџ8–X A”oџџ џџџџџџџџЫЗAttribute VB_Name = "Form_frmRoo ms" Bas0{168913DB-5C8B-11D6-8 769-086€394B13} |@GlobalвSpac’False dCreataDblTru P€redecla IdБ"Expo se_TemplateDeriv–CustomLizD$'  … Option Compy€I D]“ Flicit Dim prevFiРrst As€nPub gTop Long, @gWidthˆL ef‚Heig‚h ' g‚uses the correct€lumn number, not+1 erroneously @d by €Access2Рr(. TdAmpHens@Ns.>Sub fncSeRlСŠSt(‚6Da@s Variant, LasЊtЫ)CsС7SЁœngA0@@,s † s for‚+de$si| pРlod( sЋSE€LECT tb!€.* FROMЪ WHERE ( ( d€,) Be€tween #€Ћ‘Хs &Bzat†4, "mm-dd$-y")"#№ andР  „:б );ФCurrentDb.QueryDefs!qBsHQ.SQLР6s8 E€€YO[s(@typeIDPIntegСvmingNШцYofЪ, . I€Ѓ showЂs€y rР‚,an Х mР=be >0 meani$ngРcom`isSТ‚$on–6.a ID  ƒ8.bedClou!GЄ5.счp rice1ь2`.ЋG с7"‚(K+sСT0) ASv@ Of L?" H LEFT JOIN ёj ONeLD€6Ћ #Ѕ ч)< cAn yFreeСkn пAYBУTЩ` "чK!ёA%"0"`;ЁU€ 1и> 0к Є> М' „ 'F І GROрUP BYьG/_5Q5"ЂWр"HAV ING (w9=0>)­7?m`лЙlGridџ™cœѓlCartр–an Оodu#€БРlallЂbs e€i@wre€Ссˆc€alendar†žяЁn`Tž%Msцg'Ч2ŸgchчЅh2,нѕа(CЄ .SгUfТ џyVJoVU&uoVoVц#h0oVyy$YoViV р2, 1N)Ф“Р]moр€than рs beРd have =2 as depfaulфvK$ ‘=УЃ’э.UpdЧcUCч‰TruР‰.Ѓriv!$Sub m€essage(т’2SРšngф)ЬˆSo€urceObjГ€= "frmMc С3"ЃlRequeryrš!txіt„YscИ ТЗˆр7Departure_After§C!(GIbH?FЄч‹)CЧ Р%јCV+Х­ї ƒ@'NЖB€В \G.`‚cmdсъ_C фk_/A/Bef\d/Cancel_(мЧ+уЖ“и)E xrpQR2ay-month-year, e.g. 2€5-12-02oВtЁDoCmd.9ѓ EvАQч€Un do TFocu_р'СeqЏ( љ_јGot’u(r`}#Œвdo PkKey Down(pCoplР‰Dƒ, Shi€uG“= ac’Mask An4d f= ’ Up№ Or ЕDёіs†DђpyerfeLwi LdroppХLd liE†!ѓ–yreTnђTL л dп9Р')?@Wю,с€S€€Џ4teяд_8>€†зEц–Ё1џпвv9QQI{(џЦ)Џ;\jОS •Пqт€Ў›RaCOR aЁбќQ!d%|mў) P& S EE€mЗ ‘/_ПDПD Ÿ&џ•|oD6šoDoDoD‡Фя1OIoDeУ@џVDРІD05ЯCЯЂЬЯCЯCЯCey2HЯCѓ€IЯC' ЯCЯCЯC`НџШC(s<C0 CCЃ+џ‘_+P+o?ЦБпzЃџЯ>КГЗ€O„O311w?&b _> гF›p 3ѓ <Р> cAnyšfRѓ ;ђ= еџ;Пœpeџ;П€вIs‹3Зm) Then Exit Sub Call MsgBox("Enter d@ate asy-month-year, e.g. 25-12-02", vbExclamation)œMe.UndoDoCmd.CancelEvent End{ PriviŠ cboType_GotF`ocus(Ns€etSelecfAmdBook_ Click>Dim curStay As Forрm_frmƒN- Orror GoTo no_ s'œre mA%not bn8 opІ'SeJt†7=7s!Š7If…!€Б= cIn‚Щƒ ЧYou0 can9€m addi‚al r@ooms wчthe guest$ hкbe€Jchecked in." & ChrP(10)@_G"%D  h€Kinto A - РAmak; new b€ ing іf€@ .T€A1‹˜С|œIfC]„e.cЩl7УG_:Ш …ЉWhаich ^ ,У/Hin?‹:"OСga!ƒ fromB6Fi• GBKw€owƒ1ŽQACБUЈmdCAUдinϘEϘ І˜AХ?€‚ўC)ЮL@His‡`^РXЦG yetLH"UsecF-inџ LТ*Ђl */ƒџBХcсBџj-у_C ˜_C `_C_C‰—mdСJыBs, Psql1Ђ2SЄtr g с’dVD€ŸУiСI`Џg,erc`…N(IZsЁ( Њ ЄF€X) AXЪDepa@rture)М' Aт:valid,x Ќ=angeable. SioРД€9`@рr Р!default, /`ЦE‘Р?BКe` so!%q efine perio№d of@E€ЫР”)zhfnc@ЛR€™ Htтe, CHgР’ю1„Уf Т•tрЧЩ )€'txta > 0ё­Їs(cAn2ya, чф El|se„fhIфи,ќ 0eЁ5dŸm" & Щрshownƒ‚Ѓ СсGrid(I Ѓ? - @JЯ+ cTдot&s$2€Ц€prevFirРУ=*ѓб$p subE.SourceObjw <> "PlMessagje1"'љR€equery рoesn't wxorkѓqяч=џЭЩ#\я №Х2GЇ5y"f8 1MіP~‘Columјns(Z1‘Џb<15П П @3Ё2~"WМб2%_ ї1яp|_ _ _ q& qї_ _ T 1Y 82Й‚?AAœ.CurrАЄR ecord/= g(Topрq1ggH eightLWiИdth0P №ANЂs8LefcA5Бу + HЭe“ЋЫ`/ˆ$_Еwi@Ж`ЌхВrg= s­‘Œ‚mу6 ("NoЄžPЖ0what yб`Ёask˜"lFЯ‹хбЖ ]Re№'jф„2PmodComсрО.sim1ЃPџ0цWpЌfР–џФ#сН0хUжQEс Nullc2+0 WuoПpУbНDeaGРССФП' WeБfБФ passes 6 №0Ќ№ o aeАЕh ЯmaАŒA, "r Oqular—!qlost. Ј ' peqдeaЭ oc ­but№ scproc xsavРБt6‘ Ђlрr rat‚я!—*Px$.’/ r“,Эcg,ПelтЄѓ31Om.@РdD/rвA0.Acc0* 2000 ctom Жsbр‰Lјoad!з'o!Аџ30Ls єАшtc?pwбl  68є remoяarea witho№wadrn№, Ц2sяpЯ Щ ёХ(Уэј›9љžrs13J€7!#Р @Debug.€яnоtbu!„Pр @0z1уMDb.б("tbl€endaŽre?N;`4rs!с;#РJ day“rs.ВClose Me.cboFrom = modCommon.@simDat ŒDeparture!  + 1 gH eightH0 ' Prevents premazsetting of grid selection when first control ge;focus End Sub € Privž subRoomGK_Enter()‰Call]tS`#Bxit(Cancel As I€(ger)' WOthe H i€jassed to an:o€ r\gƒrm, rrangpulary€!€Хtp. Th‚••oc saves Dit€5r l€urˆ re 'н@Debug.…n(t "€‚E€\";Р Tab; ыˆ‹@.Form.€ƒTopoлLef‚t[Widthƒџ”$C €Žд Щ€2? D+з B- 1@ЊAccess 2000qmp0ensaAЅtx„tNAКs_Af@˜Upd@iХžIf`щ† <РT€C%AoBЇMsgBox(€"At leaРН one nA, pAe", vbрExcla€ЯЩФЖ7AI=ХпAЩIfЏУ@ї юCAѕ(У}~)w цуbcmdFind_ClickП _GoќtFuпo-x !xё(#TypЁŽcAn~yŸL„ _‰Œ2џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€€ўџџџџџџџˆџџ`џџџџџџџџ%џџџџhџџџџџџџџˆџџџџџџVžšK[џџ`џџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜Кф{F пўЪ€€€ џџџџ" € №$дџџџџ,зemыџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџJџџN0{D49D3485-59EA-11D6-8769-000086394B13} џџџџ˜ 6˜џџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€ „,џџџџџџџџx %`„`џџџџџџџџџџ€ Rџџџџџџџџџџџџџџџџџџџџиџџџџџџџџ""”iƒ^џџџџџџџџџџџџџџ€`„Tџџџџџџџџџџte W „,џџџџџџџџ(8! %`„`џџџџџџџџџџ!@€ўџџџџџџџpџџHџџџџџџџџ%џџџџ€џџџџ˜џџџџџџџџhџџџџџџџџHџџџџџџџџ˜џџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€Кф{F пўЪD€€€ џџџџ" €€ (8H jX Ш и ршf№X p €    АР Ши6ј:0€ џџџџpVxа иш№€ џџџџ" ј€€€(28€ .p„ (@ 6Pˆ H и ш ј  € џџџџ0V8˜ € џџџџ&Ј6аDP€ џџџџ€ џџџџџџџџ`ЭџџxЭџџp–]ђ`]ђ€ џџ!8":ъ ДK ВKT џџ!<Ќ œЖ)the number of persons must be at least 1.Ќ $8Ж You may delete the line instead. ŽA&L!d џџB@œЗ'^|џџkџџЖ*SELECT * FROM tblRoomState WHERE [stayID]= џџ!8!>Ж AND [roomID]= џџ!@Ж;'`э ` L%N., ,!Bє ,B@DИџџџџ џџ!< ,)F ,B@XКџџџџ ,B@HШѓџџ8 ,B@Bџџ џџ L N  џџ!8B@Jџџџџ џџ!8B@р! To make frmStay receive the keysЖ +{enter}%xA@Pр  Updates the record, refreshesSџџˆЖGYou can only release rooms for a guest who has booked or is checked in. ŽA&З'^ џџB@nџџoџџ–˜]ђј]ђ]ђ0 џџ!8":ъ ДK ВKT @!BЌ 'Tр) Free the rooms from todayр' Delete any remaining days for the roomІ Ж*SELECT * FROM tblRoomState WHERE [stayID]= џџ!8!>Ж AND [roomID]= џџ!@Ж AND date> TЖ;'`э ` L%N., ,!VЌœЖ'There are no remaining days to release. XA&dџџp ,!VЖ! days will be released. Continue? Z \ $& ^œ ,!Bє ,B@` ,B@Hѓџџ№kџџшkџџр ,B@BSџџШЖGYou can only release rooms for a guest who has booked or is checked in. ŽA&З'^|џџ`nџџX b d L N  џџ!8B@J џџ!8B@р! To make frmStay receive the keysЖ +{enter}%xA@Pр( Saves the guest and the stay, refreshesoџџЈџџџџ џџџџMЕAttribute VB_Name = "Form_fsubStayRooms"D ЄBasЄ0{D49D3485-59EA-11D6-8769-086394B13} |GlobalмSpacAIFalse dC€reatablTru PredeclaWžšK[IdЖ"Expose_Templat@eDeriv–C€ustomizD$Option Comp@ DT€‰  €с…І&ќ "П€Д€@Д n#„Ѕz60НД€Иr Б`no;€W*&t!ТYƒSInџ№,NW›1С БbC`ќа йГwi€bP`rР(аhd.rntinue?т]YesNoД +€^QБ3t) Jмvbp ! /PbџL№"лUр?MХџЛMQa6‰b§рјO#џЯD№xXsЯD”ЯDЯDЯDџOrЂ ЯDb{pЁ еDс‡У ЗXъ[GridРрuFindтX`\/]я-я\я\ „kР[ЃЏ\aЅ\Saveƒ\ЃVa?|Ё>LJ]b ƒQ @ўџH Tџџџ џџ @ўџЈ Dџџџ џџ @ўџџџџџ@џџџ џџ 0л @ўџ 0џџџ џџ @ўџџџџџ џџџ џџ фс @ўџџџџџџџџ џџ џџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџџџџџN0{5589E85E-5A90-11D6-8769-000086394B13} џџџџЈ 2џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџ”iƒ^џџџџџџџџџџџџџџ€€ўџџџџџџџˆџџ`џџџџџџџџ%џџџџhџџџџџџџџˆџџџџџџџџ`џџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜Кф{F пўЪ€€€ џџџџ" € 8џџџџHЭџџxЭџџp–рOn Error Resume Nextžџџџџoџџ@џџџџ8џџџџ=БAttribute VB_Name = "Form_frmServiceListˆ" ЈBasЈ0{5589E85E-5A90-11D6-8769-08639 4B13} |GlobalоSpa‚cIFalse dCreatablTru Pre declaIdЗ"Expose_Templa€teDeriv–CustomizD$Option Comp@ D3T€‰  €Ђџџџџ”џџџџLџџџџLџџџџLџџџџš џџџџ”џџџџLџџџџLџџџџџџџџLџџџџLџџџџLџџџџLџџџџ‘{@ўџџџџџ@џџџџџ y{@ўџ 0џџџ џџ @ўџџџџџ џџџ џџ w’{џџџџL^—{Y“{@ўџhџџџ џџ @ўџ€џџџ џџ А•{@ўџџџџџџџџ џџ œ{џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜Pџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџРЦИ‘{P›{Ћ”{@ўџhxџџџ џџ @ўџџџџџtџџџ џџ а{@ўџџџџџpџџџџџ @ўџџџџџlџџџџџ џџџџи0џџџџx @ џџџџџџџџрџџџџ  @ џџџџџџџџџџџџx Ќ4Ьџџџџџџџџџџџџџџџџџџџџџџ(+Ш Кф{F $*\Rffff*1048465106*\R2*#2e*\R1*#99*\R1*#98*\R2*#24*\R2*#28$*\Rffff*1148465106*\R2*#29*\R2*#2a*\R1*#25*\R0*#f*\R2*#34*\R2*#30*\R1*#72*\R1*#8fпџџџџTЂXr\š`vdph|lxp†t€x‚|Š€ž„ˆ’Œ”–”z˜ІœЈ ўЪ€ € џџџџ€€ €Z(€ џџџџ" ˆЈРи€ џџџџ" рш08€ џџџџ" @€H(Ф*P( 8P XM`И24РVdјv˜PШ а@рј€ џџџџ" €BJ X\ ЈZ  h$!x  ,ЈШ &,ајd @pˆ€ џџџџ"˜ИHIШ€ џџџџ"   @Ph€ џџџџ" pRx>а€ v ˆ  ˜ Ј € џџџџ" А €И  Р р ј    8 @ P  X h p € џџџџ"  x € ˆ    Р ,Ш $ј  0 € џџџџ" 8 € $@ "h 8 Ш € 8ш  &( P € џџџџ" X "` 8ˆ Р € 8р   € $@ &h  € 2˜ 2а € џџџџ"   @PX"p 8˜ а€ 8№(F0€ Šx (€ џџџџ"0 8 @ P `p€ ˜ Ј И!Ш&р№ј€ џџџџ"    0 @DP˜ € џџџџ" Ј$А*и(0€ џџџџ"  88@<x И Ш иш№€ џџџџ"  јTX p€ ˆ  А Ша ш№ ј (0€ џџџџ"  8@HZžšK[`h€ џџџџ" px €    А&Рш№€ џџџџ" ј   ( 8&Hpx€ џџџџ" €€ˆ€˜  Ј И Ш иш ј< H&X€hˆ8№0( X h €  ЈАИ€ џџџџ" РШр€ џџџџ"  ш№ ј  ( 8 HX$p˜ € џџџџ"  ЈАШ€ џџџџ"а€и 3рH <(@H€ џџџџ" P€ џџџџXџџџџhр Form frmFindStayЭџџ`ЭџџX]ђx ђ  р&E Saved SQL prior to GuestHistory. A one-level stack. Null when empty.x–0 š$ ›G|j L!d"Ђ!h'š L!d"Є!h'œoџџ –p š$ ›G|j š L!d"Ђ(h œ L!d"Є(hЗ'šoџџР–А]ђ0І ЖXSELECT tblGuest.guestID, tblStay.stayID, Min(qryRoomsPerStay.firstRoomDate) AS arrival, ЖoMin([qryRoomsPerStay].[roomID]) & IIf(Count([qryRoomsPerStay].[roomID])>1,' + ...','') AS rooms, tblStay.state ЖhFROM tblGuest INNER JOIN (tblStay LEFT JOIN qryRoomsPerStay ON tblStay.stayID = qryRoomsPerStay.stayID) Ж&ON tblGuest.guestID = tblStay.guestID Ж9GROUP BY tblGuest.guestID, tblStay.stayID, tblStay.state '` ЊЖany Ќ Ў œ `ЖHAVING '` ЊЖanyœ `Ж&(Min(qryRoomsPerStay.firstRoomDate)= # ЊЖ mm-dd-yyyy$ЌЖ#) '`kџџ@ ЊЖany Ќ Ў ›G `ЖAND '`j Ќ А Ќ Ў ›G `Ж(tblStay.state =  ЌЖ0$ЌЖ) '`j Ќ А›G `Ж(tblStay.state =  ВЖ0$ЌЖ OR tblStay.state = ДЖ0$ЌЖ)'`jkџџ0 `Ж;'` ` L!d"Ђ(hoџџ–H]ђшЖ:SELECT qselStays.stayID, tblGuest.guestID, tblGuest.name, '` `Ж<[address1] & ', ' & [address2] & ', ' & [address3] AS addr, '` `ЖNtblGuest.phone, qselStays.arrival, qselStays.rooms, qselStays.state AS qstate '` `ЖKFROM qselStays RIGHT JOIN tblGuest ON qselStays.guestID = tblGuest.guestID '` МЖœ `ЖWHERE ( ИЖ) '` Кœ `Ж=  МЖ '`dF `ЖLike ('* МЖ*') '`kџџkџџј `ЖVORDER BY iif(qselStays.arrival is null, #1-1-2040#, qselStays.arrival), tblGuest.name;'` ` L!d"Є(hoџџp–Ж fsubStayList џџ!Р(Т џџ!РB@p џџ!Р!r!ФЌ›GЖ No guests match what you ask forA@Цjoџџш–@ЖfrmMessageGuest џџ!Р(Т џџ!РB@p ` џџ!Р!r)Шoџџ–  џџ!Р!ТЖ fsubStayList›G|jрC& Another function has to set the query џџ!Ь$  џџ!ЬЖany џџ!Ь$†›G|jрo Date not valid, focus not changeable. Since this cmd is the default, it cannot be canceled, so it has to checkAІAО џџ!РB@oџџP–р]ђ  џџ!Р!ТЖ fsubStayListœ џџ!Р!r"в'аAžЖany ЎAЈЖtblGuest.guestIDЗ аAЖAО џџ!РB@dџџЈ B@дkџџoџџˆ–8AžЖany ЎAЈЖtblGuest.guestIDЗ аAЖAОЖstayID= иX  џџ!Р!r!tB@к џџ!Р!r!t!x џџ!Р!r(x џџ!РB@oџџШ–Ир Guest and stay to be created р тЖfrmStay$оЌœ ф"ц!ш›G|jр3 Stay cannot be forced c[žšK[lose тЖfrmStay ъ B@Bр1 Only one Stay window may be open in this versionkџџиЖfrmStayааа юаЌ B@ьoџџЈ–ј р тЖfrmStay$оЌœ ф"ц!ш›G|jр3 Stay cannot be forced close тЖfrmStay ъ B@Bр1 Only one Stay window may be open in this versionkџџр џџ!Р!ТЖ fsubStayListœр Guest and stay to be createdЖfrmStayааа юаЌ B@ьdFр, Guest selected. Only new stay to be createdЖfrmStayааа юа џџ!Р!r"в B@ьkџџ№oџџш–8 џџ!Р!ТЖ fsubStayListœ B@дdF џџ!Р!r"єЌ œ р тЖfrmStay$оЌœ ф"ц!ш›G|jр7 Stay cannot be forced close тЖfrmStay ъ B@Bр 1 Only one Stay window may be open in this versionkџџаЖfrmStayааЖstayID= џџ!Р!r"єX  іаЌ B@ьр„ Don't use acFormEdit. It also sets AllowAdditions, causing much confusion if the user tabs from the existing stay into an empty oneјdF B@дkџџрkџџиoџџа–xЗ'šЗ џџ(њЗ џџ(ќЗ џџ(ўЖany џџ(Ь @!BЌ џџ(Ќ џџ(З џџ(З џџ( џџ!ЬЌAЈЖЗЖAЖAОoџџ–ИЗ'šЗ џџ(њЗ џџ(ўЗ џџ(З џџ(Ж,address1 & ', ' & address2 & ', ' & address3З џџ!ќ!dAЖAОoџџX–ј џџ!Ь$ ›GЖany џџ(Ьj џџ!ЬЖany›G џџ!ЬX џџ(ЬjЗ'š џџ!Ь џџ!AЈAОoџџШ –8 џџ!Ь$  џџ!ЬЖany џџ!Ь$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& B@ џџB@ џџB@kџџ oџџ –˜ ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!ЬЖanyœ B џџ(Ьdџџx џџ!Ь$†›G|j | ‚œ џџ!ЬXЌ џџ(Ьdџџ0 џџ!ЬXЌ џџ(Ьkџџ kџџ B@ џџ!Ь џџ!AЈAОkџџа oџџШ –З'š џџ!Ь џџ!AЈAОoџџ –xЗ'šЗ џџ(ќЗ џџ(ўЗ џџ(З џџ(Ж tblGuest.nameЗ џџ!њ!dAЖAОoџџ –ИЗ'šЗ џџ(њЗ џџ(ќЗ џџ(З џџ(ЖtblGuest.phoneЗ џџ!ў!dAЖAОoџџ€ –ј]ђ8ђP]ђhЗ'šЗ џџ(њЗ џџ(ќЗ џџ(ў Ў џџ(Жany џџ(ЬЗ џџ(ЖroomIDЖtblRoomЖtblRoom.roomID=critroom$ ' $ œЖThis is not a room numberA@Цdџџx ЖstayIDЖ tblRoomStateЖ?tblRoomState.roomID=critRoom and tblRoomState.date=critRoomDate$ 'и иЌ›GЖRoom under repair this dateA@Цj и$ ›GЖRoom free this dateA@Цj иЌ œЖany ЎAЈЖqselStays.stayIDЗ иAЖAОkџџPkџџHoџџ@–€ Ќ ›GAjoџџ–РЗ'šЗ џџ(њЗ џџ(ќЗ џџ(ўЖany џџ(Ь Ў џџ(З џџ( џџ!Ь ЎAЈЖqselStays.stayIDЗ џџ!AЖAОoџџX–  ( *› ёvvvџџџџџџџџџџџџџџџџџџџџ@L щxxxџџџџџџџџџџџџџџџџџџџџ@P  zzzџџџџџџџџџџџџџџџџџџџџ@T !|||џџџџџџџџџџџџџџџџџџџџ@XЙ Сс €€€џџџџџџџџџџџџџџџџџџџџ@\ Љ ~~~џџџџџџџџџџџџџџџџџџџџ@`Й С9џџџџџџџџџџџџџџџџџџџџ@dщ Y†††џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@hщ qŽŽŽџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@lщ \žšK[р’цF@P~""™Ь’oG‚|сa_Chanќge!‡ /// ЏЯšQ ЯсЅ[Ђa€ddress1›А', '`23'Ф.Tex~tЁгЄq_AfterUpdЇ #U@LIsA%(t§)Ѓ’р &@ЙЧp˜Т_= CёКЯЃпеŸ$e.!ў,!ЌСє*ПП`Тщ:Ѓ‘_Be№žeФ@CancelAТIРnteger„€…!^(/) OrХчёaIsJЃС)BMsgBox("E0r a" q aspy-Р:th-year, e.g. 2€5-12-02€!vbExclam>aQQ” Aƒ[Г EvenєХЁрUndўoзМБ#oN—НuKeyDownђ(pCoC`ж4жXhif‚з^S’=сВ‘Mask And f= vbљ UpЕDё$)Uci!fere with droдppАЛd Г01 џ1М*”RЂ*зe&џР„R'Ab Ф!пД џ•Ц^ь 0KЬб Ÿ4> V\O  +џе`v С џŸ&fћя;я;tы;0Г Call queryStayl@ist E€nd If Sub P€rivate 8 critInclude_Bef@oreUpd8(Cancel As Integer)žsavedSelЪs = 0Null2fnBc(Me.^DљN,  kLДЈName_Cha0nge(Ž8Ad dr S„ PhonТe Room‘ xƒŠ ˆwGuest‚ˆ ("tbl.n€V", False†a.TextџГ€‚Z-СQ4•F@D@>pСXŽ@Т0ј@'_A0fter„Њ€RDiDm С_, mˆЌ СrAVariќanФФзА‡mL‚4‘XУ„Л€cAnyУЩФƒХР"any" С1жСЏDLoo@kup("r€ЇI^DUšBˆ.ƒ= ЁnA"„LIf Isс (r) Th enу Сƒmessage ("This @not a С numbєerЅEрXЄцЮs Žъteˆтѓ) aР“ faџAa$ХЁ jy #0т ЧС under reРpair tС ,D! Ѓ!­freцeЖт> уЧ!Ё“‚Ёs(b;, A?O$1СLi‡qsЋ.ёЦ)Tru ‡с QОџС aЈОiјЊE-­jСџ@.СIТ+ХƒЭХЉњЬџŸЬt`Ћjd„jПНŸЅеНp8wb!?пitСWџЪ?TЦж>„Ј?"Ќ>4;Form_KeyPr0>(€AscSELECT tblServiceReceived.roomID,_žšK[ tblServiceReceived.quantity ЖZFROM tblServiceReceived WHERE tblServiceReceived.serviceID=3 AND tblServiceReceived.date=# џџ!bЖmm-dd-yy$ЌЖ#;'` ` L!d"j(hІЖ>SELECT tblServiceReceived.roomID, tblServiceReceived.quantity ЖZFROM tblServiceReceived WHERE tblServiceReceived.serviceID=4 AND tblServiceReceived.date=# џџ!bЖmm-dd-yy$ЌЖ#;'` ` L!d"l(hЖUINSERT INTO tblBreakfast SELECT roomID, breakfastA, breakfastB FROM qryBreakfastList; LB@P џџ!nB@p џџ!n!r!tB@v џџ!n!r!t!x џџ!n!r(xoџџШ–x ~ € | ‚ | „œрO' Don't interfere with dropped down list џџ!b$†›G|j | ‚œ џџ!bXЌ џџ(bdџџ  џџ!bXЌ џџ(bkџџЌA@\kџџшoџџр–ј Š$†œЖ-Enter a date as day-month-year, e.g. 25-12-02 ŽA& 'Œр% 0kџџp џџ!nB@poџџX–x B џџ(bЌA\oџџ(–ИЩ” B@BЃ–|џџИЃ”А (!*A@&х–˜oџџџџџџˆџџџџіДAttribute VB_Name = "Form_frmBreakfastLi st" АBasА0{F4033C4B-4EDD-11D6-8 769-086€394B13} |@GlobalтSpacIFals e dCtablTru Pre declaIdЙ"Expose_Templa€teDeriv–CustomizD$Option Comp@ DfaT€‰  €‡KQueryDef`s!qryFH-sа.SQL@Hsƒ5 KServiceRxeceˆ†L€q€uantityI ‡JMsID=р3 AND=A9G”TSšCsel„ Aw?!?!рh.?!Ћ*?!Dœ=4?!ŽK?!b.C '!B+!АnINSE€RT INTOС3-&J фlEkb…ЈA,њ fBcu)QaЌХ4 csubF A.Re>q!XcT cordsetClo€ne.Moveb{мBookmark `_ C E E nd›ѕœKeyDown(рCodehœ, ShifNt( žЁŠIf$= acbMask A Ц= vb@ Up Or e „с ) Then ' Don't iРЊrfere with dr(oppОd  lРл$„Not IsЁД• ExitџУь€g Су+Ež= CŽ Р ч . H)Z HB@Xџ .ўШ!ј HB@B > @(BoџџаџџџџШџџџџВAttribute VB_Name = "Form_InitCalendar" "  Bas 0{E3F99AD5-4E73-11D6-8769-086394B13} |Glob„alкSpacI False dCr@eatablTru PredeШclaIdЕ"РExpose_Template Deriv–CuРstomizD$Option CШomp@ DT€‰  €ResuРŒPУ E 126 ThenCb & "<"@Str(cZ)>€СE€­:r E ChСCA>I€f WendXEBncUnstackSQL fncSelStaysfncSelGuestStays queryStaylistmessage cmdFind_ClickcmdGuestHistory_Click showNewStaycmdNewGuest_ClickcmdNewStay_ClickcmdOpenStay_ClickcmdReset_ClickcritAddr_ChangecritDate_AfterUpdatecritDate_BeforeUpdatecritDate_KeyDown name_LabelcritInclude_BeforeUpdatecritName_ChangecritPhone_ChangecrirU€€€€~~~~~~~q џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ  џџџџџџџџџџџџџџџџџџџџ ‰Љ  ‰щ  ‰q ( ‰Й 8 ‰ H ‰ X ‰С h arrivalDateincludecritequalvalsGuestStayCancelKeyCodeShift“K*mџџџџ  rU €€€~~~~~~~~~~~~~~~~~/ ЩЁ—=ОˆХЭB”осYj‚*  фџџџџџџџџџџџџџџџџщџџџџџџџџџџџџџџџџџџџџџџџџIƒa Йџџџџ ) Q q Ё Щ с Aa‘СёAyБ IqЁйQy™џџџџџџџџџџџџџџБџџџџџџџџџџџџсƒa qџџџџ!YЁСщ1YЩ qБё)a‘Щ 1a™Щёс ё!y™IyЉсAџџƒa 3џџџџщ2џџ9ƒa џџџџщQџџi‰a џџџџАџџџџщ1џџ™џџџџџџџџџџџџЙџџџџџџџџџџџџџџџџџџџџёџџџџџџџџџџџџџџџџџџџџџџџџAџџџџџџџџџџџџy‰ЁБhotelsysForm_AsciiTransformForm_InitCalendarForm_frmBreakfastListForm_frmFindStayForm_frmServiceListForm_fsubStayRooms Form_frmRoomsForm_fsubRoomGrid1Form_fsubStayList modCommonForm_fsubStayServices modMenuesForm_fsubRoomGrid2Form_fsubBreakfastList Form_frmStayяРFcritRoomLabel7 /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA Ёџџџџ q` ЩџJ™_ЏNЊ? 3C:\Program Files\Microsoft Office\Office\MSACC9.OLBAccess йџџџџ qp^РF=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLLDAO сџџџџ ‘€0РFC:\WINDOWS\System32\stdole2.tlbstdole љџџџџ!iWсРFCC:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLBVBIDE йџџџџ ™ ДrZFлBД*Oи:|ФbžšK[PЌšЋЫжOšЭ§2†ƒЏˆ”4E(ЁTж‡i†9K›3ЯН?вLƒ~СЪw_рЉћм31ЯЭ‡Њ?Form@CžМ7№Э‡Њ? txtSimDatecritNamecritAddrPCžМ7№Э‡Њ? subStayListSCžМ7№Э‡Њ?Detail critPhoneECžМ7№Э‡Њ? cmdNewGuestcritStayACžМ7№Э‡Њ?Label15LCžМ7№Э‡Њ?critDate critRoomDatecmdReset cmdOpenStay cmdNewStay critIncludecmdGuestHistorycmdFindLabel36 fncStackSQL fncUnstackSQL fncSelStaysfncSelGuestStays queryStaylistmessage cmdFind_ClickcmdGuestHistory_Click showNewStaycmdNewGuest_ClickcmdNewStay_ClickcmdOpenStay_ClickcmdReset_ClickcritAddr_ChangecritDate_AfterUpdatecritDate_BeforeUpdatecritDate_KeyDown name_LabelcritInclude_BeforeUpdatecritName__SRP_6џџџџ— __SRP_7џџџџџџџџџџџџ”ž__SRP_4џџџџ __SRP_5џџџџџџџџџџџџ‹я_ChangecritPhone_ChangecritRoom_AfterUpdatecritRoomDate_AfterUpdatecritStay_BeforeUpdate Form_KeyPress Form_Load Form_Open Ќ4D fncOpenAscii fncSimDatecompressNumber€]хЏNЊ? 888џџџџџџRє• Y№ЅђеОыГFЙІЙу_XвAЦX9Q'ЅJЕ?т—њ2a fXж‡i†9KЋєуыЩC†ђ[ёЫбStay FormHeader stay__LabelLabel6Label8Label11 FormFooterarrivalAddressRoomphonestateGuest Form_DblClick „ tblCalendarСЩЄsжа˜П Щ ШйРцЬh)aЏNЊ?q™џџџџq€Њm.Є Date1€Њm.ЄS€Њm.ЄQ€Њm.Є frmRooms`чGХX–юЊGPтqXХPxVнBOBлЮќ2лсДb6Ls%MМЉђwZЈДя뉋\ж‡i†9K-ЁдšLž^D]Q:сшcboFromLabel17 cboDeparture txtNightsLabel31txtWeekdayFromtxtWeekdayDept subRoomGridcmdBookcboTypetxtRoom cmdCheckinLabel26fncSelRoomState fncSelRooms fncRoomGridSetGridColumns setSelection updateGrid getSelPerioduseRoomcboDeparture_AfterUpdatecboDeparture_BeforeUpdatecboDeparture_GotFocuscboDeparture_KeyDowncboFrom_AfterUpdatecboFrom_BeforeUpdatecboFrom_GotFocuscboFrom_KeyDowncboType_AfterUpdatecboType_BeforeUpdatecboType_GotFocus cmdBook_ClickcmdCheckin_ClickForm_DeactivatesubRoomGrid_EntersubRoomGrid_ExittxtNights_AfterUpdatetxtNights_GotFocustxtRoom_AfterUpdatetxtRoom_GotFocus ˜\щ;|фЭ‡Њ?Fщ;|фЭ‡Њ?dщ;|фЭ‡Њ? frmMessageRoom fsubRoomGrid1 fsubRoomGrid2Ctl26_10 >No rooms match what you ask forVBE6.DLL ™ џџџџ- ˜( ˜SELECT tblRoomState.* FROM tblRoomState WHERE ((tblRoomState.date) Between # mm-dd-yyyy # and # #); qselRoomState{€Њm.ЄcžšK[№Œдџџџџ“ззeаeџџŠЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџSLџџџџS џџџџSџџџџ<џџX<џџJ<џџ<џџ<џџџџџџN0{E3F99AD5-4E73-11D6-8769-000086394B13} џџџџ( <@џџџџџџџџџџџџџџџџџџџџџџџџџџџџ” Dџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ” „Fџџџџџџџџ˜ % „HџџџџџџџџИ%`„.џџџџџџџџџџ€ўџџџџџџџџџиџџџџџџџџ%џџџџ№џџџџ@џџџџџџџџјџџџџџџџџиџџџџџџџџ@џџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџКф{F п–03=Babc%ghЂij—kŠ  РРРЮТўuњо>т@џd2§m45bЅg[љ§˜`тœРРРпDetailўm47UC`bL cмjМм txtMessage§ЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫїъЭЌ–џџџџ`ХЈI]ж‡i†9K˜ХDetailmХtxtMessageЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫMSysDbЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫЫўЪ€€€ џџџџ" (€ џџџџ"0€8€@€H€ џџџџ P `(€Ј Ра ш ј  (џџџџ8ЭџџxЭџџp– @!B'>oџџP–@]ђ€]ђ ]ђРэ$L.FэЖ tblCalendar F%N‚ƒ„…†‡ˆ‰Š‹ŒŽўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџS џџџџSџџџџ<џџџџџџN0{E3F99ACC-4E73-11D6-8769-000086394B13} џџџџ @џџџџџџџџџџџџџџџџџџџџџџџџџџџџ” ,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”`„.џџџџџџџџџџ`„0џџџџџџџџџџ€ўџџџџџџџиџџАџџџџџџџџ%џџџџ@џџџџџџџџџџџџаџџџџџџџџАџџџџџџџџ@џџџџџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшКф{F пўЪ"€€€ џџџџ"€ џџџџ€ џџџџ  0€ џџџџ€@H€ џџџџ€PXh€ џџџџp€ џџџџ"x€€€ˆ˜ АРр$ј @H€ џџџџPџџџџ`ЭџџxЭџџp–Щ` !B@0 B@"0-CЃ$8|џџ0Ѓ( (!*A@&.х$oџџ–@]ђ€]ђ˜Ќ'.Ж' . 2 є .Ќ '. 2 .Ќ$њ$4'0 0Ќ 0Ќ~ œ Ж< 0$6Ж>'dF  0$8'kџџИѓџџАoџџЈџџџџ џџџџKВAttribute VB_Name = "Form_AsciiT ransf8" " ЈBasЈ0{E3F99ACC-4E73-11D6-8769-086394B13} |Glob„alоSpacI False dCr@eatablTru PredeШclaIdЗ"РExpose_Template Deriv–ažšK[ ЌORDER BY iif(qselStays.arrival is null, #1-1-2040#, qselStays.arrival), tblGuest.name; qselGuestStays fsubStayList @No guests match what you ask for 4At least one night, please ™ џџџџS  txtMessage_ŽћšKH‡43›“)w џџџџџџџџџџџџџџџџџџџџџџџџ@€щ  ŒŒŒџџџџQ џџџџџџџџџџџџ‘ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ „ с!†††бџџџџџџџџџџџџџџџџџџџџџџџџџџ0 ќЦ8  L—,§ћ\џќіlџ§• ( lџ 0 ќЦи  a1 Only one Stay window may brU€€€ џџџџџџџџ„(`œTџџџџџџџџљ&(A` hџџџџџџџџA&nje WHERoџџРџџџџИџџџџ;ВrU€€€ (!Iqџџџџљ@4щ ™‚‚‚џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@8Љ aб џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџIџџџџџџџџџџџџџџџџџџџџџџџџ@<Й СБpppџџџџџџџџџџџџџџџџџџџџ@@ бrrrџџџџџџџџџџџџџџџџџџџџ@D сtttџџџџџџџџџџџџџџџџџџџџ@H ёvvvџџџџџџџџџџџџџџџџџџџџ@L щxxxџџџџџџџџџџџџџџџџџџџџ@P  zzzџџџџџџџџџџџџџџџџџџџџ@T !|||џџџџџџџџџџџџџџџџџџџџ@XЙ Сс €€€џџџџџџџџџџџџџџџџџџџџ@\ Љ ~~~џџџџџџџџџџџџџџџџџџџџ@`Й С9џџџџџџџџџџџџџџџџџџџџ@dщ Y†††џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@hщ qŽŽŽџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@lщ ‰ŠŠŠџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@pщ ЁŒŒŒџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@tщ Йˆˆˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@xщ б„„„џџџџџџџџџџџџџџџџџџџџџџс‘џџџџ(&#(‰`ЌџџџџџџџџџџЙ0$Щ `Аџџџџџџџџ(  `Д џџџџџџџџљ&$I `И$џџџџџџџџ,‰ `М@џџџџџџџџ)&&$Щ `Рџџџџџџџџ( `Ф џџџџџџџџљ&$I`Ш$џџџџџџџџ,‰`Ь@џџџџџџџџ)&&$Щ`аџџџџџџџџ( `д џџџџџџџџљ&$I`и$џџџџџџџџ$‰`м џџџџџџџџ$Щ`р џџџџџџџџ$ `ф џџџџџџџџ$I`ш џџџџџџџџ$‰`ьDџџџџџџџџ$Щ`№ џџџџџџџџ( `є0џџџџџџџџљ&$I `ј џџџџџџџџ(‰ `ќџџџџџџџџљ&$Щ `џџџџџџџџ$ ` џџџџџџџџ$I `џџџџџџџџ$‰ rU€€€ h!!51С™щ9a‰)Ё‘Й Йс YЁY )!q"™#ežšK[y€Њm.Є ™ џџџџ” И- ЎSELECT tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2,  VCount(qselRoomState.state) AS CountOfstate ) œFROM tblRoom LEFT JOIN qselRoomState ON tblRoom.roomID = qselRoomState.roomID *WHERE tblRoom.type =  0 0WHERE tblRoom.roomID >= . В GROUP BY tblRoom.roomID, tblRoom.bedCount, tblRoom.type, tblRoom.price1, tblRoom.price2  JHAVING (Count(qselRoomState.state)=0) ; qselRoomsControlSource‚^] Э‹ EЎbйC‡„Дь—7шмЄJDœѕ"D№/уpŽлшu Pж‡i†9KOxF6П—N’Д| KCtl25_102 РSELECT qselRooms.roomID, qselRooms.bedCount, qselRooms.type, qselRooms.price1, qselRooms.price2,*  tblCalendar.date FROM qselRooms, tblCalendar WHERE ((tblCalendar.date) Between # qryRoomGrid col€ЛБ(aЏNЊ?tХpYŒыЭ‡Њ?name dd-mmCtl27_10Ctl28_10Ctl29_10 Room_Label Beds_Label price1_Label price2_LabelCtl20_10_LabelCtl21_10_LabelCtl22_10_LabelCtl23_10_LabelCtl24_10_LabelCtl25_10_LabelCtl26_10_LabelCtl27_10_LabelBedsprice as_singleCtl22_10Ctl23_10Ctl24_10 Form_Current ЌgHeight gWidth gLeft any . АSELECT tblGuest.guestID, tblStay.stayID, Min(qryRoomsPerStay.firstRoomDate) AS arrival, 9 оMin([qryRoomsPerStay].[roomID]) & IIf(Count([qryRoomsPerStay].[roomID])>1,' + ...','') AS rooms, tblStay.state  L(Min(qryRoomsPerStay.firstRoomDate)= #6 аFROM tblGuest INNER JOIN (tblStay LEFT JOIN qryRoomsPerStay ON tblStay.stayID = qryRoomsPerStay.stayID)  LON tblGuest.guestID = tblStay.guestID  rGROUP BY tblGuest.guestID, tblStay.stayID, tblStay.state  HAVING  #)  AND  "(tblStay.state =  ) & OR tblStay.state = ) qselStays tSELECT qselStays.stayID, tblGuest.guestID, tblGuest.name, x[address1] & ', ' & [address2] & ', ' & [address3] AS addr,  ZEnter a date as day-month-year, e.g. 25-12-02) œtblGuest.phone, qselStays.arrival, qselStays.rooms, qselStays.state AS qstate ' –FROM qselStays RIGHT JOIN tblGuest ON qselStays.guestID = tblGuest.guestID  WHERE ( =    Like ('* *')   є&Ц5hџxџ ˆ xџ А hџќNєыЏђ§ћXџ%  xџ5hџИ5hџxџ ˆ xџ А hџќNєыЋђ§ћXџ%  xџ5hџWhџxџ ˆ xџ А hџќN§ћXџDџTџ H Tџ ЄDџћ”4џ% 8 )xџTџ6hџDџ4џxџ$ `xџ (*xџ H4$  xџTџhџDџ4џ„H,hџxџ  xџ А hџ(Xџ]ћAxџ5hџ=ќdXџ%  ф 4H$  xџhџHџ0 ќЦ   < œ  $  0 ќЦ@   0 ќЦ    œD<Hџ ˆ QHџ§o8џ 4џ 0 Q4џ§o$џ ФУ68џ$џAIHџ ˆ 8џ4џ 0 4џ А 8џќNєыЏђ§ћџQHџ§o$џŒ 4џ68џ$џџ,8џHџ  Hџ Є8џ(џ]ћuHџ58џш/8џHџ  Hџ Є8џU+џє+џ Hџ58џ/8џHџ  Hџ А є+џ8џU+џ Hџ58џf8џHџ ˆ Hџ А $џ4џ ˆ 4џ А $џќNєыЋђєыЏђ§ћрў8џќNєыЏђ§ћџ” )Hџ4џ68џ$џџрўS8џHџ ˆ Hџ А D8џќNШмў4џ   4џ Дlмўћ?Ф/мў)Hџ4џ58џ8мўHџ   Hџ Дlмў4џ   4џ И/мў)Hџ4џ„)8џHџ ˆ Hџ А 8џќN’DHџ58џ)мўHџ   Hџ Дlмўћ2/мўHџѓr8џHџ ˆ Hџ А $џ4џ ˆ 4џ А $џќNєыЋђєыЏђ§ћрў8џќNєыЏђ§ћџCмўмў˜ /мў)Hџ4џ68џ$џџрўHџ   Hџ ИHџ‚r8џHџ ˆ Hџ А $џ4џ ˆ 4џ А $џќNєыЋђєыЏђ§ћрў8џќNєыЏђ§ћџCмўмў˜ /мў)Hџ4џ68џ$џџрўHџ   Hџ ИHџ6иў4џHџ   Hџ x4џ xlиўѕл)Hџ4џ' ѕ4 ѕ@)8џHџ H Hџ Є8џќ"8Hџ58џ ѕ<Hџ   Hџ Hџ<CмўмўЌ /мўЄD0 lџ\џXџ(мўHџ4џ8џ$џџрў0 ќЦИ   и3pџtџxџ   xџ xtџ plpџ@)xџtџ3pџtџxџ   xџ xtџ hlpџ8)xџtџ3pџtџxџ   xџ xtџ `lpџ4)xџtџ9pџtџxџ   xџ xtџ XlpџѕЎ<)xџtџ и$  xџtџh4(lџ%  ф hџ ˆ hџ œ hџ4$  hџР3@џ'Dџ%'Tџ%'dџ%tџ$ јtџ МQ@џxџtџH0џ@џ:dџ%tџxџ Дtџ 0@џ D0џ(Tџdћ” џќO~ )tџ@џ60џ џ xџ Фy §ћdџ%  y єыЋђ§ћdџ% 8 ѕ@\Р( xџtџ@џ0џ џgžšK[x4єЦ є&Ц є(ЦХФ, xџ ˆ Qxџ§ohџ У5hџ>  є&Ц5hџxџ ˆ xџ А hџќNєыЏђ§ћXџ%  xџ5hџИ5hџxџ ˆ xџ А hџќNєыЋђ§ћXџ%  xџ5hџWhџxџ ˆ xџ А hџќN§ћXџDџTџ H Tџ ЄDџћ”4џ% 8 )xџTџ6hџDџ4џxџ$ `xџ (*xџ H4$  xџTџhџDџ4џ„H,hџxџ  xџ А hџ(Xџ]ћAxџ5hџ=ќdXџ%  ф 4H$  xџhџHџ0 ќЦ   < œ  $  0 ќЦ@   0 ќЦ    œD<Hџ ˆ QHџ§o8џ 4џ 0 Q4џ§o$џ ФУ68џ$џAIHџ ˆ 8џ4џ 0 4џ А 8џќNєыЏђ§ћџQHџ§o$џŒ 4џ68џ$џџ,8џHџ  Hџ Є8џ(џ]ћuHџ58џш/8џHџ  Hџ Є8џU+џє+џ Hџ58џ/8џHџ  Hџ А є+џ8џU+џ Hџ58џf8џHџ ˆ Hџ А $џ4џ ˆ 4џ А $џќNєыЋђєыЏђ§ћрў8џќNєыЏђ§ћџ” )Hџ4џ68џ$џџрўS8џHџ ˆ Hџ А D8џќNШмў4џ   4џ Дlмўћ?Ф/мў)Hџ4џ58џ8мўHџ   Hџ Дlмў4џ   4џ И/мў)Hџ4џ„)8џHџ ˆ Hџ А 8џќN’DHџ58џ)мўHџ   Hџ Дlмўћ2/мўHџѓr8џHџ ˆ Hџ А $џ4џ ˆ 4џ А $џќNєыЋђєыЏђ§ћрў8џќNєыЏђ§ћџCмўмў˜ /мў)Hџ4џ68џ$џџрўHџ   Hџ ИHџ‚r8џHџ ˆ Hџ А $џ4џ ˆ 4џ А $џќNєыЋђєыЏђ§ћрў8џќNєыЏђ§ћџCмўмў˜ /мў)Hџ4џ68џ$џџрўHџ   Hџ ИHџ6иў4џHџ   Hџ x4џ xlиўѕл)Hџ4џ' ѕ4 ѕ@)8џHџ H Hџ Є8џќ"8Hџ58џ ѕ<Hџ   Hџ Hџ<CмўмўЌ /мўЄD0 lџ\џXџ(мўHџ4џ8џ$џџрў0 ќЦИ   и3pџtџxџ   xџ xtџ plpџ@)xџtџ3pџtџxџ   xџ xtџ hlpџ8)xџtџ3pџtџxџ   xџ xtџ `lpџ4)xџtџ9pџtџxџ   xџ xtџ XlpџѕЎ<)xџtџ и$  xџtџh4(lџ%  ф hџ ˆ hџ œ hџ4$  hџР3@џ'Dџ%'Tџ%'dџ%tџ$ јtџ МQ@џxџtџH0џ@џ:dџ%tџxџ Дtџ 0@џ D0џ(Tџdћ” џќO~ )tџ@џ60џ џ xџ Фy §ћdџ%  y єыЋђ§ћdџ% 8 ѕ@\Р( xџtџ@џ0џ џ< œ  $  и3pџtџxџ   xџ xtџ plpџ@)xџtџ3pџtџxџ   xџ xtџ hlpџ8)xџtџ3pџtџxџ   xџ xtџ `lpџ4)xџtџ9pџtџxџ   xџ xtџ XlpџѕЎ<)xџtџџ и$  xџtџЬ,hџxџ H xџ Єhџ(Xџ]ћhxџ5hџi+'јў'џ'Hџѕ0:Xџ1Nhџhџ 26hџHџџјў(Xџ% P Whџxџ ˆ xџ А hџќN§ћXџHџєў H єў ЄHџћ”џ% 8 )xџєў6hџHџџф ˆЬ$  $xџєўhџHџџјў< œ  $  0 ќЦ   0 ќЦX   4 8 < @ \ \ \ \ LL` рџџџџџџџџџџy‘Љ0#/$`Эџџџџџџџџџџ(A`фџџџџџџџџџџЙ0$`ш џџџџџџџџ$С`ь џџџџџџџџ,`бџџџџџџџџџџЩс(($A `№ џџџџџџџџ$ `є џџџџџџџџ$СižšK[ `ј џџџџџџџџ$  `ќ џџџџџџџџ$I `џџџџџџџџ$‰`џџџџџџџџ(Щ` џџџџџџџџљ&, ` @џџџџџџџџ)&&(I` џџџџџџџџљ&$‰`џџџџџџџџ$Щ`џџџџџџџџ$ `џџџџџџџџ$I` џџџџџџџџ(‰`$ џџџџџџџџљ&(Щ`(hџџџџџџџџA&$ `, џџџџџџџџ(I`00џџџџџџџџљ&nnрF Debug.Print "gridCurrent"; Me.CurrrU€€ 031С™щ9a‰Бщ Ё3С3 45 8С9q:i;Q7q"™#™;Й; <ё'a<<с<Ё*љ<I#q#1=1> @YA™BЩBщBC9C DyEЩEсYF1 Y  џџџџ @TЉ aб џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџбџџџџџџџџџџџџџџџџџџџџџџџџ@Xщ  ЂЂЂџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@\щ 1 rrrџџџџџџџџ‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@`щ Q šššџџџџџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@dq Ё™ vvvџџџџџџџџ@hЙ Сс pppџџџџџџџџџџџџџџџџџџџџ@lщ љ |||џџџџџџџџбџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ p сA xxxIџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@tщ a †††‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@x Љ €€€џџџџџџџџџџџџџџџџџџџџ@|С !щ ‚‚‚б‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@€щ ЩŠŠŠџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@„С ! žžžџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ˆ с1 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ Œ сQ ’’’Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@  сq ”””‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@”С !‘ –––Qџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ˜ сБ zzzЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ œ сй ІІІ‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@  ё ЈЈЈџџџџџџџџџџџџџџџџџџџџџџџџЌW—зW—зW—з_Ÿп_Ÿп_Ÿп_0 ќЦ0  0 ќЦp  МD**#tџ*#pџ*#lџ*1xџ2tџpџlџ(§ Lџ:\џ]ћ><џєа§ј,џћџџ5,џђ lxџ*1xџ§ Lџ:\џ]ћAРMlxџ*F џѕѕ:\џN<џ<џl џ џћяќў:Lџћяьў`1xџ6 <џ џџќўьў(§ Lџ:\џ]ћ><џєа§ј,џћ'џџ5,џі lxџ*1xџєкєаФZRlxџ*F џѕѕ:LџN<џ<џlM\џ@џ џћяќў:,џћяьў`1xџ6 <џ џџќўьў єЦђlxџ*Fќўѕѕ:LџNџџ(<џ џ  џћяьў:,џћямўѕѕ:ЌўNœўœў(МўŒў Œўћя|ў:lўћя\ў`1xџ6<џџќўjžšK[ џьўМўœўмўŒў|ў\ў lxџ *1xџ@lxџPў:\џ!%TўXў$ јXў HTў 0"Pў @#)XўTўPў ,D( xџPtџpџlџXўTўPў<џџ џќўьўмўМўœўŒў|ў\ўp$Cxџ lxџ%*1xџ lxџ&*1xџ lxџ'*1xџ§Xџ:hџ]ћAЩ!lxџ(*#Dџ€ *#@џ*1xџ2Dџ@џ™,lxџ)*FHџ§hџћя0џ:Xџ*ћя џ`1xџ6Hџ0џ џЧ,lxџ+*FHџ§hџћя0џ:Xџ,ћя џ`1xџ6Hџ0џ џ lxџ-*1xџ@lxџџ:hџ.%џџ$ јџ Hџ 0"џ @#)џџџh( xџ,Dџ@џџџџHџ0џ џР„/xџ ” xџ И0xџxџ ” xџ ”0xџ6pџtџxџ ” xџ x0tџ x1lpџѕЧ)xџtџ~2Clџlџф /lџ„$  lџxџtџ0 ќЦ@  0 ќЦ   0 ќЦр  0 ќЦ8  0 ќЦИ  0 ќЦј  0 ќЦ8  ф ќdlџ§†4ќdlџ% „ ќdlџ% t ќdlџ% Р :lџ% ф y єыЏђ§ћlџ% Œ (lџ% \ ќdlџ%  ќdlџ% ќ !hџ м є+VџQhџ§oXџм 5Xџ&:lџNXџXџє+VџCPџPџр /Pџ5XџЬ ”,ф$  PџhџXџ0 ќЦИ  0 ќЦј  0 ќЦ8  0 ќЦ˜  0 ќЦ  0 ќЦx  0 ќЦИ  0 ќЦј  0 ќЦ€  0 ќЦР  0 ќЦ   а3@џ'Dџ%'Tџ%'dџ%tџ$ јtџ МQ@џxџtџH0џ@џ:dџ%tџxџ Дtџ 0@џ D0џ(Tџdћ” џќO~ )tџ@џ60џ џ xџ Ф<'џ%ѕѕџџџџ'Dџ%'Tџ%ѕ:dџ %tџ$ `tџ ` tџќ lа( xџtџ@џ0џ џ8'$  œ˜ p  Œ ˆ `|||”\l€„tTTT`ј џџџџџџџџ$  `ќ џџџџџџџџ$I `џџџџџџџџ$‰`џџџџџџџџ(Щ` џџџџџџџџљ` рџџџџџџџџџџy‘Љ0#/$`Эџџџџџџџџџџ(A`фџџџџџџџџџџЙ0$`ш џџџџџџџџ$С`ь џџџџџџџџ,`бџџџџџџџџџџЩс(($A `№ џџџџџџџџ$ `є џџџџџџџџ$С `ј џџџџџџџџ$  `ќ џџџџџџџџ$I `џџџџџџџџ$‰`џџџџџџџџ(Щ` џџџџџџџџљ&, ` @џџџџџџџџ)&&(I` џџџџџџџџљ&$‰`џџџџџџџџ$Щ`џџџџџџџџ$ `џџџџџџџџ$I` џџџџџџџџ(‰`$ џџџџџџџџљ&(Щ`(hџџџџџџџџA&$ `, џџџџџџџџ(I`00џџџџџџџџљ&nnрF Debug.Print "gridCurrent"; Me.CurrrU€€ 031С™щ9a‰kžšK[Бщ Ё3С3 45 8С9q:i;Q7q"™#™;Й; <ё'a<<с<Ё*љ<I#q#1=1> @YA™BЩBщBC9C DyEЩEсYF1 Y  џџџџ @TЉ aб џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџбџџџџџџџџџџџџџџџџџџџџџџџџ@Xщ  ЂЂЂџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@\щ 1 rrrџџџџџџџџ‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@`щ Q šššџџџџџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@dq Ё™ vvvџџџџџџџџ@hЙ Сс pppџџџџџџџџџџџџџџџџџџџџ@lщ љ |||џџџџџџџџбџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ p сA xxxIџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@tщ a †††‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@x Љ €€€џџџџџџџџџџџџџџџџџџџџ@|С !щ ‚‚‚б‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@€щ ЩŠŠŠџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@„С ! žžžџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ˆ с1 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ Œ сQ ’’’Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@  сq ”””‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@”С !‘ –––Qџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ˜ сБ zzzЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ œ сй ІІІ‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@  ё ЈЈЈџџџџџџџџџџџџџџџџџџџџџџџџЌW—зW—зW—з_Ÿп_Ÿп_Ÿп_0 ќЦ0  0 ќЦp  МD**#tџ*#pџ*#lџ*1xџ2tџpџlџ(§ Lџ:\џ]ћ><џєа§ј,џћџџ5,џђ lxџ*1xџ§ Lџ:\џ]ћAРMlxџ*F џѕѕ:\џN<џ<џl џ џћяќў:Lџћяьў`1xџ6 <џ џџќўьў(§ Lџ:\џ]ћ><џєа§ј,џћ'џџ5,џі lxџ*1xџєкєаФZRlxџ*F џѕѕ:LџN<џ<џlM\џ@џ џћяќў:,џћяьў`1xџ6 <џ џџќўьў єЦђlxџ*Fќўѕѕ:LџNџџ(<џ џ  џћяьў:,џћямўѕѕ:ЌўNœўœў(МўŒў Œўћя|ў:lўћя\ў`1xџ6<џџќў џьўМўœўмўŒў|ў\ў lxџ *1xџ@lxџPў:\џ!%TўXў$ јXў HTў 0"Pў @#)XўTўPў ,D( xџPtџpџlџXўTўPў<џџ џќўьўмўМўœўŒў|ў\ўp$Cxџ lxџ%*1xџ lxџ&*1xџ lxџ'*1xџ§Xџ:hџ]ћAЩ!lxџ(*#Dџ€ *#@џ*1xџ2Dџ@џ™,lxџ)*FHџ§hџћя0џ:Xџ*ћя џ`1xџ6Hџ0џ џЧ,lxџ+*FHџ§hџћя0џ:Xџ,ћя џ`1xџ6Hџ0џ џ lxџ-*1xџ@lxџџ:hџ.%џџ$ јџ Hџ 0"џ @#)џџџh( xџ,Dџ@џџџџHџ0џ џР„/xџ ” xџ И0xџxџ ” xџ ”0xџ6pџtџxџ ” xџ x0tџ x1lpџѕЧ)xџtџ~2Clџlџф /lџ„$  lџxџtџ0 ќЦ@lžšK[  0 ќЦ   0 ќЦр  0 ќЦ8  0 ќЦИ  0 ќЦј  0 ќЦ8  ф ќdlџ§†4ќdlџ% „ ќdlџ% t ќdlџ% Р :lџ% ф y єыЏђ§ћlџ% Œ (lџ% \ ќdlџ%  ќdlџ% ќ !hџ м є+VџQhџ§oXџм 5Xџ&:lџNXџXџє+VџCPџPџр /Pџ5XџЬ ”,ф$  PџhџXџ0 ќЦИ  0 ќЦј  0 ќЦ8  0 ќЦ˜  0 ќЦ  0 ќЦx  0 ќЦИ  0 ќЦј  0 ќЦ€  0 ќЦР  0 ќЦ   а3@џ'Dџ%'Tџ%'dџ%tџ$ јtџ МQ@џxџtџH0џ@џ:dџ%tџxџ Дtџ 0@џ D0џ(Tџdћ” џќO~ )tџ@џ60џ џ xџ Ф<'џ%ѕѕџџџџ'Dџ%'Tџ%ѕ:dџ %tџ$ `tџ ` tџќ lа( xџtџ@џ0џ џ8'$  œ˜ p  Œ ˆ `|||”\l€„tTTTџџџџџџџџбџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ p сA xxxIџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@tщ a †††‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@x Љ €€€џџџџџџџџџџџџџџџџџџџџ@|С !щ ‚‚‚б‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@€щ ЩŠŠŠџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@„С ! žžžџџџџQџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ˆ с1 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ Œ сQ ’’’Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@  сq ”””‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@”С !‘ –––Qџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ˜ сБ zzzЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ œ сй ІІІ‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@  ё ЈЈЈџџџџџџџџџџџџџџџџџџџџџџџџЌW—зW—зW—з_Ÿп_Ÿп_Ÿп_0 ќЦ0  0 ќЦp  МD**#tџ*#pџ*#lџ*1xџ2tџpџlџ(§ Lџ:\џ]ћ><џєа§ј,џћџџ5,џђ lxџ*1xџ§ Lџ:\џ]ћAРMlxџ*F џѕѕ:\џN<џ<џl џ џћяќў:Lџћяьў`1xџ6 <џ џџќўьў(§ Lџ:\џ]ћ><џєа§ј,џћ'џџ5,џі lxџ*1xџєкєаФZRlxџ*F џѕѕ:LџN<џ<џlM\џ@џ џћяќў:,џћяьў`1xџ6 <џ џџќўьў єЦђlxџ*Fќўѕѕ:LџNџџ(<џ џ  џћяьў:,џћямўѕѕ:ЌўNœўœў(МўŒў Œўћя|ў:lўћя\ў`1xџ6<џџќўmžš