【導(dǎo)讀】醫(yī)院信息系統(tǒng)的信息化。庫管理符合相關(guān)要求。國外的動態(tài)：上世紀(jì)60年代初，美國便開始了HIS的研究。HIS進入大發(fā)展時期，美日歐各國的醫(yī)院紛紛開發(fā)HIS。發(fā)出基于部門管理的小型網(wǎng)絡(luò)管理系統(tǒng)，如血庫管理等。整的醫(yī)院網(wǎng)絡(luò)管理系統(tǒng)的實現(xiàn)已經(jīng)成為可能。目的是方便管理醫(yī)院日常所需血液，提高血庫工作人員的工作效率。計,日?；揪S護等各項功能,并且研究使用oracle數(shù)據(jù)庫。采用powerbuilder語言結(jié)合oracle數(shù)據(jù)庫，其他用到的工具PlsqlDeveloper,報告結(jié)合醫(yī)療領(lǐng)域?qū)嶋H問題，主題有新意且實用性強，計劃安排合適，求分析、詳細設(shè)計實現(xiàn)等。論文具體內(nèi)容將大致包含以下幾方面：。2．實現(xiàn)用戶血申請單錄入功能；4．實現(xiàn)對血庫的統(tǒng)計查詢功能：包括庫存查詢、日統(tǒng)計等。并且完成血庫維護部分的設(shè)計。用開發(fā)語言powerbuilder沒有接觸過，熟悉也用了不少時間。導(dǎo)致畢業(yè)設(shè)計完成進度較慢。的學(xué)習(xí)，以有利于自己以后的開發(fā)。較好，基本概念清楚，重點突出。論文結(jié)構(gòu)合理，條理清晰，研究方法規(guī)范。

　　

【正文】 VARCHAR2(10) No 血液規(guī)格 SPECS VARCHAR2(20) No 血袋數(shù)量 COUNT NUMBER(5,2) No 用血申請狀態(tài) STATUS VARCHAR2(1) No 醫(yī)囑流水號 MO_ORDER VARCHAR2(16) No 操作員 ID OPER_CODE VARCHAR2(6) No 操作時間 OPER_TIME DATETIME Yes 在本節(jié)中敘述了血庫管理系統(tǒng)所包含的部分數(shù)據(jù)存儲及其結(jié)構(gòu)說明。 系統(tǒng)界面 設(shè)計 系統(tǒng) 主界面如下圖： 河南大學(xué)本科畢業(yè)生學(xué)士學(xué)位論文 第 12 頁 分析：圖片上部是主菜單，下面是一圖片控件，窗體背景顏色為綠色 。 血庫申請單錄入功能 界面 的實現(xiàn) ： 血庫申請單窗體的設(shè)計如下圖所示： 分析：左側(cè)的 window 窗體內(nèi)是一個 datawindow 控件，通過單擊其選項，觸發(fā)操作：右側(cè)窗體內(nèi)的嵌入的 freeform 的 datawindow 顯示對應(yīng)信息，從數(shù)據(jù)表 B_BLOODAPPLY 中獲得，并可以對其修改。 圖 52 血庫申請單錄入 圖 51 血庫管理系統(tǒng)主界面 河南大學(xué)本科畢業(yè)生學(xué)士學(xué)位論文 第 13 頁 系統(tǒng) 的 具體 實現(xiàn) 這一節(jié) 將 主要以 系統(tǒng)的 血液成分維護 窗口 的 實現(xiàn) 過程 為例 進行 分析 。 血庫血液 成分 維護 血液成分維護窗體的設(shè)計如下圖所示 (重點分析 )： 分析 ：左側(cè)的 window 窗體內(nèi)是一個 treeview 控件，雙擊 其子節(jié)點，觸發(fā)相應(yīng)的操作：右側(cè)窗體內(nèi)的嵌入的 Gird 格式的 datawindow 顯示對應(yīng)子節(jié)點的 詳細 信息 。 (從數(shù)據(jù)表血庫 B_BLOODCOMPONENT 中獲得 )，該界面實現(xiàn)了對血液成分維護內(nèi)容的修改，更新等功能。 下面是 一段血液成分維護的代碼 ，實現(xiàn)了 左側(cè) treeview 控件節(jié)點對右側(cè)數(shù)據(jù)報表控制的 功能 ，實現(xiàn) treeviewitem 和數(shù)據(jù)窗口的對應(yīng)。 具體代碼如下： Long ll_roothandle long ll_level string ls_bloodcode SetPointer (HourGlass!) //將鼠標(biāo)指針設(shè)置為沙漏，耗時較長的鼠標(biāo)操作 treeviewitem lt_tvinew treeviewitem lt_tviparent 圖 53 血液成分成分維護 河南大學(xué)本科畢業(yè)生學(xué)士學(xué)位論文 第 14 頁 ll_roothandle = (roottreeitem!,0) //查找子結(jié)點中 roottreeite 相匹配//..的索引位置 .返回 integer 類型 . (handle,lt_tvinew) //獲得指定項的狀態(tài)信息，用 //lt_tvinew 保存查詢信息 if =0 then return 1 end if ll_level= //level 為該結(jié)點層級 if ll_level= 1 then return end if choose case case 1 =39。d_b_bloodkind39。//將數(shù)據(jù)窗口對象 d_b_bloodkind //與數(shù)據(jù)存儲對象 dw_2 關(guān)聯(lián)起來 (sqlca) //提交數(shù)據(jù)庫事務(wù)對象 sqlca，其中 //dw_2 為一個數(shù)據(jù)窗口 case 2 =39。d_b_ponent39。 (sqlca) end choose () //從數(shù)據(jù)庫中獲得數(shù)據(jù) () //設(shè)置光標(biāo)的位置 分析：上述代碼涉及到樹表 treeview 控件，其常用代碼還包括： (39。Library!39。) //tv_1 是 treeview 對象，為其子結(jié)點添加圖片 () //刪除所有子結(jié)點圖片 數(shù)據(jù)窗口控件實現(xiàn) Datawindow 控件實現(xiàn)了對數(shù)據(jù)庫的方便處理，調(diào)用，嵌入在 window窗體內(nèi)，修改方便。并且設(shè)計簡單便捷，體現(xiàn)出 powerbuilder 的界面設(shè)計的優(yōu)勢。下面給出 血液常數(shù)設(shè)置用到 的數(shù)據(jù)窗口： 血庫常數(shù)設(shè)置窗體 的 實現(xiàn) 如下圖所示： 河南大學(xué)本科畢業(yè)生學(xué)士學(xué)位論文 第 15 頁 分析 ：此數(shù)據(jù)窗口類似于血庫血液成分維護的數(shù)據(jù)窗口，將顯示血庫血液的基本常數(shù)信息，放置在血庫常數(shù)設(shè)置的窗體上， 調(diào)用時從數(shù)據(jù)庫中獲取數(shù)據(jù)表 B_BLOODCONST 的內(nèi)容 并顯示。 數(shù)據(jù)庫操作 創(chuàng)建表空間，并賦予其相應(yīng)權(quán)限 ：在命令行提示符下輸入： Create user fshis identified by his default tablespace users。 Grant connect,resource,dba to fshis。 打開 Enterprise Manager Consoleoracle 系統(tǒng)連接數(shù)據(jù)庫代碼 ： // Profile fshis = O84 ORACLE = *** = ora9 = fshis = False CommitOnDisconnect=39。No39。,PBCatalogOwner=39。 fshis39。 分析 ：其中 fshis 為數(shù)據(jù)庫用戶名， ora9 為數(shù)據(jù)庫服務(wù)名。 對數(shù)據(jù)庫的操作可以直接在 oracle 數(shù)據(jù)庫中進行，也可以在利用PL/SQL Developer 軟件 。比如可以利用它輸入原始數(shù)據(jù)，更新表內(nèi)容等，更新數(shù)據(jù)表操作的示例如下圖所示： 圖 55 血庫常數(shù)表 數(shù)據(jù)窗口 河南大學(xué)本科畢業(yè)生學(xué)士學(xué)位論文 第 16 頁 數(shù)據(jù)窗口設(shè)計 代碼 由于 powerbuilder 的程序代碼多與觸發(fā)響應(yīng)事件有關(guān)系，選擇的代碼多比較簡短。本系統(tǒng)功能的實現(xiàn)多用到數(shù)據(jù)報表。數(shù)據(jù)窗口 datawindow的 操作經(jīng)常用到，其 核心函 數(shù) 如下： (sqlca) //提交數(shù)據(jù)庫事務(wù)對象 sqlca， dw_2 為一個數(shù)據(jù)窗口 () //從數(shù)據(jù)庫中獲得數(shù)據(jù) 。 (0,FALSE) //去掉數(shù)據(jù)窗口中所有被選中的行 。 (row,true) //選中第 row 行 。 (row) //滾動數(shù)據(jù)窗口內(nèi)容到指定的第 row 行 。 (row) //在當(dāng)前的數(shù)據(jù)窗口指定行前面插入一行 。 (row) //在當(dāng)前的數(shù)據(jù)窗口刪除指定行 。 () //將焦點放在當(dāng)前數(shù)據(jù)窗口 dw_2 上 。 圖 55 利用 PL/SQL Developer更新表的操作 河南大學(xué)本科畢業(yè)生學(xué)士學(xué)位論文 第 17 頁 結(jié) 論 血庫管理信息系統(tǒng)采用 powerbuilder 為編程工具，后臺數(shù)據(jù)庫采用了ORACLE 數(shù)據(jù)庫管理系統(tǒng)作為數(shù)據(jù)庫服務(wù)器，利用了 powerbuilder 在從事界面開發(fā)的過程中的體現(xiàn)出的便捷 特性 ，大量使用了數(shù)據(jù)報表。 通過近一個月的開發(fā)設(shè)計，我掌握了 powerbuilder 和 Oracle 數(shù)據(jù)庫的一些基本知識，進一步了解了數(shù)據(jù)報表的便捷，也體會到了 oracle 數(shù)據(jù)庫在從事大型軟件開發(fā)中的安全性。 完成 畢業(yè)設(shè)計 的過程中，是一個不斷學(xué)習(xí) 的過程，其中 學(xué)習(xí)了一些部門以前做的項目，逐漸認識到業(yè)務(wù)有時候真的比技術(shù)更重要。了解業(yè)務(wù)是一個好的程序員的重要一步。剛開始，為了熟悉公司以后的業(yè)務(wù)，和同事被部門派到沈陽醫(yī)大四院實習(xí)了一周，熟悉醫(yī)院業(yè)務(wù)，并且還參加了部門組織的業(yè)務(wù)培訓(xùn)，對醫(yī)院信息系統(tǒng)涉及的業(yè)務(wù)有了進一步的了解。所用開發(fā)語言 powerbuilder 以前沒有接觸過，熟悉也用了不少時間。這也說明了一個程序員的適應(yīng)能力是多么重要。 畢業(yè)設(shè)計也讓我從事了一次較正規(guī)的軟件開發(fā)工作，在理論提高的同時也提高了我的動手能力和實踐能力。 河南大學(xué)本科畢業(yè)生學(xué)士學(xué)位論文 第 18 頁 參考資料 [1] Coad P Yourdon， E,ObjectOriented Analysis， Englewood Cliffs, NJ: PrenticeHall,1991 年 12 月 [2] 邵維忠、楊芙清，面向?qū)ο笙到y(tǒng)分析，清華大學(xué)出版社， 1998 年 12月 [3] ， ， ，可視化建模技術(shù)，科學(xué)出版社， 1999 年 4月 [4] 劉超，可視化面向?qū)ο蠼?技術(shù)，北京航空航天大學(xué)出版社， 1999年 7 月 [5] 曉通網(wǎng)絡(luò)數(shù)據(jù)庫研究所， POWERBUILDER 開發(fā)中的數(shù)據(jù)庫設(shè)計，內(nèi)蒙古人民出版社， 1998 年 6 月 [6] 北京希望電腦公司， 開發(fā)人員指南 ,1998 年 7 月