【正文】 系統(tǒng)調(diào)試 目的是發(fā)現(xiàn)程序和系統(tǒng)中可能存在的錯誤并及時予以糾正。 然后進行綜合調(diào)試。 在設置父項權限時，若 同層所有子節(jié)點都沒有權限則其父節(jié)點也沒有權限 ；若 同層 子 節(jié)點有一個有權限則其父節(jié)點就 有權限 。 由系統(tǒng)管理員 建立用戶 組，導20 入用戶并分配 用戶 權限 ，以及 不同權限 用戶登陸到 系統(tǒng)后 的一系列操作，測試權限設置是否起作用等，同時還包括系統(tǒng)提示和系統(tǒng)界面是否友好等。但是不可否認系統(tǒng)仍然存在缺陷，只是現(xiàn)在還沒有發(fā)現(xiàn)，軟件需要不斷完善。雖然時間倉促 ， 設計中還存在 很多不足之處，但我可以自豪的說，這是我 努力的成果 。 22 致謝 首先要 感謝我的指導老師 在畢業(yè)設計中給我的悉心指導和幫助。是你們的無私教導為我打下了扎實的專業(yè)基礎。 感謝我的 父母對我的關愛，讓我能夠安心在大學的殿堂里學習知識。) IF ll_Pos 0 THEN ll_Pos = Pos(ls_MenuItemText,() IF ll_Pos 0 THEN ls_MenuItemText = Left(ls_MenuItemText,ll_Pos 1) ELSE ls_MenuItemText = Mid (ls_MenuItemText,4) END IF END IF IF NOT [ll_MenuItem].Visible THEN GOTO Process_Next IF ls_MenuItemText = THEN GOTO Process_Next IF [ll_MenuItem].Tag = AlwaysEnabled THEN GOTO Process_Next 26 ll_MenuItemNumber ++ = ls_MenuItemName = String(ll_MenuItemNumber) + . + ls_MenuItemText IF ii_MenuLevel = 1 THEN = 1 = 1 ELSE = 3 = 3 END IF ll_Handle = (al_Handle,ltvi_Item) wf_CreateMenuTV([ll_MenuItem],ll_Handle) Process_Next: ii_MenuLevel NEXT 。 23 參考文獻 [1] 周航 ,芮廣海 . 計算機信息系統(tǒng)在醫(yī)院管理中的應用 [J].遼寧石油化工大學學報 , 2021,(01):4547 [2] 王謙 ,劉元濤 . 醫(yī)院住院管理信息系統(tǒng)的研究開發(fā) [J].微型電腦應用 ,2021, (01):99102 [3] 李良 ,王永縣 ,宋廣峰 . 縣級醫(yī)院管理信息系統(tǒng)的設計與實現(xiàn) [J].管理信息系統(tǒng) , 1997, (05):2327 [4] 何勇 . 醫(yī)院信息系統(tǒng)設計與 開發(fā) [D].重慶大學 ,2021 . [5] 葉建江 .醫(yī)院信息管理系統(tǒng) (HIS)開發(fā)模式 [J].廣東藥學院學報 , 2021,(03):78 [6] 李偉紅 . SQL Server 2021 數(shù)據(jù)庫及應用 [M].北京 :中國水利水電出版社 ,2021 [7] 張勇毅 ,姚華 . PowerBuilder + SQL Server 數(shù)據(jù)庫應用系統(tǒng)開發(fā)與實例 [M].北京 : 人民郵電出版社 ,2021 [8] 王艷青 . PowerBuilder 程序設計基礎 [M].北京 :中國水利水電出版社 ,2021 [9] 盧守東 . PowerBuilde 數(shù)據(jù)庫應用開發(fā)技術 [M].北京 :清華大學出版社 ,2021 [10] Haux, R, Winter, A, Ammenwerth, E. Strategic Information Management in Hospitals[J].Springer, New York (2021) [11] Benbasat, I, and Taylor, . Behavioral aspects of information processing for the design of management information systems[J].IEEE Transactions on Systems, Man, and Cyberic,1982,(4):439450 24 附錄 源代碼 1. 權限設置窗口 open 時間代碼： long ll_parts[2] ll_parts[1]=500 ll_parts[2]=1 (ll_parts) (0,0,點擊鼠標左鍵展開菜單，點擊鼠標右鍵改變菜單權限 !) = False = False = False = False io_parm = trans_working = gf_center_window(this) string ls_system_name ii_SystemID = [1] SELECT XTMC into :ls_system_name FROM SS_INSTALL WHERE XTSB = :ii_SystemID USING trans_working。有了你們，我的大學生活才會如此精彩。 同時要 感謝 我的校外指導老師 公司 項目經(jīng)理 在畢業(yè)設計過程中對我的指導和幫助，使我克服了技術上的難題，學到了更多東西。 本次醫(yī)院病人信息系統(tǒng)的設計與實現(xiàn)的過程中 ，使我學習并加強了PowerBuilder 編程技術，同時 SQL 語句也得到了鞏固 ，這對我今后進入公司工作打下了良好的基礎。畢業(yè)設計過程中，經(jīng)過詳細的數(shù)據(jù)庫分析及系統(tǒng)功能設計和開發(fā)，使我理論聯(lián)系實際，進一步提升了我的實踐能力，使我學到了很多知識。 調(diào)試結果 經(jīng)過系統(tǒng)的調(diào)試，使得軟件的缺陷得以改正，使軟件越來越完善。但 調(diào)試過程中發(fā)現(xiàn) 父節(jié)點未隨之改變，后來在查看設置父項權限函數(shù) wf_setparentright 時 發(fā)現(xiàn)返回值出錯，于是，修改 代碼得到正確的 返回值 實現(xiàn)功能， 修正 了 缺陷。 權限 設置 此模塊中， 采用的是 TreeView 控件， 菜單層次樹 有函數(shù) wf_createmenutv 生成 。以下是對開發(fā)完成后整個系統(tǒng)進行的調(diào)試過程。 進入‘ 權限戶管理 ’子菜單，如圖 412 所示 。 圖 411 用戶導入窗口 權限管理 【 功能 】 ： 系統(tǒng)管理員 為不同的用戶組分配使用權限。 對使用該系統(tǒng)的用戶組及其用戶進行設置。 輸入住院日期時間， 然后單擊‘ ’按鈕，統(tǒng)計結果。 單擊‘ ’按鈕，清除已有查詢 條件，輸入新的查詢條件，重新檢索。 【操作步驟】： 選擇“查詢 |掛號信息查詢”子菜單； 進入‘掛號信息查詢’子菜單，如圖 47 所示： 圖 47 掛號號表查詢窗口 先輸入就診號碼、或門診號碼、或掛號員、或病人姓名、或掛號時間等單個或多個查詢條件，當輸入多個查詢條件時，系統(tǒng)默認按‘且’連接，然后單擊‘ ’按鈕，統(tǒng)計結果。 可 按病人性質(zhì)進行篩選 ，也 可通過住院號碼或病人姓名查詢指定病人的檔案信息 。此界面窗口顯示所有在醫(yī)院掛號就診的病人檔案信息，可通過門診號碼或病人姓名查詢指定病人的檔案信息，并可點擊‘ ’按鈕進入門診病人檔案修改界面對指定病人的檔案信息進行完善和修改。當系統(tǒng)識別顯示出用戶名稱后 輸入用戶密碼后點擊 ‘ ’ 按鈕登錄系統(tǒng)時，系統(tǒng)將 檢驗用戶密碼是否正確，若不正確將不 予登錄 ；登陸之后，系統(tǒng) 將 根據(jù)用戶權限來設置系統(tǒng)組合系統(tǒng)對應的功能模塊菜單。本系統(tǒng)在開發(fā)過程中采用 WINDOWS系列軟件風格，使用戶易掌握易使用。 系統(tǒng)維護功能 用 戶管理：包括增加、刪除用戶組，增加、編輯、刪除用戶，導入用戶等。 管理員 /用戶 用戶信息管理 就診信息查詢 門診就診信息表 掛號號表 查詢 用戶信息表 掛號號表查詢 住院病人人數(shù)查詢 住院病人表 門診病人檔案 管理 門診病人檔案表 住院病人檔案 管理 住院病人信息表 醫(yī)院病人信息管理系統(tǒng) 9 就診信息查詢：可通過輸入病人姓名或選擇就診時間段來對病人就診信息查詢。 系統(tǒng)功能調(diào)查 醫(yī)院病人管理系統(tǒng)的檔案 維護 功能 門診病人檔案的管理：對門診病人信息進行管理與維護，可通過輸入病人的門診號碼或姓名查詢并修改病人檔案。本系統(tǒng)主要是以數(shù)據(jù)流圖、數(shù)據(jù)字典為主要描述工具來勾畫系統(tǒng)的概貌。具體內(nèi)容包括：管理業(yè)務狀況的調(diào)查 分析、數(shù)據(jù)流程的調(diào)查分析。這些功6 能使您得以快速交付 SQL Server 應用程序，使客戶只需最少的安裝 和管理開銷即可實現(xiàn)這些應用程序。 可將一組數(shù)據(jù)復制到多個移動的脫接用戶，使這些用戶自主地工作，然后將他們所做的修改合并回發(fā)布服務器。 SQL Server 2021 關系數(shù)據(jù)庫引擎支持當今苛刻的數(shù)據(jù)處理環(huán)境所需的功能