門診醫(yī)療管理系統(tǒng)[包含詳細(xì)的需求分析、系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)代碼]

1、醫(yī)院存儲(chǔ)系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)摘 要醫(yī)院信息系統(tǒng)HIS（Hospital Information System）為醫(yī)院所屬各部門提供病人診治信息和行政管理信息的收集、存儲(chǔ)、處理、提取和數(shù)據(jù)交換的能力，醫(yī)院存儲(chǔ)系統(tǒng)是其中的一個(gè)重要子系統(tǒng)，論文論述了醫(yī)院存儲(chǔ)系統(tǒng)開發(fā)思路、設(shè)計(jì)與實(shí)現(xiàn)等。論文針對(duì)中小型醫(yī)院設(shè)計(jì)開發(fā)了一個(gè)基于C/S結(jié)構(gòu)的醫(yī)院信息管理系統(tǒng)的一個(gè)子系統(tǒng)醫(yī)院醫(yī)療存儲(chǔ)系統(tǒng)的開發(fā)。通過計(jì)算機(jī)和網(wǎng)絡(luò)技術(shù)實(shí)現(xiàn)對(duì)醫(yī)院醫(yī)療信息的全過程追蹤和動(dòng)態(tài)管理，從而簡(jiǎn)化了患者的診療過程，優(yōu)化了就診環(huán)境。論文首先分析介紹了系統(tǒng)開發(fā)的背景、國(guó)內(nèi)外的研究現(xiàn)狀、運(yùn)用中遇到的問題以及本文的構(gòu)成；其次，以醫(yī)院信息管理系統(tǒng)中門診掛號(hào)子系

2、統(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)；最后，對(duì)已進(jìn)行的研究和開發(fā)工作進(jìn)行了總結(jié)和展望?！娟P(guān)鍵詞】醫(yī)院存儲(chǔ)系統(tǒng)，醫(yī)療管理，C/S結(jié)構(gòu),設(shè)計(jì)實(shí)現(xiàn)201 緒論1.1 系統(tǒng)開發(fā)背景醫(yī)院醫(yī)療是醫(yī)院管理的門面，流量大，手續(xù)較繁鎖，在手工方式下，醫(yī)護(hù)人員要做大量不必要的重復(fù)工作、效率低、準(zhǔn)確性差、不方便管理，影響工作效率，造成了很多就診病人得不到合理有效的快捷就診服務(wù)，甚至影響醫(yī)療質(zhì)量，為此，越來越多的醫(yī)院加快了信息化建設(shè)的步伐，醫(yī)院醫(yī)療存儲(chǔ)管理系統(tǒng)能夠有效地優(yōu)化服務(wù)和工作環(huán)境、使病員和醫(yī)生情緒得以放松，提高了服務(wù)效率和質(zhì)量、樹立了醫(yī)院的良好形象，

3、使門診工作可以高效有序的運(yùn)轉(zhuǎn)，提高了醫(yī)院的經(jīng)濟(jì)效益，促進(jìn)醫(yī)院的發(fā)展。1.2 國(guó)內(nèi)外研究現(xiàn)狀我國(guó)醫(yī)院信息系統(tǒng)（HIS）的發(fā)展階段可以分為三個(gè)部分:第一階段，是醫(yī)院管理信息系統(tǒng)建設(shè)階段（HMIS）;第二階段，是醫(yī)院臨床信息系統(tǒng)建設(shè)階段（HCIS）;第三階段，是建設(shè)區(qū)域衛(wèi)生信息系統(tǒng)階段（GMIS）。在實(shí)現(xiàn)醫(yī)院信息化的過程中，標(biāo)準(zhǔn)化是一個(gè)不能回避的問題。流程的標(biāo)準(zhǔn)化是和醫(yī)院的改革，醫(yī)院的管理科學(xué)化包括現(xiàn)代醫(yī)院建設(shè)密不可分的。我國(guó)醫(yī)療信息化多數(shù)還停留在第一個(gè)階段。據(jù)業(yè)內(nèi)人士介紹，2005年，國(guó)內(nèi)的醫(yī)院信息系統(tǒng)（HIS）廠商有1000多家，其中比較大的有100多家。各個(gè)醫(yī)院使用不同廠商的HIS，硬件環(huán)境也

4、不盡相同，異質(zhì)系統(tǒng)平臺(tái)和非標(biāo)準(zhǔn)信息格式阻礙了同行間及行業(yè)間的信息交流。當(dāng)涉及到病人轉(zhuǎn)診等問題時(shí)，各方無法直接實(shí)現(xiàn)電子信息的交換，只能通過手工操作來完成。國(guó)際上醫(yī)院信息化管理大致可分為三個(gè)階段：第一個(gè)十年，集中在開發(fā)醫(yī)院行政管理的功能上，如財(cái)務(wù)收費(fèi)、住院病人和門診病人管理等。第二個(gè)十年，在繼續(xù)完成和實(shí)現(xiàn)醫(yī)院管理信息計(jì)算機(jī)化的同時(shí)，開發(fā)者的努力已進(jìn)入醫(yī)療信息的處理領(lǐng)域，如病人醫(yī)療處理系統(tǒng)，實(shí)驗(yàn)室系統(tǒng)等。最后一個(gè)十年至今，研究者又把重點(diǎn)放在了病人床邊系統(tǒng)、醫(yī)院影像處理系統(tǒng)、病人計(jì)算機(jī)化病案、統(tǒng)一的醫(yī)學(xué)語言系統(tǒng)等方面。醫(yī)院信息系統(tǒng)正在經(jīng)歷著小型化、智能化和集成化的改造過程。1.3 系統(tǒng)的基本構(gòu)成醫(yī)院醫(yī)

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

6、情，然后對(duì)病人進(jìn)行診治，給病人進(jìn)行檢查、檢查、手術(shù)、住院申請(qǐng)，申請(qǐng)單將自動(dòng)傳到收費(fèi)處和醫(yī)技科室；可以查詢病人的歷史信息；對(duì)病人的退費(fèi)、退改處方要求進(jìn)行審核、處理。2 需求分析2.1 醫(yī)院醫(yī)療簡(jiǎn)介醫(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ī)院掛號(hào)、急癥、醫(yī)療卡服務(wù)、就診卡的設(shè)計(jì)與管理、所掛科目、科室的位置、掛號(hào)收費(fèi)、登記。（2）退號(hào)對(duì)病人掛號(hào)做出退費(fèi)處理。（3）就診根據(jù)具體的癥狀進(jìn)行檢查、就診，并開

7、處方。（4）收費(fèi)根據(jù)檢查的項(xiàng)目及醫(yī)生所開處方的具體藥品，和劃價(jià)系統(tǒng)中的具體金額進(jìn)行收費(fèi)。提供與門診收費(fèi)相關(guān)的各類報(bào)表、門診醫(yī)療統(tǒng)計(jì)、門診科室及工作人員部分核算數(shù)據(jù)和工作量統(tǒng)計(jì)等。 （5）發(fā)藥藥房根據(jù)處方，檢查藥房?jī)?nèi)是否有足夠的藥方上需要的藥，是否需要去藥房去取以補(bǔ)足貨源。核對(duì)已收費(fèi)處方無誤后予以配藥、發(fā)藥處理。（6）藥品管理各藥房以藥庫(kù)為中心，請(qǐng)領(lǐng)藥品、入庫(kù)、調(diào)價(jià)等。2.2 主要業(yè)務(wù)數(shù)據(jù)流程分析² 門診掛號(hào)病人首先可以預(yù)約掛號(hào)；到醫(yī)院掛號(hào)后，先確定是不是急診，病人有沒有磁卡，有先讀取磁卡的信息；為病人選擇科室，病人選擇選擇醫(yī)生的級(jí)別，醫(yī)院為該病人指派醫(yī)生（查詢?cè)摷?jí)別該科室各醫(yī)生當(dāng)前侯

8、診數(shù)，選擇候診數(shù)最少的該級(jí)別當(dāng)班醫(yī)生），對(duì)該病人收取掛號(hào)費(fèi)用，登記掛號(hào)信息。如圖1所示：圖1 病人掛號(hào)數(shù)據(jù)流程圖² 門診退號(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)用；對(duì)退出的費(fèi)用記賬帳，打印出退號(hào)憑證。如圖2所示：圖2 病人退號(hào)數(shù)據(jù)流程圖² 門診就醫(yī)病人掛號(hào)到指定醫(yī)生就診，醫(yī)生詢問病人是否是復(fù)診或者初診（復(fù)診的話查詢病人的歷史就診信息）；病人向醫(yī)生敘述病情，醫(yī)生記錄病情和病歷；醫(yī)生對(duì)病人闡述的病情給與診斷，診斷然后給病人開藥（配置禁忌檢

9、查，詢問病人同意否，同意的話給病人寫電子病歷）；需要做化驗(yàn)、手術(shù)、檢查、住院的，給該病人開申請(qǐng)單，病人拿著醫(yī)生開出的藥品單；化驗(yàn)、手術(shù)、檢查、住院申請(qǐng)單到收費(fèi)處繳費(fèi)，繳完費(fèi)用后到拿著單據(jù)到門診藥房取藥；化驗(yàn)室、檢查室做化驗(yàn)和檢驗(yàn)；手術(shù)室領(lǐng)取手術(shù)時(shí)間表；到住院部讓住院護(hù)士安排床位；如圖3所示：圖2-3醫(yī)生就診數(shù)據(jù)流程圖² 門診收費(fèi)門診收費(fèi)是對(duì)病人在門診就醫(yī)時(shí)所有的費(fèi)用都在此處繳納。接受病人的交費(fèi)單據(jù)，刷卡讀取該病人的收費(fèi)單據(jù)，對(duì)病人費(fèi)用進(jìn)行收費(fèi)。收費(fèi)后打印發(fā)票，給病人一張收費(fèi)單據(jù)。費(fèi)用每日結(jié)算后打入財(cái)務(wù)科。如圖4所示：圖4門診收費(fèi)流程圖² 門診藥房發(fā)藥藥房根據(jù)處方，檢查藥房?jī)?nèi)

10、是否有足夠的藥房上需要的藥，是否需要去藥房去補(bǔ)足貨源；根據(jù)藥品的限期及庫(kù)存下限來進(jìn)行缺藥、失效預(yù)告、對(duì)藥品進(jìn)行數(shù)量、金額雙重控制；核對(duì)已收費(fèi)處方無誤后給與病人配藥、發(fā)藥處理。如圖5所示：圖5 藥房發(fā)藥流程圖² 門診藥房管理對(duì)門診藥房的藥品出入庫(kù)進(jìn)行操作登記。對(duì)門診掛號(hào)的病人需要用藥時(shí)，需要醫(yī)生開出的處方單取藥，如需退藥，需要申請(qǐng)，說明退藥的原因，在得到審核通過后方可進(jìn)行退藥操作。保證藥品的及時(shí)供應(yīng)，不耽誤病人的病情，通過對(duì)各種藥品的入庫(kù)及出庫(kù)情況進(jìn)行詳細(xì)的登記，保證不斷藥，藥品的質(zhì)量安全。提供各種藥品的各種取用清單的查詢與打印。如圖6所示：圖6 門診藥房管理流程圖2.3數(shù)據(jù)分析-整體

11、E-R圖圖7門診醫(yī)療管理系統(tǒng)整體E-R圖3 系統(tǒng)存儲(chǔ)設(shè)計(jì)3.1系統(tǒng)模塊結(jié)構(gòu)設(shè)計(jì)醫(yī)院醫(yī)療存儲(chǔ)管理系統(tǒng)可以分為：門診掛號(hào)管理模塊，門診收費(fèi)管理模塊，藥房管理模塊，門診醫(yī)生模塊四大部分。結(jié)構(gòu)圖如圖8所示：查詢收費(fèi)查詢查詢醫(yī)院醫(yī)療管理系統(tǒng) 統(tǒng)醫(yī)療掛號(hào)管理藥房管理醫(yī)療收費(fèi)管理門診掛號(hào)統(tǒng)計(jì)發(fā)票管理統(tǒng)計(jì)收費(fèi)取藥管理統(tǒng)計(jì)盤點(diǎn)出入庫(kù)管理醫(yī)生工作站退改處方醫(yī)療醫(yī)生模塊病人信息查詢圖8 系統(tǒng)模塊結(jié)構(gòu)圖各模塊的基本功能如下：（1）醫(yī)療掛號(hào)管理基本功能。門診掛號(hào)門診掛號(hào)：病人進(jìn)行掛號(hào)收費(fèi)處理。輸入病人的信息：姓名、性別、年齡；選擇病人類型、掛號(hào)類別、掛號(hào)科室、值班醫(yī)生；掛號(hào)的金額，是否優(yōu)惠。點(diǎn)擊確定，保存該病人掛號(hào)的信

12、息。查詢掛號(hào)查詢：按照掛號(hào)日期、掛號(hào)編碼、掛號(hào)有效期、姓名、性別、年齡；病人類型、掛號(hào)類別、掛號(hào)科室、值班醫(yī)生、掛號(hào)員、交款號(hào)等對(duì)病人掛號(hào)的信息進(jìn)行查詢。統(tǒng)計(jì)分為：掛號(hào)科室統(tǒng)計(jì)報(bào)表、掛號(hào)醫(yī)生統(tǒng)計(jì)報(bào)表、掛號(hào)分類統(tǒng)計(jì)報(bào)表、掛號(hào)病人類型報(bào)表。發(fā)票管理：對(duì)發(fā)票的領(lǐng)用情況及使用情況進(jìn)行詳細(xì)登記。（2）門診收費(fèi)管理基本功能。收費(fèi)門診收費(fèi)：對(duì)醫(yī)生給與病人開出的處方給與收費(fèi)。輸入掛號(hào)編碼，顯示掛號(hào)病人的信息以及處方的項(xiàng)目、數(shù)量、應(yīng)收、實(shí)收、執(zhí)行科室；點(diǎn)擊收費(fèi)對(duì)該處方單進(jìn)行收費(fèi)。收費(fèi)查詢未收費(fèi)處方查詢：按照查詢列中的分類、條件值、查詢的起止日期對(duì)病人未收費(fèi)處方信息進(jìn)行查詢。統(tǒng)計(jì)分為科室收費(fèi)報(bào)表、門診工作臺(tái)帳、門

13、診工作量報(bào)表、收費(fèi)日結(jié)明細(xì)報(bào)表、發(fā)票使用情況統(tǒng)計(jì)表。（3）藥房管理基本功能。出入庫(kù)管理分為：請(qǐng)領(lǐng)計(jì)劃、入庫(kù)審核、入出庫(kù)單據(jù)補(bǔ)打、出庫(kù)開單。盤點(diǎn)分為：庫(kù)存查詢、庫(kù)存盤點(diǎn)、盤存審核、盤存報(bào)表打印。查詢分為：入庫(kù)查詢、科室基藥統(tǒng)計(jì)、盤點(diǎn)查詢、盤存查詢、門診取藥查詢、門診退藥查詢、合理用藥咨詢。統(tǒng)計(jì)分為：藥房人員工作量統(tǒng)計(jì)、藥房工作量報(bào)表、藥品日用量報(bào)表。取藥管理分為：處方審核、門診取藥、門診退藥、門診擺藥、門診換藥、換藥審核。（4）門診醫(yī)生基本功能。醫(yī)生工作站醫(yī)生對(duì)待診的病人先進(jìn)行病案登記；讓病人主訴下病人，主訴完后對(duì)該病人進(jìn)行診治，對(duì)該病人開醫(yī)囑，然后進(jìn)行醫(yī)囑保存。診斷完后病情后認(rèn)為病人需要做檢驗(yàn)

14、、檢查、手術(shù)、住院；可以詢問病人是否需要，病人需要的話，給病人開檢查、檢驗(yàn)、手術(shù)、住院申請(qǐng)單。退改處方退改審核（未取藥）：對(duì)未取藥的審核單進(jìn)行退改。選擇申請(qǐng)單號(hào)，輸入退費(fèi)的原因，然后進(jìn)行審核。病人歷史信息查詢分為：綜合醫(yī)囑信息查詢、綜合病歷查詢、綜合病案查詢。3.2數(shù)據(jù)庫(kù)設(shè)計(jì)以下是系統(tǒng)設(shè)計(jì)所用的主要數(shù)據(jù)表結(jié)構(gòu) 1、掛號(hào)處表3-1掛號(hào)處 Registration代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注bh編號(hào)Char(10)Primary keyzbys值班醫(yī)生Char(10)Not null2、病人信息表表3-2 病人信息表 patient代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注ghbh掛號(hào)編號(hào)Char(

15、10)Primary keyxm姓名Char(10)Not nullxb性別Char(10)Not nullnk年齡DatetimeNot nullsfzh身份證號(hào)DatmtimeNot null3、掛號(hào)單表3-3 掛號(hào)單 Hangs numbered certificate代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注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 病歷信息表 Medi

16、cal record代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注blbh病歷編號(hào)Char(10)Primary keybrxm病人姓名Char(10)Not nullblxx病歷信息Char(50)Not null5、病人信息表表3-4 病人信息表 patient代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注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ù)類

17、型及長(zhǎng)度是否可空備注cfh處方號(hào)Char(10)Primary keycfnr處方內(nèi)容Char(50)nullbrxm病人姓名Char(10)Not nullbrnl病人年齡datetimeNot nullfz附注Char(50)Not null7、醫(yī)師表3-7 醫(yī)師 doctor代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注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 檢查 I

18、nspection代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注jyxh檢驗(yàn)序號(hào)Char(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ù)類型及長(zhǎng)度是否可空備注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)金額dec

19、imar(18,2)Not null10、收據(jù)表3-10收據(jù) Receipt代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注sjh收據(jù)號(hào)Char(10)Primary keysjxm收據(jù)項(xiàng)目Char(10)Not nullssje所收金額Char(10)Not nullskrq收款日期datetimeNot null11、藥品信息表表3-11 藥品信息表 medicine代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注ypbh藥品編號(hào)Char(10)Primary keymc名稱Char(10)Not nulldl數(shù)量Char(10)Not nulldj單價(jià)datetimeNot nullgg規(guī)格Char(10)Not

20、nulljyz禁用者Char(10)Not nullscrq生產(chǎn)日期datetimeNot nullyxq有效期eatetimeNot null12、藥房表3-15藥房 Pharmacy代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注ypbh藥品編號(hào)Char(10)Primary keymc名稱Char(10)Not nullsl數(shù)量Char(10)Not nullmzyfbh門診藥房編號(hào)datetimeNot nullyksl藥庫(kù)數(shù)量datetimeNot null13、藥品采購(gòu)表3-16藥品采購(gòu) purchase代碼名稱數(shù)據(jù)類型及長(zhǎng)度是否可空備注ypbh藥品編號(hào)Char(10)Primary keymc

21、名稱Char(10)Not nullsl數(shù)量Char(10)Not nullcgrj采購(gòu)時(shí)間datetimeNot null4 存儲(chǔ)系統(tǒng)實(shí)現(xiàn)本系統(tǒng)是以SQL-2005作為后臺(tái)數(shù)據(jù)庫(kù)。采用了面向?qū)ο蠛涂梢暬夹g(shù)，提供可視化的應(yīng)用開發(fā)環(huán)境，可以方便快捷地開發(fā)出利用后臺(tái)服務(wù)器中的數(shù)據(jù)和數(shù)據(jù)庫(kù)管理系統(tǒng)的數(shù)據(jù)庫(kù)應(yīng)用程序。下面是本系統(tǒng)的一些界面實(shí)現(xiàn)1醫(yī)療收費(fèi)界面醫(yī)療收費(fèi)窗口首先顯示的是普通的收費(fèi)項(xiàng)目，如果不是顯示普通的收費(fèi)，按下F5鍵即可。普通收費(fèi)窗口分為三屏，窗口的上方顯示病人信息和掛號(hào)信息。在掛號(hào)編碼處選擇掛號(hào)單號(hào)碼，在醫(yī)生處選擇病人就診的醫(yī)生。窗口就會(huì)中間顯示病人就診信息，中的左邊顯示就診和領(lǐng)用藥物

22、信息以及所需要的費(fèi)用；單擊一行信息，就會(huì)在窗口中間的右邊顯示出這些信息的明細(xì)。窗口下方顯示發(fā)票信息和收費(fèi)信息。發(fā)票號(hào)和合計(jì)系統(tǒng)已自動(dòng)給出。在支付方式處選擇支付方式，折扣方式處選擇折扣方式。在收取處輸入所收到的費(fèi)用，備注處可以添加備注。單擊，出現(xiàn)一個(gè)窗口，將收費(fèi)信息保存。部分代碼實(shí)現(xiàn)如下：/收費(fèi)if dw_fyxx.rowcount( ) = 0 then msg("無收費(fèi)項(xiàng)目！")return end if /進(jìn)行收費(fèi)if dec(st_sq.text) < 0 thenmsg("請(qǐng)輸入正確的收取金額！")st_sq.text= "&qu

23、ot;st_zb.text= "" returnend ifif dec(st_zb.text) < 0 or st_zb.text='' thenmsg("收取的金額不足！")st_sq.text= ""st_zb.text= "" returnend if/保存數(shù)據(jù)nvoc_update datadatastore ds_tempds_temp1=ids_fyd ds_temp2=ids_fydmxds_temp3=ids_sfds_temp4=ids_zfxxds_temp5=ids_y

24、zxxif ids_grzh.rowcount()>0 thends_temp6= ids_grzhend ifif data.of_update(ds_temp)=false thenMessageBox("錯(cuò)誤","保存失?。?quot;,StopSign!)messagebox("錯(cuò)誤原因", data.errtext, StopSign!)/窗口初始化/if not w_parent.ii_lx=2 thenw_parent.wf_init()/如果不是特殊門診就初始化 st_sq.post setfocus()end ifsql

25、ca.autocommit= true /可以保存ibl_cansave=truew_parent.dw_brxx.insertrow(0)datawindowchild dwc_childw_parent.dw_brxx.getchild("ghid",dwc_child)dwc_child.settransobject( sqlca)dwc_child.retrieve( )parent.event ue_clearhj()2醫(yī)生工作站保存醫(yī)囑界面進(jìn)入醫(yī)生工作站，醫(yī)生給病人就診時(shí)給病人開醫(yī)囑。選擇藥品分類，輸入藥品的代碼，發(fā)藥量、藥品的用法、單次的劑量、給藥的時(shí)間；保存

26、數(shù)據(jù)保存醫(yī)囑，首先保存治療信息和注射信息；更新醫(yī)囑中的處方號(hào)，因?yàn)樘幏教?hào)直接跟收費(fèi)掛鉤，（同一類項(xiàng)目得到同一個(gè)處方號(hào)），然后調(diào)用存儲(chǔ)過程進(jìn)行醫(yī)囑計(jì)價(jià)；將處方醫(yī)囑信息加入病歷中，判斷是否打印單據(jù)。如圖所示：圖 醫(yī)生工作站保存醫(yī)囑部分代碼實(shí)現(xiàn)如下：/醫(yī)生long ll_yzh, ll_yzxh, ll_row, ll_yzrow/醫(yī)囑序號(hào)、醫(yī)囑以及子囑的行號(hào)long ll_yzhsl /醫(yī)囑號(hào)數(shù)量string ls_yzh, ls_yzh2, ls_yzh3, ls_yzh4 /醫(yī)囑號(hào)列表long ll_yzfzh ,ll_zssl= 0 ,ll_zlsl =0 /醫(yī)囑分組號(hào), 數(shù)量boolean

27、 lb_ypbz /藥品醫(yī)囑標(biāo)志integer li_yzxmid,li_temp /處理超額劑量datetime tBoolean ll_pdzl = false, lb_pdzld= false /處理是否能開注射單, 初始值 falseinteger ll_derow, ni string ls_yzh_zs, ls_yz_zlt= datetime(gf_getserverdatetime() /取得當(dāng)前時(shí)間if dw_yz.accepttext( )= -1 thenmessageBox("提示","你的輸入有誤!")returnend if/

28、保存數(shù)據(jù)sqlca.autocommit= falseif dw_yz.update(true, false)=-1 then /注意true,falserollback;sqlca.autocommit= trueMessageBox("錯(cuò)誤","醫(yī)囑保存失?。?quot;)returnend iflong ll_zldh, ll_zsdhinteger li/產(chǎn)生治療號(hào)if ll_zlsl >0 then ll_zldh= long(gf_gethmb("mzzldh", ll_zlsl) - ll_zlsl for ll_row =1 to ds_zl.rowcount()ll_zldh +;ds_zl.setitem(ll_row, "zldh",ll_zldh)/觸發(fā)器插入 mys_zld_zx next if ds_zl.update(true, false)=-1