【正文】 () =true =true else messagebox(錯誤！ ,保存失??！ ,StopSign!) rollback。 () =true =true else messagebox(錯誤！ ,保存失??！ ,StopSign!) rollback。) end if ( ) ( ) =true =true end if （ 4）編寫 （刷新）按鈕的代碼 在 的 clicked( )事件中，編寫如下代碼： ( ) =true =true （ 5）編寫 （添加）按鈕的代碼 在 的 clicked( )事件中，編寫如下代碼： integer li_row,li_maxid li_row=(0) (li_row) ( li_row) select max(編號 ) into :li_maxid from guest。 messagebox(提示 ,入住登記成功！ ) 30 //為加入新記錄作準備 ( ) ( 0) = = = = ( ) ( 0) ( 1,入住日期 ,Date(Now())) ( 1,入住時間 ,time(Now())) （ 3）編寫 cb_lodgingclear（清除）按鈕的代碼 在 cb_lodgingclear 的 clicked( )事件中，編寫如下代碼： ( ) (( 0)) （ 4）編寫 cb_exit（退出）按鈕的代碼 在 cb_exit 的 clicked( )事件中，編寫如下代碼： close(parent) 程序 4 退房結(jié)帳模塊的程序設(shè)計 （ 1）編寫 w_out 窗口的代碼 在 w_out 的 open( )事件中，編寫以下代碼： () =1120 =3099 (sqlca) (0) （ 2）編寫 dw_1 數(shù)據(jù)窗口控件的代碼 在 dw_1 的 itemerror( )事件中，編寫如下代碼： return 2 31 在 dw_1 的 dberror( )事件中，編寫如下代碼： return 1 在 dw_1 的 losefocus( )事件中，編寫如下代碼： ( ) （ 4）編寫 cb_cancel（取消）按鈕的代碼 在 cb_cancel 的 clicked( )事件中，編寫如下代碼： close(parent) 程序 5 綜合操作模塊的程序設(shè)計 編寫客人信息部分的代碼 （ 1）編寫 數(shù)據(jù)窗口控件的代碼 在 的 itemerror( )事件中，編寫如下代碼： return 2 在 的 dberror( )事件中，編寫如下代碼： return 1 的 losefocus( )事件中，編寫如下代碼： accepttext( ) （ 2）編寫 （客人信息查詢字段下拉框）的代碼 在 的 selectionchanged( )事件中，編寫如下代碼： choose case newindex case 1 ( ) case 2 () case 3 () end choose （ 3）編寫 （查詢）按鈕的代碼 在 的 clicked( )事件中，編寫如下代碼： string ls_temp 32 ls_temp= if ls_temp and trim() then if ls_temp=編號 or ls_temp=出生日期 then (+=+trim()) else (+=~39。 return end if end if //處理 lodging 表 ( 1,編號 ,(1,編號 )) if ( )1 then messagebox(錯誤！ ,入住登記表提交錯誤！ +,StopSign!) rollback。 else update room set 入住 =:li_temp1+1 where 房間號 =:。 if li_temp1+1li_temp2 then messagebox(錯誤！ ,+房間超員！ ,stopSign!) rollback。 //選出編號的最大值 if isnull(li_temp1) then li_temp1=0 end if ( 1, 編號 ,li_temp1+1) 29 end if if ( )1 then messagebox(錯誤！ ,客人表提交失??！ ,StopSign!) rollback。 （ 2）設(shè)置【 Return Type】屬性為： “（ None） ”，設(shè)置【 Function Name】屬性為：uf_setmenu。 24 致謝 在畢業(yè)設(shè)計期間，我要感謝老師給我提供了許多寶貴的意見；感謝系領(lǐng)導(dǎo)對我的學(xué)習(xí)的支持與鼓勵；感謝在設(shè)計過程中的同學(xué)們的幫助；感謝老師、同學(xué)和領(lǐng)導(dǎo)的關(guān)心！在有限的人生中追求人生的無限的過程中，我生命中值得一生銘記和 感謝的人很多，我的人生因他們的指導(dǎo)與幫助而變得更加精彩美麗，真心地祝愿他們身體健康、工作順利、家庭幸福，在學(xué)術(shù)研究上取得更為輝煌的成就，為我等做出更好的引航作用，桃李滿天下！ 25 參考文獻 [1] 伊為民 , 金銀秋 etal. 數(shù)據(jù)庫原理與技術(shù) [M]. 北京 : 大學(xué)出版社 , 2020, 6 [2] 邵亮 . 快速入門篇 [M]. 北京 : 清華大學(xué)出版社 , 2020, 9 [3] 段興 , 于錫強 , 王川 etal. PowerBuilder實用程序設(shè)計 100例 [M]. 湖南 : 人民郵電出版社 , 2020, 3 [4] 潘綿平 . 軟件開發(fā)技術(shù) [M]. 西安 : 電子科技大學(xué)出版社 , 2020, 5 [5] Coleman R G. Continental growth of Northwest China [J]. Tectonics. 1989, 5(8):621635 [6] 陳穎 , 張福洪 . 基于管理 系統(tǒng)的設(shè)計與實現(xiàn) [J]. 現(xiàn)代電子技術(shù) . 2020, 17(7):3234 [7] 袁小蕾 . 淺析 PowerBulider 與 Visual Basic 這兩種技術(shù)的優(yōu)缺點 [J]. 大眾科技 . 2020, 11(8):4952 [8] 李湘閩 , 唐宏 , 葛繼 . 學(xué)習(xí)型管理系統(tǒng) [J]. 軟件工程 . 2020, 20(8):3335 [9] Daniel Lewis. Fundamentals of Embedded Software[J]. Where C and Assembly Meet. 2020, 8(10):5557 [10] 張 磊 , 李志蜀 , 杜巍 . PowerBulider 技術(shù)研究與開發(fā)實例 [J]. 計算機應(yīng)用研究 . 2020, 6(12):158161 [11] 王珊 , 陳紅 . 數(shù)據(jù)庫系統(tǒng)原理教程 [M]. 北京 : 清華大學(xué)出版社 , 1998, 7 [12] Gerald . Database Management Systems:Designing and Building Business Applications[M]. China: China Machine Press, 2020, 1 26 附錄 部分 源代碼 程序 1 登錄模塊的程序設(shè)計 （ 1）在登錄窗口中，聲明一個實例變量，用來記錄錯誤登錄次數(shù)，代碼如下： int ii_errortime=0 （ 2）在 cb_login 的 clicked()事件中，編寫以下代碼： string ls_username,ls_pw ls_username=trim() ls_pw=trim() select level into :gi_level from sysuser where (name=:ls_username) and (pw=:ls_pw) using sqlca。 提高是有限的但提高也是全面的，正是這一次設(shè)計讓我積累了無數(shù)實際經(jīng)驗，使我的頭腦更好的被知識武裝了起來，也必然會讓我在未來的工作學(xué) 習(xí)中表現(xiàn)出更高的應(yīng)變能力，更強的溝通力和理解力。 PowerBuilder 的各種應(yīng)用，我都是隨著設(shè)計的不斷深入而不斷熟悉并學(xué)會的。這是我們都希望看到的也正是我們進行畢業(yè)設(shè)計的目的所在。遇到困難，我會覺得無從下手，不知從何寫起；當困難解決了，我會覺得豁然開朗，思路打開了；當論文經(jīng)過一次次的修改后，基本成形的時候，我覺得很有成就感。 22 圖 46 系統(tǒng)維護模塊 編寫 cb_refresh（刷新）按鈕的代碼 在 cb_refresh 的 clicked( )事件中，編寫如下代碼： () =true =true （詳細程序請見附錄 “程序 6”） 23 第 5 章 總結(jié) 2020 年的 3 月，我開始了我的畢業(yè)論文工作，時至今日，論文基本完成。 5）更改系統(tǒng)用戶的密碼。 3）添加系統(tǒng)用戶。具體功能如下： 1）瀏覽系統(tǒng)用戶資料。通過系統(tǒng)維護模塊，用戶對數(shù)據(jù)庫的 Sysuser 表直接進行操作，而且?guī)缀蹩梢詫υ摫磉M行所有的操作。包括用戶添加、刪除和信息的修改，界面如圖 46 所示。) else (+=+trim()) end if ( ) () =true =true end if （詳細程序請見附錄 “程序 5”） 系統(tǒng)維護模塊的程序設(shè)計 實現(xiàn)系統(tǒng)維護功能。 圖 45 綜合操作模塊 在 （查詢）的 clicked( )事件中，編寫如下代碼： string ls_temp 21 ls_temp= if ls_temp and trim() then if ls_temp=類型 then (+=~39。 4）添加、刪除、查詢、修改入住信息表（ lodging 表）。 2）添加、刪除、查詢、修改客人信息表 (guest 表 )。此外，綜合操作表還提供對營業(yè)情況進行及時統(tǒng)計的功能。當客人表、入住表或房 間表存在錯誤時，可以調(diào)用綜合操作。 綜合操作模塊屬于超級權(quán)限模塊，即只有超級用戶才能使用的模塊?？蓪I業(yè)情況進行及時的統(tǒng)計。 lde_charge=li_days*lde_price ( 1,住宿費用 , lde_charge) ( 1,收回鑰匙 ,1) end if end if （詳細程序請見附錄 “程序 4”） 綜合操作模塊的程序設(shè)計 實現(xiàn)系統(tǒng)對入住記錄、客人信息、客房信息綜合操作的功能和統(tǒng)計功能，界 20 面如圖 45 所示。 沒有找到尚未退房的記錄， ~n 請核實！ ) ( 0) ( ) else if ( )=1 then ( 1,