1、安徽高校接著教化學(xué)院函授畢 業(yè) 論 文題目門診收費(fèi)系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn) 系別接著教化學(xué)院 年級(jí)專業(yè)計(jì)算機(jī)科學(xué)和技術(shù) 學(xué)號(hào)CHB011425032 姓名余小琳 指導(dǎo)老師黎林老師 完成日期安徽高校接著教化學(xué)院門診收費(fèi)系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn)摘 要醫(yī)院信息管理系統(tǒng)是醫(yī)院管理和醫(yī)療活動(dòng)中進(jìn)行信息管理和聯(lián)機(jī)操作的計(jì)算機(jī)應(yīng)用系統(tǒng),英文縮寫HIS（Hospital Information System)是為醫(yī)院所屬各部門供應(yīng)病人診治信息和行政管理信息的收集、存儲(chǔ)、處理、提取和數(shù)據(jù)交換的實(shí)力，門診管理信息系統(tǒng)是其中的一個(gè)重要子系統(tǒng)。本文針對中小型醫(yī)院設(shè)計(jì)開發(fā)了一個(gè)基于C/S結(jié)構(gòu)的醫(yī)院信息管理系統(tǒng)的一個(gè)子系統(tǒng)醫(yī)院門診醫(yī)療管

2、理系統(tǒng)。通過計(jì)算機(jī)技術(shù)和網(wǎng)絡(luò)技術(shù)實(shí)現(xiàn)對醫(yī)院門診醫(yī)療信息的全過程追蹤和動(dòng)態(tài)管理，從而簡化了患者的診療過程，縮短就醫(yī)時(shí)間，優(yōu)化了就診環(huán)境。本文首先分析介紹了系統(tǒng)開發(fā)的背景、國內(nèi)外的探討現(xiàn)狀、運(yùn)用中遇到的問題以及本文的構(gòu)成；其次，以醫(yī)院信息管理系統(tǒng)中門診掛號(hào)子系統(tǒng)、門診收費(fèi)子系統(tǒng)、藥房管理子系統(tǒng)和門診醫(yī)生子系統(tǒng)四個(gè)子系統(tǒng)為重點(diǎn)進(jìn)行了需求分析、系統(tǒng)設(shè)計(jì)和實(shí)現(xiàn)；最終，對已進(jìn)行的探討和開發(fā)工作進(jìn)行了總結(jié)和展望。 關(guān)鍵詞：醫(yī)院信息系統(tǒng)；醫(yī)療管理；C/S結(jié)構(gòu)； 目 錄1 緒論11.1 系統(tǒng)開發(fā)背景11.2 國內(nèi)外探討現(xiàn)狀11.2.1國內(nèi)探討現(xiàn)狀11.2.2國外探討現(xiàn)狀11.3 論文主要內(nèi)容11.4 系統(tǒng)的基本

3、構(gòu)成22 需求分析22.1 門診醫(yī)療簡介22.2 主要業(yè)務(wù)數(shù)據(jù)流程分析32.2.1門診掛號(hào)32.2.2門診退號(hào)42.2.3門診就醫(yī)42.2.4門診收費(fèi)52.2.5門診藥房發(fā)藥6 2.3 數(shù)據(jù)分析72.3.1數(shù)據(jù)字典分析72.3.2整體E-R圖73 系統(tǒng)設(shè)計(jì)93.1 系統(tǒng)模塊結(jié)構(gòu)設(shè)計(jì)93.2數(shù)據(jù)庫設(shè)計(jì)104 系統(tǒng)的實(shí)現(xiàn)145 總結(jié)和展望22參考文獻(xiàn)22致 謝2214 / 271 緒論1.1 系統(tǒng)開發(fā)背景門診醫(yī)療可以說是醫(yī)院管理的門面，流量大，手續(xù)較繁鎖，在手工方式下，醫(yī)護(hù)人員要做大量不必要的重復(fù)工作、效率低、精確性差、不便利管理，影響工作效率，造成了許多就診病人得不到合理有效的快捷就診服務(wù)，甚至

4、影響醫(yī)療質(zhì)量，為此，越來越多的醫(yī)院加快了信息化建設(shè)的步伐，本項(xiàng)目為定遠(yuǎn)縣總醫(yī)院而開發(fā)，系統(tǒng)目前運(yùn)行狀況良好，有效地優(yōu)化服務(wù)和工作環(huán)境、使病員和醫(yī)生心情得以放松，提高了服務(wù)效率和質(zhì)量、樹立了醫(yī)院的良好形象，使門診工作可以高效有序的運(yùn)轉(zhuǎn)，提高了醫(yī)院的經(jīng)濟(jì)效益，促進(jìn)醫(yī)院的發(fā)展。1.2 國內(nèi)外探討現(xiàn)狀1.2.1 國內(nèi)探討現(xiàn)狀 我國醫(yī)院信息系統(tǒng)（HIS）的發(fā)展階段可以分為三個(gè)部分:第一階段，是醫(yī)院管理信息系統(tǒng)建設(shè)階段;其次階段，是醫(yī)院臨床信息系統(tǒng)建設(shè)階段;第三階段，是建設(shè)區(qū)域衛(wèi)生信息系統(tǒng)階段。在實(shí)現(xiàn)醫(yī)院信息化的過程中，標(biāo)準(zhǔn)化是一個(gè)不能回避的問題。流程的標(biāo)準(zhǔn)化是和醫(yī)院的改革，醫(yī)院的管理科學(xué)化包括現(xiàn)代醫(yī)院建

5、設(shè)密不行分的。1.2.2 國外探討現(xiàn)狀國際上醫(yī)院信息化管理大致可分為三個(gè)階段：第一個(gè)十年，集中在開發(fā)醫(yī)院行政管理的功能上，如財(cái)務(wù)收費(fèi)、住院病人和門診病人管理等，但到了1972年美國連一個(gè)勝利的已完成的全面醫(yī)院管理計(jì)算機(jī)系統(tǒng)都沒有。其次個(gè)十年，在接著完成和實(shí)現(xiàn)醫(yī)院管理信息計(jì)算機(jī)化的同時(shí)，開發(fā)者的努力已進(jìn)入醫(yī)療信息的處理領(lǐng)域，如病人醫(yī)療處理系統(tǒng)，試驗(yàn)室系統(tǒng)等。到了1985年，美國全國醫(yī)院數(shù)據(jù)處理工作調(diào)查表明，100張床以上的醫(yī)院，80%實(shí)現(xiàn)了計(jì)算機(jī)財(cái)務(wù)收費(fèi)管理、70%的醫(yī)院可支持病人掛號(hào)登記和行政事務(wù)管理，25%的醫(yī)院有了較完整的HIS。最終一個(gè)十年至今，探討者又把重點(diǎn)放在了病人床邊系統(tǒng)、醫(yī)院影像

6、處理系統(tǒng)、病人計(jì)算機(jī)化病案、統(tǒng)一的醫(yī)學(xué)語言系統(tǒng)等方面。醫(yī)院信息系統(tǒng)正在經(jīng)驗(yàn)著小型化、智能化和集成化的改造過程1.3 論文主要內(nèi)容本文闡述了門診醫(yī)療管理以病人為核心的設(shè)計(jì)思路，介紹了系統(tǒng)的開發(fā)過程和原理，依據(jù)軟件開發(fā)的流程，從系統(tǒng)需求分析，系統(tǒng)設(shè)計(jì)，再到系統(tǒng)的實(shí)現(xiàn)。第一張為引言；其次章講敘了系統(tǒng)需求分析，首先由醫(yī)院管理者提出需求，依據(jù)用戶需求開發(fā)人員經(jīng)過市場調(diào)查得出系統(tǒng)要實(shí)現(xiàn)的功能。以及對系統(tǒng)的業(yè)務(wù)數(shù)據(jù)流程分析和數(shù)據(jù)分析。第三章講解并描述了系統(tǒng)設(shè)計(jì)，主要講解并描述如何實(shí)現(xiàn)需求分析時(shí)提出的功能需求，本章包括系統(tǒng)模塊結(jié)構(gòu)設(shè)計(jì)、系統(tǒng)功能模塊設(shè)計(jì)和數(shù)據(jù)庫設(shè)計(jì)，第四章系統(tǒng)的實(shí)現(xiàn)，這章是確定應(yīng)當(dāng)怎樣詳細(xì)實(shí)現(xiàn)

7、第三章所要求的系統(tǒng)。1.4 系統(tǒng)的基本構(gòu)成門診部醫(yī)療信息管理系統(tǒng)主要是對醫(yī)院門診部掛號(hào)和收費(fèi)，藥房以及醫(yī)生就診進(jìn)行管理。主要功能模塊有：門診掛號(hào)和收費(fèi)模塊藥房管理模塊門診醫(yī)生模塊對于門診掛號(hào)，作為醫(yī)院面對病人的第一個(gè)門面，主要是針對給病人掛號(hào)；統(tǒng)計(jì)掛號(hào)科室、醫(yī)生、掛號(hào)員工作量、掛號(hào)病人的報(bào)表；門診收費(fèi)，作為醫(yī)院對病人在醫(yī)院看病的費(fèi)用進(jìn)行繳費(fèi)部門，主要作用是門診收費(fèi)、收費(fèi)查詢、統(tǒng)計(jì)報(bào)表。對于藥房管理主要功能是對醫(yī)院的藥品進(jìn)行入出庫進(jìn)行管理，對庫存中的藥品進(jìn)行盤點(diǎn)和審核，查詢藥品的入庫、盤點(diǎn)、庫存、以及對病人的取藥、退藥查詢。統(tǒng)計(jì)藥房人員工作量、藥品日用量的報(bào)表。門診醫(yī)生的主要功能是通過病人的先主

8、訴病情，然后對病人進(jìn)行診治，給病人進(jìn)行檢查、開處方、手術(shù)，申請單將自動(dòng)傳到收費(fèi)處和醫(yī)技科室；可以查詢病人的歷史信息。2. 需求分析2.1 門診醫(yī)療簡介 門診病人來院后，首先掛號(hào)，然后到醫(yī)生處就診，醫(yī)生可能會(huì)開具檢查單、化驗(yàn)單，開處方。病人交費(fèi)后進(jìn)行相關(guān)的檢查和化驗(yàn)，其結(jié)果能支持醫(yī)生推斷病情，此時(shí)，醫(yī)生開出治療單、處方或手術(shù)單等，病人交費(fèi)后接受相應(yīng)處理。本系統(tǒng)主要應(yīng)實(shí)現(xiàn)以下功能：（1）掛號(hào)來醫(yī)院掛號(hào)、急癥、醫(yī)療卡服務(wù)、就診卡的設(shè)計(jì)和管理、所掛科目、科室的位置、掛號(hào)收費(fèi)、登記。（2）退號(hào)對病人掛號(hào)做出退費(fèi)處理。（3）就診依據(jù)詳細(xì)的癥狀進(jìn)行檢查、就診，并開出處方。（4）收費(fèi)依據(jù)檢查的項(xiàng)目及醫(yī)生所開處

9、方的詳細(xì)藥品，和劃價(jià)系統(tǒng)中的詳細(xì)金額進(jìn)行收費(fèi)。供應(yīng)和門診收費(fèi)相關(guān)的各類報(bào)表供應(yīng)門診醫(yī)療統(tǒng)計(jì)、門診科室及工作人員部分核算數(shù)據(jù)和工作量統(tǒng)計(jì)。退費(fèi)處理方法合理有效，結(jié)帳方法敏捷平安。（5）發(fā)藥藥房依據(jù)處方，檢查藥房內(nèi)是否有足夠的藥方上須要的藥，是否須要去藥房去取以補(bǔ)足貨源以及預(yù)備庫存等。核對已收費(fèi)處方無誤后予以配藥、發(fā)藥處理。2.2 主要業(yè)務(wù)數(shù)據(jù)流程分析2.2.1 門診掛號(hào) 門診掛號(hào)病人到醫(yī)院掛號(hào)后，先確定是不是急診，病人有沒有磁卡，有先讀取磁卡的信息；為病人選擇科室，病人選擇選擇醫(yī)生的級(jí)別，醫(yī)院為該病人指派醫(yī)生，對該病人收取掛號(hào)費(fèi)用，登記掛號(hào)信息。如圖2-1所示： 圖2-1 病人掛號(hào)數(shù)據(jù)流程圖2.

10、2.2 門診退號(hào)掛號(hào)病人由于某種緣由要求退號(hào)，醫(yī)院讀取病人的磁卡，查詢掛號(hào)的信息，是否是當(dāng)日的掛號(hào)（假如不是當(dāng)日的掛號(hào)，醫(yī)院則不給和退號(hào)處理；為該病人做出退號(hào)處理，刪除掛號(hào)的信息，給病人退掛號(hào)費(fèi)用；對退出的費(fèi)用記賬帳，打印出退號(hào)憑證。如圖2-2所示：圖2-2 病人退號(hào)數(shù)據(jù)流程圖2.2.3 門診就醫(yī)病人掛號(hào)到指定醫(yī)生就診，醫(yī)生詢問病人是否是復(fù)診或者初診（復(fù)診的話查詢病人的歷史就診信息）；病人向醫(yī)生敘述病情，醫(yī)生記錄病情和病歷；醫(yī)生對病人闡述的病情給和診斷，診斷然后給病人開藥（配置禁忌檢查，詢問病人同意否，同意的話給病人寫電子病歷）；須要做化驗(yàn)、手術(shù)、檢查、住院的，給該病人開申請單，病人拿著醫(yī)生開

11、出的藥品、手術(shù)、檢查、住院申請單到收費(fèi)處繳費(fèi)，繳完費(fèi)用后到拿著單據(jù)到門診藥房取藥；化驗(yàn)室、檢查室做化驗(yàn)和檢驗(yàn)；手術(shù)室領(lǐng)取手術(shù)時(shí)辰表；到住院部讓住院護(hù)士支配床位；如圖2-3所示：圖2-3醫(yī)生就診數(shù)據(jù)流程圖2.2.4 門診收費(fèi)門診收費(fèi)是對病人在門診就醫(yī)時(shí)全部的費(fèi)用都在此處繳納。接受病人的交費(fèi)單據(jù)，刷卡讀取該病人的收費(fèi)單據(jù)，對病人費(fèi)用進(jìn)行收費(fèi)。收費(fèi)后打印發(fā)票，給病人一張收費(fèi)單據(jù)。費(fèi)用每日結(jié)算后打入財(cái)務(wù)股賬戶。如圖2-4所示：圖2-4門診收費(fèi)流程圖2.2.5 門診藥房發(fā)藥藥房依據(jù)處方，檢查藥房內(nèi)是否有足夠的藥房上須要的藥，是否須要去藥房去補(bǔ)足貨源；依據(jù)藥品的限期及庫存下限來進(jìn)行缺藥、對藥品進(jìn)行數(shù)量、金

12、額雙重限制；核對已收費(fèi)處方無誤后給和病人配藥、發(fā)藥處理。如圖2-5所示：圖2-5 藥房發(fā)藥流程圖2.3數(shù)據(jù)分析 數(shù)據(jù)字典分析系統(tǒng)中所設(shè)計(jì)的數(shù)據(jù)字典如下：病人掛號(hào)編號(hào)，姓名，性別，年齡，身份證號(hào)掛號(hào)單掛號(hào)編號(hào)，掛號(hào)方式，病人姓名，主治醫(yī)師，掛號(hào)日期病歷病例編號(hào)，病人姓名，病歷信息病人掛號(hào)號(hào)，姓名，年齡，身份證號(hào)，是否住院開處方處方號(hào)，處方內(nèi)容，病人姓名，病人年齡，附注醫(yī)師醫(yī)師號(hào)，姓名，性別，職稱，年齡，工作時(shí)間 檢查檢驗(yàn)序號(hào)，病人掛號(hào)號(hào)，檢驗(yàn)內(nèi)容，檢驗(yàn)醫(yī)師 收費(fèi)項(xiàng)目病人號(hào)，收據(jù)項(xiàng)目，項(xiàng)目類型，項(xiàng)目序號(hào)，收費(fèi)人員，收費(fèi)金額收據(jù)收據(jù)號(hào)，收據(jù)項(xiàng)目，所收金額，收款日期 處方處方號(hào)，病人姓名，病人年齡，主

13、治醫(yī)師，處方內(nèi)容，附注藥品藥品編號(hào)，名稱，數(shù)量，單價(jià)，規(guī)格，禁用者，生產(chǎn)日期，有效期藥房藥品編號(hào)，名稱，數(shù)量，門診藥房編號(hào)，藥庫數(shù)量 整體E-R圖一個(gè)病人只有一張病歷且一張病歷只能屬于一個(gè)病人；一個(gè)病人一次只有一張掛號(hào)單，一張掛號(hào)單只能屬于一個(gè)病人；一個(gè)病人由一個(gè)醫(yī)師進(jìn)行診斷和開處方，一個(gè)醫(yī)師可以接診許多病人和為其開處方；一個(gè)病人只有一張?zhí)幏剑粡執(zhí)幏街荒軐儆谝粋€(gè)病人；一個(gè)病人可以進(jìn)行多項(xiàng)檢查，一項(xiàng)檢查也可以進(jìn)行診斷多個(gè)病人； 一個(gè)病人可以有多個(gè)收費(fèi)項(xiàng)目和收據(jù)，但一項(xiàng)收費(fèi)項(xiàng)目或收據(jù)只能對應(yīng)一個(gè)病人；收費(fèi)項(xiàng)目和收據(jù)是多對多關(guān)系；一份處方可以對應(yīng)多種藥品，一種藥品可以包含在多份處方里；藥房對其他各

14、實(shí)體的一對多的聯(lián)系；整體E-R圖如圖2-6所示：圖2-6門診醫(yī)療管理系統(tǒng)整體E-R圖3.系統(tǒng)設(shè)計(jì)3.1 系統(tǒng)模塊結(jié)構(gòu)設(shè)計(jì) 醫(yī)院門診醫(yī)療管理可以分為：門診掛號(hào)管理模塊，門診收費(fèi)管理模塊，藥房管理模塊，門診醫(yī)生模塊三大部分:門診收費(fèi)管理，門診收費(fèi)管理，門診收費(fèi)管各模塊的基本功能如下： （1）門診收費(fèi)管理基本功能。門診掛號(hào)門診掛號(hào)：病人進(jìn)行掛號(hào)收費(fèi)處理。輸入病人的信息：姓名、性別、年齡； 選擇病人類型、掛號(hào)類別、掛號(hào)科室、值班醫(yī)生；掛號(hào)的金額，是否實(shí)惠。點(diǎn)擊確定，保存該病人掛號(hào)的信息。 收費(fèi)門診收費(fèi)：對醫(yī)生給和病人開出的處方給和收費(fèi)。輸入掛號(hào)編碼，顯示掛號(hào)病人的信息以及處方的項(xiàng)目、數(shù)量、應(yīng)收、實(shí)收、

15、執(zhí)行科室；點(diǎn)擊收費(fèi)對該處方單進(jìn)行收費(fèi)。退費(fèi)處理：對已收取的費(fèi)用進(jìn)行退費(fèi)處理。輸入發(fā)票號(hào)，顯示要申請退費(fèi)的病人信息及退費(fèi)金額，點(diǎn)擊確定。收費(fèi)日結(jié)：對一天的收費(fèi)進(jìn)行結(jié)算交賬。收費(fèi)查詢未收費(fèi)處方查詢：依據(jù)查詢列中的分類、條件值、查詢的起止日期對病人未收費(fèi)處方信息進(jìn)行查詢。收費(fèi)查詢：依據(jù)查詢列中的分類、條件值、查詢的起止日期對病人收費(fèi)處方信息進(jìn)行查詢。統(tǒng)計(jì)科室收費(fèi)報(bào)表：依據(jù)執(zhí)行科室對收入進(jìn)行統(tǒng)計(jì)和導(dǎo)出數(shù)據(jù)庫。門診工作量報(bào)表：對門診工作量進(jìn)行統(tǒng)計(jì)和導(dǎo)出數(shù)據(jù)庫。收費(fèi)日結(jié)明細(xì)報(bào)表：對門診收費(fèi)日結(jié)明細(xì)報(bào)表進(jìn)行統(tǒng)計(jì)和導(dǎo)出數(shù)據(jù)庫。（3）藥房管理基本功能。出入庫管理請領(lǐng)支配：藥房向藥庫進(jìn)行領(lǐng)藥處理。選擇發(fā)藥庫房，在

16、請領(lǐng)藥品中輸入要請領(lǐng)的藥品信息，請領(lǐng)完須要的藥品后點(diǎn)擊保存。入庫審核：對入庫的藥品數(shù)據(jù)進(jìn)行審核。從提取中提取須要審核的入庫藥品的單據(jù)，點(diǎn)擊審核進(jìn)行入庫審核。入出庫單據(jù)補(bǔ)打：假如之前填寫的出入庫單據(jù)沒有打印須要打印的，進(jìn)入該模塊進(jìn)行補(bǔ)打入出庫單。盤點(diǎn)庫存查詢：對藥庫中的庫存藥品進(jìn)行查詢；選擇要查詢的庫房、藥品類別、藥品的拼音碼，對庫存的藥品進(jìn)行查詢。盤存報(bào)表打?。簩ΡP存的報(bào)表進(jìn)行打印。選擇查詢條件、盤存號(hào)和打印單據(jù)的顯示方式；對盤存報(bào)表進(jìn)行打印。查詢科室基藥統(tǒng)計(jì)：對科室基本的藥品進(jìn)行統(tǒng)計(jì)。選擇統(tǒng)計(jì)的起止日期和科室，對科室的基藥進(jìn)行統(tǒng)計(jì)。盤存查詢：對藥庫的藥品進(jìn)行查詢。選擇查詢的條件：庫房、藥品類

17、別、藥品拼音碼；對藥庫的藥品進(jìn)行查詢和導(dǎo)出。門診取藥查詢：對門診取藥的藥品信息進(jìn)行查詢。依據(jù)查詢列中的分類、條件值、查詢的起止日期對門診取藥的信息進(jìn)行查詢。統(tǒng)計(jì)藥房工作量報(bào)表：對藥房工作量報(bào)表進(jìn)行統(tǒng)計(jì)和導(dǎo)出數(shù)據(jù)庫。藥品日用量報(bào)表：要藥房藥品日用量報(bào)表進(jìn)行統(tǒng)計(jì)和導(dǎo)出數(shù)據(jù)庫。取藥管理門診取藥：進(jìn)過藥房的人對處方單據(jù)進(jìn)行審核后，門診把藥發(fā)給病人。門診退藥：病人有某種緣由須要退藥，可以通過該本門進(jìn)行退藥。（4）門診醫(yī)生基本功能。醫(yī)生工作站醫(yī)生對待診的病人先進(jìn)行病案登記；讓病人主訴下病人，主訴完后對該病人進(jìn)行診治，對該病人開醫(yī)囑，然后進(jìn)行醫(yī)囑保存。退改處方退改審核（未取藥）：對未取藥的審核單進(jìn)行退改。選

18、擇申請單號(hào)，輸入退費(fèi)的緣由，然后進(jìn)行審核。病人歷史信息查詢綜合醫(yī)囑信息查詢：查詢綜合醫(yī)囑信息。選擇查詢條件：編號(hào)查詢、病案號(hào)查詢、病人姓名查詢，查詢的起止日期，對病人醫(yī)囑進(jìn)行查詢。3.2 數(shù)據(jù)庫設(shè)計(jì) 以下是系統(tǒng)設(shè)計(jì)所用的主要數(shù)據(jù)表結(jié)構(gòu) 1、掛號(hào)處表3-1掛號(hào)處 Registration代碼名稱數(shù)據(jù)類型及長度是否可空備注ysbh編號(hào)Char(10)Primary keyzbys值班醫(yī)生Char(10)Not null2、病人信息表表3-2 病人信息表 patient代碼名稱數(shù)據(jù)類型及長度是否可空備注ghbh掛號(hào)編號(hào)Char(10)Primary keyxm姓名Char(10)Not nullxb

19、性別Char(10)Not nullnk年齡DatetimeNot nullsfzh身份證號(hào)DatmtimeNot null3、掛號(hào)單表3-3 掛號(hào)單 Hangs numbered certificate代碼名稱數(shù)據(jù)類型及長度是否可空備注ghbh掛號(hào)編號(hào)Char(10)Primary keyghfs掛號(hào)方式Char(10)Not nullbrxm病人姓名Char(10)Not nullzzys主治醫(yī)師Char(10)Not nullghrq掛號(hào)日期DatetimeNot null4、病歷信息表表3-4 病歷信息表 Medical record代碼名稱數(shù)據(jù)類型及長度是否可空備注blbh病歷編號(hào)C

20、har(10)Primary keybrxm病人姓名Char(10)Not nullblxx病歷信息Char(50)Not null5、病人信息表表3-4 病人信息表 patient代碼名稱數(shù)據(jù)類型及長度是否可空備注ghh掛號(hào)號(hào)Char(10)Primary keyxm姓名Char(10)Not nullnl年齡DatmtimeNot nullsfzh身份證號(hào)DatetimeNot nullsfzy是否住院Char(2)Not null6、開處方表3-6 開處方 Writes the prescription代碼名稱數(shù)據(jù)類型及長度是否可空備注cfh處方號(hào)Char(10)Primary keyc

21、fnr處方內(nèi)容Char(50)nullbrxm病人姓名Char(10)Not nullbrnl病人年齡datetimeNot nullfz附注Char(50)Not null7、醫(yī)師表3-7 醫(yī)師 doctor代碼名稱數(shù)據(jù)類型及長度是否可空備注ysh醫(yī)師號(hào)Char(10)Primary keyxm姓名Char(10)Not nullxb性別Char(10)Not nullzc職稱Char(10)Not nullnl年齡DatetimeNot nullgzsj工作時(shí)間DatetimeNot null8、檢查表3-8 檢查 Inspection代碼名稱數(shù)據(jù)類型及長度是否可空備注jyxh檢驗(yàn)序號(hào)Ch

22、ar(10)Primary keybrghh病人掛號(hào)號(hào)Char(10)Not nulljynr檢驗(yàn)內(nèi)容Char(50)Not nulljyys檢驗(yàn)醫(yī)師Char(10)Not null9、收費(fèi)項(xiàng)目表3-9 收費(fèi)項(xiàng)目 Fee item代碼名稱數(shù)據(jù)類型及長度是否可空備注brh病人號(hào)Char(10)Primary keysjxm收據(jù)項(xiàng)目Char(10)Not nullxmlb項(xiàng)目類別Char(10)Not nullxmyh項(xiàng)目序號(hào)datetimeNot nullsfry收費(fèi)人員Char(10)Not nullsfjr收費(fèi)金額decimar(18,2)Not null10、收據(jù)表3-10收據(jù) Recei

23、pt代碼名稱數(shù)據(jù)類型及長度是否可空備注sjh收據(jù)號(hào)Char(10)Primary keysjxm收據(jù)項(xiàng)目Char(10)Not nullssje所收金額Char(10)Not nullskrq收款日期datetimeNot null11、處方表3-11處方 Prescription代碼名稱數(shù)據(jù)類型及長度是否可空備注cfh處方號(hào)Char(10)Primary keybrxm病人姓名Char(10)Not nullbrnl病人年齡Char(10)Not nullzzys主治醫(yī)生Char(10)Not nullcfnr處方內(nèi)容Char(50)nullfz附注Char(50)Not null12、藥品

24、信息表表3-12 藥品信息表 medicine代碼名稱數(shù)據(jù)類型及長度是否可空備注ypbh藥品編號(hào)Char(10)Primary keymc名稱Char(10)Not nulldl數(shù)量Char(10)Not nulldj單價(jià)datetimeNot nullgg規(guī)格Char(10)Not nulljyz禁用者Char(10)Not nullscrq生產(chǎn)日期datetimeNot nullyxq有效期eatetimeNot null13、藥品出庫表3-13藥品出庫storehouse代碼名稱數(shù)據(jù)類型及長度是否可空備注ypbh藥品編號(hào)Char(10)Primary keymc名稱Char(10)Not

25、 nullsl數(shù)量Char(10)Not nullckrq出庫日期datetimeNot null14、藥品入庫表3-14藥品入庫 Drugs warehousing代碼名稱數(shù)據(jù)類型及長度是否可空備注ypbh藥品編號(hào)Char(10)Primary keymc名稱Char(10)Not nullsl數(shù)量Char(10)Not nullrkrq入庫日期datetimeNot null15、藥房表3-15藥房 Pharmacy代碼名稱數(shù)據(jù)類型及長度是否可空備注ypbh藥品編號(hào)Char(10)Primary keymc名稱Char(10)Not nullsl數(shù)量Char(10)Not nullmzyf

26、bh門診藥房編號(hào)datetimeNot nullyksl藥庫數(shù)量datetimeNot null4.系統(tǒng)實(shí)現(xiàn)本系統(tǒng)運(yùn)用PowerBuilder技術(shù)，以oracle作為后臺(tái)數(shù)據(jù)庫。PowerBuilder是一個(gè)用來進(jìn)行客戶/服務(wù)器開發(fā)的完全的可視化開發(fā)環(huán)境。由于PowerBuilder采納了面對對象和可視化技術(shù)，供應(yīng)可視化的應(yīng)用開發(fā)環(huán)境，使得我們利用PowerBuilder，可以便利快捷地開發(fā)出利用后臺(tái)服務(wù)器中的數(shù)據(jù)和數(shù)據(jù)庫管理系統(tǒng)的數(shù)據(jù)庫應(yīng)用程序。下面是本系統(tǒng)的一些界面實(shí)現(xiàn)1用戶登陸界面進(jìn)入登錄界面后，不同的用戶，如門診掛號(hào)模塊的運(yùn)用人員，輸入用戶編碼，然后在登陸口令中輸入密碼，單擊確定按鈕，

27、假如系統(tǒng)提示“不存在該用戶，或者密碼輸入錯(cuò)誤，則表示登記系統(tǒng)時(shí)運(yùn)用人員的代碼錯(cuò)誤或者密碼錯(cuò)誤，密碼正確，進(jìn)入該系統(tǒng)。假如須要更改運(yùn)用人員的密碼，在登記勝利時(shí)可以更改密碼。如圖所示圖4-2： 圖4-2 用戶登記界面部分代碼實(shí)現(xiàn)如下：/登錄if trim(sle_ucode.text) = '' thenmsg("請輸入用戶編碼！")sle_upwd.text= '' sle_ucode.setfocus()sle_ucode.selecttext(1, len(sle_ucode.text)return else if trim(sle_upw

28、d.text) = '' then msg("請輸入密碼！") sle_upwd.setfocus( ) return end ifend iflong ll_yhzidstring ls_yhzmcll_yhzid= dw_yhz.getitemnumber( dw_yhz.getrow( ) , "yhz")if not gnv_RightManager.of_right_has_userid(sle_ucode.text) thenmsgbox.msgbox("登錄提示", "不存在該用戶，請重新輸入!

29、")sle_ucode.setfocus()sle_ucode.selecttext(1,len(sle_ucode.text)returnend ifif not trim(gnv_RightManager.of_right_getpwd(sle_ucode.text, ll_yhzid) = sle_upwd.text thenmsgbox.msgbox("系統(tǒng)提示", "密碼輸入錯(cuò)誤,請重新輸入!")sle_upwd.setFocus()sle_upwd.selecttext(1,200)returnend ifselect xt_ks.

30、ksid,xt_ks.ksmc,xt_ks.kssx into :gnv_RightManager.ksid,:gnv_RightManager.ksmc,:gnv_RightManager.kssx from xt_ks, xt_yhz where xt_ks.ksid = xt_yhz.ksid and xt_yhz.yhzid = :ll_yhzid and isnull(tybz,0)= 0;if cbx_1.checked then /登陸勝利時(shí)更改密碼 parent.hide()open(w_chgpwd)end ifparent.hide()ib_exit = trueclose

31、withreturn(parent, sle_ucode.text)2門診收費(fèi)界面門診收費(fèi)窗口首先顯示的是一般的收費(fèi)項(xiàng)目。一般收費(fèi)窗口分為三屏，窗口的上方顯示病人信息和掛號(hào)信息。在掛號(hào)編碼處選擇掛號(hào)單號(hào)碼，在醫(yī)生處選擇病人就診的醫(yī)生。窗口就會(huì)上方顯示病人就診信息，中的左邊顯示就診和領(lǐng)用藥物信息以及所須要的費(fèi)用；單擊一行信息，就會(huì)在窗口中間的右邊顯示出這些信息的明細(xì)。窗口右下方顯示發(fā)票信息和收費(fèi)信息。發(fā)票號(hào)和合計(jì)系統(tǒng)已自動(dòng)給出。在支付方式處選擇支付方式，折扣方式處選擇折扣方式。在收取處輸入所收到的費(fèi)用，備注處可以添加備注。按F9收費(fèi)，出現(xiàn)一個(gè)窗口，將收費(fèi)信息保存。如圖4-2所示：圖4-2門診收費(fèi)

32、部分代碼如下Long ll_ypxhIF u_sele_yp.Visible THENu_sele_yp.chooseone(al_row)IF u_sele_yp.gettcbz() = 1 THEN /輸入的為套餐IF dw_main.RowCount() <> dw_main.GetRow() OR dw_main.Object.fyxhdw_main.GetRow() <> 0 THENu_sele_yp.clear_tcbz() /不行輸入套餐,執(zhí)行清套餐標(biāo)記操作MessageBox("提示","只有最終一行可輸入套餐!"

33、;)IF dw_main.Object.fyxhdw_main.GetRow() > 0 THENll_ypxh = dw_main.Object.fyxhdw_main.GetRow()iuo_ypxx.setypxx(ll_ypxh)iuo_ypxx.setyfkc()dw_main.Object.fymcdw_main.GetRow() = iuo_ypxx.getypxx("ypmc")dw_main.SetColumn('fysl')ELSEdw_main.SetText('')END IFRETURN 1END IFdw_m

34、ain.Object.fyxhdw_main.GetRow() = -1dw_main.Object.fymcdw_main.GetRow() = u_sele_yp.gettcmc()dw_main.Object.fysldw_main.GetRow() = 1dw_main.SetColumn('fysl')RETURN 1ELSEll_ypxh = u_sele_yp.getypxh()IF ll_ypxh = -1 THEN /錯(cuò)誤RETURN 1ELSE /正常返回IF wf_set_cf02(ll_ypxh,dw_main.Object.fysldw_main.Ge

35、tRow(),1,dw_main.GetRow() = 0 THENdw_main.SetColumn('fysl')RETURN 1END IFEND IFEND IFEND IFRETURN -13醫(yī)生工作站保存醫(yī)囑界面進(jìn)入醫(yī)生工作站，醫(yī)生給病人就診時(shí)給病人開醫(yī)囑。選擇藥品分類，輸 入 藥品的首拼碼，發(fā)藥量、藥品的用法、單次的劑量、給藥的時(shí)間然后暫掛。：圖4-3醫(yī)生工作站保存醫(yī)囑部門代碼如下/ 功能:新增一張?zhí)幏? 入?yún)?ai_RecipeType處方類別(1 西 2 中 3 草)Int li_PharmId,iLong ll_RecipeIdBoolean lb_HasS

36、ensCheckIf This.CheckDataChanged() < 1 ThenReturn -1End If/ Script: w_ys_mz_clinic_recipe:addbill()函數(shù)/ Reason: BSEMR4.X_V2.2->增加門診處方"每張西藥、成藥方不得超過5種藥品、應(yīng)當(dāng)填寫臨床診斷"的限制/ Modified By: 何俊 Date: 2012-03-08Long ll_ExistsIf iu_mzys_cs.Options.NeedDiag = 1 and iu_mzys_cs.Doctor.Id <> '

37、9999' ThenSelect count(*) Into :ll_Exists From YS_MZ_jbzd Where JZXH = :iu_mzys_cs.Patient.ClinicId and tjbz = 1 and zfpb =0 Using SQLHIS;If ll_Exists = 0 Or IsNull(ll_Exists) ThenMessageBox('提示','應(yīng)當(dāng)先填寫臨床診斷（提交后有效）!')iu_mzys_cs.iw_Frame.Post CallFunction('Diag', iu_mzys_cs

38、.Patient.ClinicId,0)Return -1End IfEnd If/ 是否存在皮試藥品lb_HasSensCheck = FalseFor i = 1 To dw_Detail.RowCount()If Not IsNull(dw_Detail.Object.Pspbi) And dw_Detail.Object.Pspbi = 1 Thenlb_HasSensCheck = TrueEnd IfIf SensCheck.IsSensitive(Long(dw_Detail.Object.Ypxhi) = 1 Thenlb_HasSensCheck = TrueEnd IfNe

39、xtIf dw_Head.RowCount() > 0 Thenll_RecipeId = dw_Head.Object.Cfsb1If Not IsNull(ll_RecipeId) And ll_RecipeId > 0 ThenIf Not lb_HasSensCheck Then / 存在皮試記錄時(shí)暫不提交處方If iu_mzys_cs.Patient.LockRecipe(ll_RecipeId, False) < 1 ThenMessageBox('提示', "處方解鎖失敗!n" + iu_mzys_cs.Patient.Err

40、orInfo)End IfIf iu_mzys_cs.Patient.LockCheck(2, False,ll_RecipeId) < 1 ThenMessageBox('提示', "費(fèi)用單解鎖失敗!n" + iu_mzys_cs.Patient.ErrorInfo)End IfEnd IfEnd IfIf iu_mzys_cs.Patient.LockCheck(3, False,ll_RecipeId) < 1 ThenMessageBox('提示', "皮試單解鎖失敗!n" + iu_mzys_cs.P

41、atient.ErrorInfo)End IfEnd Ifdw_Head.Reset()dw_Head.InsertRow(0)This.RecipeType = ai_RecipeTypeChoose Case This.RecipeTypeCase 1Case 2Case 3Case ElseEnd Choose/ Script - addbill ( integer ai_recipetype ) / Reason: 假如是草藥方,則草藥方按鈕有效if ai_RecipeType = 3 Thencb_herbal.Enabled = TrueElsecb_herbal.Enabled = FalseEnd Ifdw_Head.Object.JZXH1 = iu_mzys_cs.Patient.ClinicId / 就診序號(hào)dw_Head.Object.Cflx1 = ai_RecipeType / 處方類型dw_Head.Object.Ksdm1 = iu_mzys_cs.Doctor.DeptId / 科室代碼dw_Head.Object.Ysdm1 = iu_mzys_cs.Doctor.Id / 醫(yī)生代碼dw_Head.Object.Kfrq1 = gf_Server_Date() /