醫(yī)院門診收費系統(tǒng)畢業(yè)論文

1、<p><b>　　摘要</b></p><p>　　醫(yī)院門診收費系統(tǒng)是適應(yīng)時代發(fā)展的需要，提高管理的效率而開發(fā)設(shè)計的。通過對信息的收集、存儲、傳遞、統(tǒng)計、分析、綜合查詢、報表輸出和信息共享，及時為醫(yī)院領(lǐng)導(dǎo)及各部門管理人員提供全面、準確的各種數(shù)據(jù)。實現(xiàn)了醫(yī)院管理的簡單化和規(guī)劃化，提高了醫(yī)院的工作效率，從而使醫(yī)院能夠以少的投入獲得更好的社會效益與經(jīng)濟效益。 </p>

2、<p>　　作為計算機應(yīng)用的一部分,使用計算機對客戶信息進行管理,具有著手工管理所無法比擬的優(yōu)點.例如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點能夠極大地提高門診收費的效率,也是一個醫(yī)院的科學(xué)化、正規(guī)化管理,與世界接軌的重要條件。</p><p>　　醫(yī)院門診收費管理系統(tǒng)是典型的信息管理系統(tǒng),其主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應(yīng)用程序的開發(fā)兩個方面。對于前者

3、要求建立起一致性、完整性強和安全性好的數(shù)據(jù)庫。而對于后者則要求應(yīng)用程序具有功能完備,易使用等特點。</p><p>　　經(jīng)過分析如此情況,決定使用微軟公司的Visual C++開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是可視化界面這一能方便而簡潔操縱數(shù)據(jù)庫的對話框窗體,后臺采用MS Server2000</p><p>　　關(guān)鍵字 面向?qū)ο?；?shù)據(jù)庫；Visual C++6.0；醫(yī)

4、院門診收費系統(tǒng)；SQL Server2000。</p><p><b>　　Abstract</b></p><p>　　The hospital outpatient service charge system meets the time need to develop, enhances the management the efficiency to deve

5、lop the design .Through to the information collection, the memory, the transmission, the statistics, the analysis, the synthesis inquiry, the report form output and information sharing, promptly comprehensively

6、provides, the accurate each kind of data for the hospital leader and various departments administrative personnel. Has realized the hospital management simp</p><p>　　As a computer application part, uses the

7、computer to carry on the management for the customer information, is having the merit which the manual administration center is unable to compare For example: Retrieves, the search rapidly convenient, the reliability hi

8、gh, the reserves big, the secrecy good, the life long, the cost is low and soon. These merits can enormously enhance the outpatient service charge the efficiency, also is a hospital scientific style, the standardized man

9、agement, connects r</p><p>　　The hospital outpatient service charge management system management system is the typical information management system, it mainly includes the backstage database the establishme

10、nt and the maintenance as well as front end the application procedure development two aspects. Establishes the uniformity, the integrity regarding former request is strong and the secure good database. But requests the a

11、pplication procedure regarding latter to have the function completely, is easy to use and so on the ch</p><p>　　After the analysis so situation, decided uses Microsoft Corporation Visual the C++ development

12、kit, uses each kind of object-oriented development kit which it provides, the visible contact surface this can facilitate in particular but succinctly operates the database the dialog box window, the backstage uses MS Se

13、rver2000</p><p>　　Keywords Object-oriented; Database; Visual C++6.0; Hospital outpatient service charge system; SQL Server2000目錄</p><p><b>　　緒論1</b></p><p>　　1 需求分析2

14、</p><p><b>　　1.1實際背景2</b></p><p>　　1.2系統(tǒng)的功能需求和性能需求2</p><p>　　1.2.1功能需求2</p><p><b>　　1.3系統(tǒng)目標3</b></p><p>　　1.4可行性分析3</p>

15、<p>　　1.4.1 技術(shù)可行性3</p><p>　　1.4.2 操作可行性4</p><p>　　1.5系統(tǒng)總體設(shè)計4</p><p>　　2 開發(fā)工具的選擇及簡介5</p><p>　　2.1開發(fā)工具的選擇5</p><p>　　2.2開發(fā)工具的簡介5</p><

16、p>　　2.2.1Visual C++簡介5</p><p>　　2.2.2 MS SQL 2000簡介6</p><p>　　3 系統(tǒng)總體設(shè)計7</p><p>　　3.1系統(tǒng)功能總體設(shè)計7</p><p>　　3.2數(shù)據(jù)庫設(shè)計8</p><p>　　3.2.1數(shù)據(jù)庫的理論基礎(chǔ)8</p>

17、<p>　　3.2.2數(shù)據(jù)庫表的設(shè)計9</p><p>　　4 系統(tǒng)詳細設(shè)計與實現(xiàn)11</p><p>　　4.1界面設(shè)計11</p><p>　　4.1.1系統(tǒng)設(shè)置界面12</p><p>　　4.1.2 信息管理界面14</p><p>　　4.1.3 收費管理界面15</p>

18、<p>　　4.1.4 數(shù)據(jù)統(tǒng)計界面16</p><p>　　4.2數(shù)據(jù)庫表的腳本文件17</p><p>　　4.3各模塊功能設(shè)計與實現(xiàn)20</p><p>　　4.3.1系統(tǒng)設(shè)置模塊設(shè)計20</p><p>　　4.3.2信息管理模塊22</p><p>　　4.3.3收費管理模塊25&l

19、t;/p><p>　　4.3.4統(tǒng)計查詢管理模塊：33</p><p>　　4.4系統(tǒng)集成35</p><p>　　5 系統(tǒng)測試36</p><p>　　5.1測試基礎(chǔ)36</p><p>　　5.2各模塊測試36</p><p>　　5.3集成測試37</p>&l

20、t;p><b>　　結(jié)論38</b></p><p><b>　　致 謝39</b></p><p><b>　　參考文獻40</b></p><p>　　醫(yī)院門診收費管理系統(tǒng)</p><p><b>　　緒論</b></p>

21、<p>　　隨著信息科學(xué)技術(shù)的迅速發(fā)展，當今醫(yī)學(xué)科學(xué)的研究對計算機技術(shù)的依賴性越來越強，醫(yī)院的信息化建設(shè)已經(jīng)迫在眉捷，而門診部是醫(yī)院的一個重要部門，也是病人就診的第一個環(huán)節(jié)，是醫(yī)院直接向社會廣大患者提供醫(yī)療服務(wù)的窗口之一，門診部的信息化建設(shè)直接關(guān)系到整個醫(yī)院的信息化建設(shè)的發(fā)展水平。如今我國人民群眾的生活水平不斷的提高，人們對醫(yī)療健康服務(wù)質(zhì)量的需求越來越高，加上現(xiàn)在都市人的生活節(jié)奏越來越快，如何更方便人們的就診、減少不必要的排隊

22、環(huán)節(jié)、實現(xiàn)病人資料（患者基本情況、就診記錄及檢查結(jié)果與治療情況等）永久性存儲，避免以往因病歷資料及檢查治療結(jié)果丟失而造成的延長診斷時間、重復(fù)檢查、增加患者經(jīng)濟負擔(dān)、甚至于造成醫(yī)療糾紛等后果，是醫(yī)院門診部信息化建設(shè)首先要考慮的問題。而向患者提供門診醫(yī)療費用明細清單，讓患者花明白錢，看明白病也是目前我們醫(yī)療衛(wèi)生行政主管部門對各級醫(yī)療衛(wèi)生機構(gòu)的要求，也是門診部信息化建設(shè)所要考慮的重要內(nèi)容之一。</p><p>　　門診

23、收費管理主要實現(xiàn)收費（根據(jù)病人性質(zhì)不同自動結(jié)算）、單據(jù)匯總、單據(jù)查詢、日賬報表匯總打印等。</p><p><b>　　1 需求分析</b></p><p><b>　　1.1實際背景</b></p><p>　　現(xiàn)行系統(tǒng)目前仍然是人工手動計算,整理,查詢醫(yī)院門診,藥房,病房等各項工作,執(zhí)行效率非常低,不方便,給醫(yī)務(wù)人

24、員帶來了不少麻煩。</p><p>　　1.2系統(tǒng)的功能需求和性能需求</p><p><b>　　1.2.1功能需求</b></p><p>　　門診收費管理主要實現(xiàn)收費（根據(jù)病人性質(zhì)不同自動結(jié)算）、單據(jù)匯總、單據(jù)查詢、實現(xiàn)門診日、月、季、年的總收入、門急診量和醫(yī)生工作量的統(tǒng)計、打印、查詢等功能。</p><p>&l

25、t;b>　　具體實現(xiàn)以下功能：</b></p><p>　　1 藥品查詢功能：為了方便醫(yī)生查找藥品等信息，將所有藥品信息按照需要進行分類。這樣醫(yī)生就能很方便的找到自己需要的信息。</p><p>　　2 添加功能：管理員可以通過填寫表格的形式輸入藥品價格、種類等相關(guān)信息。系統(tǒng)可以自動避免重復(fù)信息。</p><p>　　3 修改功能：管理員可以對數(shù)據(jù)

26、庫中的信息進行修改。系統(tǒng)能夠通過管理員給出的條件查找出所要修改的信息，對修改后的信息進行保存，并自動查找是否是重復(fù)信息。</p><p>　　4 刪除功能：管理員可以對數(shù)據(jù)進行刪除操作。系統(tǒng)能夠通過管理員給出的條件查找出要刪除的信息，并提示是否確定刪除，如果確定刪除，則把相關(guān)信息從數(shù)據(jù)庫中刪除掉。 </p><p>　　5 管理員查詢功能：管理員可以通過條件選擇查詢所有信息，并進行排序。&

27、lt;/p><p>　　6 統(tǒng)計功能：管理員可以通過此功能對收費信息進行統(tǒng)計和查詢。</p><p><b>　　1.2.2性能需求</b></p><p>　　除了滿足用戶的功能要求外，系統(tǒng)的性能要求也很重要。系統(tǒng)的性能要求通常包括：運行時間、存儲容量、界面的友好性、系統(tǒng)的安全性、可靠性以及容錯能力等。</p><p>　

28、　系統(tǒng)的性能要求應(yīng)按以下幾個方面確定：</p><p>　　(1) 容量要求：確定系統(tǒng)的容量，如處理的記錄數(shù)和處理數(shù)據(jù)的最大容量等。</p><p>　　(2) 精度要求：確定系統(tǒng)的精度。如數(shù)據(jù)或數(shù)值計算的精度和數(shù)據(jù)傳輸?shù)木鹊取?lt;/p><p>　　(3) 時間特性要求：確定系統(tǒng)的時間特性，如處理時間、響應(yīng)時間及其峰值負載期間允許偏離范圍，系統(tǒng)各項功能的J幀序關(guān)系

29、。</p><p>　　(4) 適應(yīng)性要求：必須指明反映系統(tǒng)環(huán)境變化和系統(tǒng)適應(yīng)能力的各種參數(shù)。如當需求發(fā)生變化時，系統(tǒng)的適應(yīng)能力，并指出為適應(yīng)這些變化而需要設(shè)計的軟件和過程。</p><p>　　(5) 界面友好性：要有適應(yīng)用戶特點的智能化人——機交互界面，以便用戶經(jīng)過簡單的培訓(xùn)就可操作使用。</p><p>　　(6) 系統(tǒng)可靠性：為提高系統(tǒng)可靠性必須采用模塊化和

30、結(jié)構(gòu)化設(shè)計，提高系統(tǒng)的容錯能力，并保障系統(tǒng)不會因人為的操作錯誤而死機或崩潰。如果系統(tǒng)對時效要求非常高，還必須考慮雙機系統(tǒng)和磁盤陣列等措施。此外，還應(yīng)采用可靠的供電設(shè)備。</p><p>　　對門診收費管理系統(tǒng)的性能而言，其要求是：信息查詢的平均響應(yīng)時間、結(jié)算的響應(yīng)時間、數(shù)據(jù)存儲容量。</p><p><b>　　1.3系統(tǒng)目標</b></p><p

31、>　　開發(fā)一個比現(xiàn)在醫(yī)院單位運行的系統(tǒng)更有效、更快捷、操作更方便的系統(tǒng)，提高工作效率。</p><p><b>　　1.4可行性分析</b></p><p>　　1.4.1 技術(shù)可行性</p><p>　　當前最先進的技術(shù)的發(fā)展支持本系統(tǒng)的研發(fā)，用于建立系統(tǒng)的硬件設(shè)備、軟件、開發(fā)環(huán)境等資源也具備。在給定的時間、功能的限制范圍內(nèi)，能設(shè)計并實

32、現(xiàn)系統(tǒng)的功能和性能，且我們也有相當豐富的系統(tǒng)開發(fā)資源。</p><p>　　1.4.2 操作可行性</p><p>　　要開發(fā)的項目的運行方式在用戶組織內(nèi)行的通，現(xiàn)有管理制度、人員素質(zhì)和操作方式也可行。</p><p><b>　　1.5系統(tǒng)總體設(shè)計</b></p><p>　　本系統(tǒng)主要包括以下功能：系統(tǒng)設(shè)置功能、信息

33、管理模塊、收費管理功能、統(tǒng)計查詢功能。總體功能流程如圖1.1 </p><p>　　圖1.1 管理模塊的數(shù)據(jù)流圖</p><p>　　2 開發(fā)工具的選擇及簡介</p><p>　　2.1開發(fā)工具的選擇</p><p>　　本系統(tǒng)以Visual C++作為開發(fā)工具,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具,尤其是可視化界面這一能方便而簡潔操縱數(shù)據(jù)

34、庫的對話框窗體,后臺采用MS Server2000</p><p>　　2.2開發(fā)工具的簡介</p><p>　　2.2.1Visual C++簡介</p><p>　　Visual C++(簡稱VC)是Microsoft公司推出的目前使用極其廣泛的基于Windows平臺的C++可視化開發(fā)環(huán)境，是計算機界公認的最優(yōu)秀的應(yīng)用開發(fā)工具之一，將程序和資源的編輯、編譯、調(diào)試

35、和運行融為一體，具有優(yōu)越的性能和強大的功能。</p><p>　　VC不僅支持面向?qū)ο缶幊?，而且他還可以方便地構(gòu)建一個由相關(guān)對象組成的層次等級樹，同時，它出色的可維護性和可擴展性使得它成為商業(yè)軟件開發(fā)中最流行的語言之一。</p><p><b>　　主要優(yōu)點：</b></p><p><b>　　1) 快速高效</b>&l

36、t;/p><p>　　C語言從誕生起最大的優(yōu)點就是速度快，用C編寫的代碼可以達到匯編語言編寫的代碼執(zhí)行速度的70％——80％，VC完全繼承了這一特點，并且由于代碼優(yōu)化工作做的比較好，其代碼的結(jié)構(gòu)緊湊、效率極高。</p><p><b>　　2) 語言簡練</b></p><p>　　VC還延續(xù)了傳統(tǒng)C語言的簡練風(fēng)格，如pascal語言中的begin

37、 end在VC中可以用簡單的{}表示。</p><p><b>　　3) 貼近硬件</b></p><p>　　C語言被很多專業(yè)人士稱為“介于高級語言和匯編語言之間的一種語言”，由于C語言貼近硬件便于對硬件直接操作因此又有“系統(tǒng)程序設(shè)計語言”的美稱。這一特點使得C語言特別擅長編寫系統(tǒng)程序，如windows就是用C語言編寫的。VC具有同樣的優(yōu)良品質(zhì)。</p>

38、<p><b>　　4) 靈活多變</b></p><p>　　VC像C語言一樣提供給編程者一個很自由的編程環(huán)境，豐富的表達方式可以表現(xiàn)程序的匠心獨運，用VC編程可以讓你體會到什么叫“天高任鳥飛”。</p><p><b>　　5) 便于移植</b></p><p>　　C語言在unix系統(tǒng)上取得巨大成功的一

39、個主要因素是C語言的移植度好，不依賴于特定的硬件環(huán)境，可以方便地跨平臺移植。VC也可以做到這一點。</p><p>　　2.2.2 MS SQL 2000簡介</p><p>　　SQL Server 是一個關(guān)系數(shù)據(jù)庫管理系統(tǒng)，越來越多的開發(fā)工具提供了與SQL Server的接口。它最初是由Microsoft、Sybase 和Ashton-Tate三

40、家公司共同開發(fā)的。</p><p>　　無論是從應(yīng)用還是開發(fā)的角度看，SQL都具有很多優(yōu)點：</p><p>　　使信息易于查找和使用</p><p>　　支持Web功能的信息共享</p><p>　　用于信息管理的強大解決方案工具</p><p>　　具有完備的數(shù)據(jù)庫窗口</p><p>　　

41、提供名稱自動更正功能</p><p><b>　　具有子數(shù)據(jù)表功能</b></p><p>　　可以采用拖放的方式與Excel共享信息</p><p><b>　　具有數(shù)據(jù)訪問頁功能</b></p><p><b>　　共享組件的集成</b></p><p&

42、gt;<b>　　3 系統(tǒng)總體設(shè)計</b></p><p>　　3.1系統(tǒng)功能總體設(shè)計</p><p>　　根據(jù)需求分析的結(jié)果，從實現(xiàn)的角度將系統(tǒng)總分兩大塊，一個是后臺管理員模塊，另一個是前臺一般用戶模塊，其系統(tǒng)功能結(jié)構(gòu)總圖如下圖3.1所示。</p><p><b>　　重試 否</b></p><

43、;p>　　失敗 是</p><p>　　成功 用戶管理 </p><p><b>　　圖3.1</b></p><p>　　本系統(tǒng)按功能具體可劃分為四個模塊：系統(tǒng)設(shè)置模塊、信息管理模塊、收費管理模塊、統(tǒng)計查詢管理。</p><p><b>　　1) 系統(tǒng)設(shè)置模塊</

44、b></p><p>　　系統(tǒng)設(shè)置包括科室名稱設(shè)置、藥品類別設(shè)置、藥品單位設(shè)置和用戶信息。此模塊主要功能包括：</p><p>　　·添加、修改、刪除和查看科室信息；</p><p>　　·添加、修改、刪除和查看藥品類別信息；</p><p>　　·添加、修改、刪除和查看藥品單位信息；</p>

45、<p>　　·添加、修改、刪除和查看用戶信息；</p><p><b>　　2) 信息管理功能</b></p><p>　　此模塊的主要功能包括：</p><p>　　·藥品管理，包括添加、修改、刪除和查看藥品信息；</p><p>　　·醫(yī)生管理，包括添加、修改、刪除和查看醫(yī)生

46、信息；</p><p>　　·患者管理，包括添加、修改、刪除和查看患者信息；</p><p><b>　　3) 收費管理模塊</b></p><p>　　此模塊主要功能包括：</p><p>　　·收費項目管理，包括添加、修改、刪除和查看收費項目信息；</p><p><

47、b>　　·門診收費管理；</b></p><p><b>　　4) 統(tǒng)計查詢模塊</b></p><p>　　本模塊用于對門診收費信息進行統(tǒng)計和查詢，主要包括：</p><p>　　·銷售信息統(tǒng)計查詢；</p><p>　　·醫(yī)生效益統(tǒng)計查詢；</p><

48、;p><b>　　3.2數(shù)據(jù)庫設(shè)計</b></p><p>　　3.2.1數(shù)據(jù)庫的理論基礎(chǔ)</p><p>　　所謂數(shù)據(jù)庫是指長期儲存在計算機內(nèi)的、有組織的、可共享的數(shù)據(jù)集合。數(shù)據(jù)庫中的數(shù)據(jù)按一定的數(shù)據(jù)模型組織、描述和儲存，具有較小的冗余度、較高的數(shù)據(jù)獨立性和易擴展性，并可為各種用戶共享。</p><p>　　1) 關(guān)系數(shù)據(jù)庫的定義<

49、;/p><p>　　在一個給定的應(yīng)用領(lǐng)域中，所有實體及實體之間聯(lián)系的關(guān)系的集合構(gòu)成一個數(shù)據(jù)庫。關(guān)系數(shù)據(jù)庫是目前各類數(shù)據(jù)庫中最重要、最流行的數(shù)據(jù)庫，他應(yīng)用數(shù)學(xué)方法來處理數(shù)據(jù)庫數(shù)據(jù)，是目前使用最廣泛的數(shù)據(jù)庫系統(tǒng)。</p><p><b>　　2) 關(guān)系的完整性</b></p><p>　　關(guān)系的完整性規(guī)則是對關(guān)系的某種約束條件。有三類完整性約束條件：實

50、體完整性、參照完整性和用戶定義的完整性。其中實體完整性和參照完整性是關(guān)系模型必須滿足的約束條件，被稱為關(guān)系的兩個不變性。</p><p><b>　　3) 關(guān)系代數(shù)</b></p><p>　　關(guān)系代數(shù)是一種抽象的查詢語言，是關(guān)系數(shù)據(jù)操縱語言的一種傳統(tǒng)表達方式，它是用對關(guān)系的運算來表達查詢的。</p><p>　　關(guān)系代數(shù)的運算對象是關(guān)系，運算

51、結(jié)果也是關(guān)系。</p><p>　　按運算符的不同，關(guān)系代數(shù)可分為傳統(tǒng)的集合運算和專門的關(guān)系運算。傳統(tǒng)的集合運算是二目運算，包括并、差、交、廣義笛卡爾積四種運算，專門的關(guān)系運算包括選擇、投影、連接、除等。</p><p>　　3.2.2數(shù)據(jù)庫表的設(shè)計</p><p>　　數(shù)據(jù)庫文件名：Hospital</p><p>　　1．基本信息表Bas

52、eType</p><p>　　表1 BaseType 的結(jié)構(gòu)</p><p>　　2.用戶信息表Users</p><p>　　表2表Users結(jié)構(gòu)</p><p>　　3．藥品信息表Medicine</p><p>　　4．醫(yī)生信息表Doctor</p><p>　　5．患者信息表Patie

53、nt</p><p>　　6．收費項目表Items</p><p>　　7．門診收費項目明細表PayItems</p><p>　　8．門診收費登記表Registration</p><p>　　4 系統(tǒng)詳細設(shè)計與實現(xiàn)</p><p><b>　　4.1界面設(shè)計</b></p>&l

54、t;p>　　在使用計算機的過程當中，人和計算機是以人機界面為媒介傳遞信息的。用戶通過接口向計算機提供各種數(shù)據(jù)和命令，來讓計算機完成指定的任務(wù)。同時計算機將處理結(jié)果、出錯信息，通過接口反饋給用戶。</p><p>　　本系統(tǒng)界面的設(shè)計用到了對話框，通過對話實現(xiàn)用戶和系統(tǒng)之間的交流。用到以下三種對話形式：</p><p><b>　　模式對話框</b></p&

55、gt;<p>　　模式對話框在屏幕上出現(xiàn)時，用戶必須給與回答，否則系統(tǒng)不在做任何其他工作。</p><p><b>　　非模式對話框</b></p><p>　　這類對話框在屏幕上出現(xiàn)，僅僅是為了告訴用戶一些參考信息，不需要用戶回答。</p><p><b>　　警告式對話框</b></p>&

56、lt;p>　　這類對話框主要是用于系統(tǒng)報錯或者警告。警告式的對話框，根據(jù)警告的內(nèi)容，可以是模式對話框，也可以是非模式對話框，同時給出一些必要的警告信息。</p><p>　　4.1.1系統(tǒng)設(shè)置界面</p><p>　　包括科室信息設(shè)置、藥品類別設(shè)置、藥品單位、用戶管理、修改密碼、退出系統(tǒng)。圖示如下：</p><p>　　圖1.1 工作科室信息設(shè)置</p&

57、gt;<p>　　圖1.2 藥品類別設(shè)置</p><p>　　圖1.3 藥品單位設(shè)置</p><p>　　圖1.4 系統(tǒng)用戶管理</p><p>　　圖1.5 修改用戶密碼</p><p>　　4.1.2 信息管理界面</p><p>　　包括藥品信息管理、醫(yī)生信息管理、患者信息管理。圖示如下：</

58、p><p>　　圖1.6 藥品信息管理</p><p>　　圖1.7 醫(yī)生信息管理</p><p>　　圖1.8患者信息管理</p><p>　　4.1.3 收費管理界面</p><p>　　包括收費項目管理、門診收費管理。圖示如下：</p><p>　　圖1.9 收費項目管理</p>

59、<p>　　圖2.0 門診收費管理</p><p>　　4.1.4 數(shù)據(jù)統(tǒng)計界面</p><p>　　包括銷售情況統(tǒng)計表、醫(yī)生效益統(tǒng)計表。圖示如下：</p><p>　　圖2.1 銷售情況統(tǒng)計表</p><p>　　圖2.2 醫(yī)生效益統(tǒng)計表</p><p>　　4.2數(shù)據(jù)庫表的腳本文件</p>

60、<p>　　1．表BaseType</p><p>　　Use Hospital</p><p><b>　　Go</b></p><p>　　Create table BaseType</p><p>　　(id int primary key indentity,</p><p>

61、　　typeid tinyint,</p><p>　　typename varchar(30)</p><p><b>　　)</b></p><p><b>　　Go</b></p><p><b>　　2.表Users</b></p><p>　　

62、Use hospital</p><p>　　Create table users</p><p>　　(username varchar(40) primary key,</p><p>　　Pwd carchar(40) not null,</p><p>　　User_type tinyint not null,</p>

63、<p><b>　　)</b></p><p><b>　　Go</b></p><p>　　Insert into users values(‘a(chǎn)dmin,888888’,1)</p><p><b>　　Go</b></p><p>　　3.創(chuàng)建表Medicine

64、</p><p>　　Use hospital</p><p><b>　　Go</b></p><p>　　Create table medicine</p><p>　　(medid int indentity primary key,</p><p>　　Medname varchar(50

65、),</p><p>　　Typeid int,</p><p>　　Unitid int,</p><p>　　Buyprice float,- 進貨價格，計算利潤用</p><p>　　Saleprice float,</p><p>　　Flag tinyint –中西藥標記，0中藥1西藥</p>

66、<p><b>　　)</b></p><p><b>　　Go</b></p><p>　　4.創(chuàng)建表Doctor</p><p>　　Use hospital</p><p><b>　　Go</b></p><p>　　Create ta

67、ble doctor</p><p>　　(id int indentity primary key,</p><p>　　Name varchar(50) not null</p><p>　　Sex varchar(2) not null</p><p><b>　　Age int,</b></p>&

68、lt;p>　　Deptid int,</p><p>　　Title varchar(50))</p><p><b>　　Go</b></p><p>　　5創(chuàng)建表Patient</p><p>　　Use hospital </p><p><b>　　Go</b>

69、</p><p>　　Create table patient</p><p>　　(id int indentity primary key,</p><p>　　Name varchar(50),</p><p>　　Idnum varchar(30),</p><p>　　Sex varchar(2),</

70、p><p><b>　　Age int,</b></p><p>　　Marry varchar(8))</p><p><b>　　Go</b></p><p>　　6創(chuàng)建表ItemId</p><p>　　Use hospital</p><p>&l

71、t;b>　　Go</b></p><p>　　Create table items</p><p>　　(itemid int identity primary key,</p><p>　　Itemname varchar(50) not null,</p><p>　　Total int,</p><

72、p>　　Unitid int,</p><p>　　Buyprice int,</p><p>　　Saleprice float)</p><p><b>　　Go</b></p><p>　　7.創(chuàng)建表PayItems</p><p>　　Use hospital </p>

73、<p><b>　　Go </b></p><p>　　Create talble PayItems</p><p>　　(payid int indentity primary key,</p><p>　　Regid int,-登記編號</p><p>　　Itemid int,收費項目編號</p&

74、gt;<p>　　Pnum int,收費數(shù)量</p><p>　　Price float,-銷售價格</p><p>　　Ptype tinyint-類型（1藥品，2項目）</p><p><b>　　)</b></p><p><b>　　Go </b></p><

75、;p>　　8.創(chuàng)建表Registration</p><p>　　Use hospital</p><p><b>　　Go</b></p><p>　　Create talbe registration</p><p>　　(regid int primary key,</p><p>

76、　　Patid int,-患者</p><p>　　Patid int,-患者</p><p>　　Docid int,-醫(yī)生名稱</p><p>　　Regdate varchar(20),-日期</p><p>　　Username varchar(20)-用戶名)</p><p><b>　　Go&l

77、t;/b></p><p>　　4.3各模塊功能設(shè)計與實現(xiàn)</p><p>　　4.3.1系統(tǒng)設(shè)置模塊設(shè)計</p><p>　　系統(tǒng)設(shè)置模塊可以實現(xiàn)以下功能：</p><p><b>　　·科室信息管理；</b></p><p><b>　　·藥品類別管理；&l

78、t;/b></p><p><b>　　·計量單位管理；</b></p><p><b>　　·系統(tǒng)用戶管理；</b></p><p><b>　　具體功能實現(xiàn)如下：</b></p><p>　　1．添加科室記錄功能：</p><p

79、>　　Void cdeptdlg:OnAddbutton()</p><p><b>　　{</b></p><p>　　Updatedata(TRUE);</p><p>　　If(m_deptname==””)</p><p><b>　　{</b></p><p>

80、;　　Messagebox(“請輸入科室名稱”)；</p><p><b>　　return</b></p><p><b>　　}</b></p><p>　　Cbasetype cbt;</p><p>　　Cbt.settypename(m_deptname);</p><

81、p>　　If(cbt.havetypename(“1”))</p><p><b>　　{</b></p><p>　　Messagebox(“已存在此科室”);</p><p><b>　　Return;</b></p><p><b>　　}</b></p>

82、;<p>　　Cbt.settypeid(1);</p><p>　　Cbt.sql_insert();</p><p>　　m_adodc.refresh();</p><p><b>　　}</b></p><p>　　2．編輯科室記錄功能：</p><p>　　Void Cde

83、ptdlg:OneditButton()</p><p><b>　　{</b></p><p>　　Updatedata();</p><p>　　If(m_datalist.gettext()==””)</p><p><b>　　{</b></p><p>　　Mess

84、ageBox(“請選擇要修改的科室名稱”);</p><p><b>　　Return;</b></p><p><b>　　}</b></p><p>　　If(m_DeptName==””)</p><p><b>　　{</b></p><p>　

85、　MessageBox(“請輸入科室名稱”);</p><p><b>　　Return;</b></p><p><b>　　}</b></p><p>　　If(cDNameOld!=m_DeptName)</p><p><b>　　{</b></p>&l

86、t;p>　　CBaseType cBt;</p><p>　　cBTSetTypeName(m_DeptName);</p><p>　　if(cBT.HaveTypeName(“1”))</p><p>　　MessageBox(“新的科室已經(jīng)存在”);</p><p><b>　　Else</b></p&

87、gt;<p><b>　　{</b></p><p>　　cBt.sql_Update(cDid);</p><p>　　m_Adodc.Refresh();</p><p><b>　　}</b></p><p><b>　　}</b></p>&

88、lt;p><b>　　}</b></p><p><b>　　3．刪除記錄功能：</b></p><p>　　Void CDeptDlg::OnDeltButton()</p><p><b>　　{</b></p><p>　　If(cDid==””)</p>

89、;<p><b>　　{</b></p><p>　　MessageBox(“請選擇要刪除的數(shù)據(jù)”);</p><p><b>　　Return;</b></p><p><b>　　}</b></p><p>　　If(MessageBox(“是否刪除當前記錄？

90、“，”“請確認”，MB_YESNO”)==IDYES)</p><p><b>　　{</b></p><p>　　CBbaseType cBT;</p><p>　　cBT.sql_Delete(cDid);</p><p>　　m_Adodc.Refresh();</p><p><b&

91、gt;　　}</b></p><p><b>　　}</b></p><p>　　4.3.2信息管理模塊</p><p>　　信息管理可以實現(xiàn)以下功能：</p><p>　　·藥品信息的查看、添加、修改和刪除；</p><p>　　·醫(yī)生信息的查看、添加、修改和刪除

92、；</p><p>　　·患者信息的查看、添加、修改和刪除；</p><p><b>　　具體功能實現(xiàn)如下：</b></p><p>　　1．藥品、醫(yī)生、患者信息的編輯功能：</p><p>　　void CMedEditDlg::OnOK() </p><p><b>　　{

93、</b></p><p>　　UpdateData(TRUE);</p><p>　　CMedicine cM;</p><p>　　if(m_MedName == "")/</p><p><b>　　{</b></p>&l

94、t;p>　　MessageBox("請輸入藥品名稱！");</p><p><b>　　return;</b></p><p><b>　　}</b></p><p>　　if (m_Type.GetText() == "")</p><p><b

95、>　　{</b></p><p>　　MessageBox("請選擇藥品類別");</p><p><b>　　return;</b></p><p><b>　　}</b></p><p>　　if(m_Unit.GetText() == "&quo

96、t;)</p><p><b>　　{</b></p><p>　　MessageBox("請選擇藥品單位");</p><p><b>　　return;</b></p><p><b>　　}</b></p><p>　　if(c

97、MId == ""||(cMId !=""&&cMedName!=m_MedName))</p><p>　　if(cM.HaveName(m_MedName)==1)</p><p><b>　　{</b></p><p>　　MessageBox("當前藥品名稱已經(jīng)存

98、在");</p><p><b>　　return;</b></p><p><b>　　}</b></p><p>　　cM.SetMedName(m_MedName);</p><p>　　cM.SetTypeId(atoi(m_Type.GetBoundText()));

99、</p><p>　　cM.SetUnitId(atoi(m_Unit.GetBoundText()));</p><p>　　cM.SetBuyPrice(m_BuyPrice);</p><p>　　cM.SetSalePrice(m_SalePrice);</p><p>　　cM.SetTotal(m_T

100、otal);</p><p>　　cM.SetFlag(m_flag.GetCurSel());</p><p>　　if(cMId =="")</p><p>　　cM.sql_Insert();</p><p>　　else</p><

101、p>　　cM.sql_Update(cMId);</p><p>　　CDialog::OnOK();</p><p><b>　　}</b></p><p>　　4.3.3收費管理模塊</p><p>　　收費管理模塊可以實現(xiàn)以下功能：</p><p>　　·收費項目的查看、添

102、加、修改、刪除；</p><p>　　·門診收費信息的查看、添加、修改、刪除；</p><p><b>　　具體實現(xiàn)如下：</b></p><p>　　1．設(shè)計收費項目功能：</p><p>　　void CItemsEditDlg::OnOK() </p><p><b>　

103、　{</b></p><p>　　UpdateData(TRUE);//讀取用戶輸入數(shù)據(jù)到成員變量</p><p>　　CItems cItm;</p><p>　　if(m_ItemName == "")//判斷用戶輸入數(shù)據(jù)的有效性</p><p><b>　　{</b><

104、;/p><p>　　MessageBox("請輸入收費項目名稱！");</p><p><b>　　return;</b></p><p><b>　　}</b></p><p>　　if (m_Unit.GetText() == "")</p>&

105、lt;p><b>　　{</b></p><p>　　MessageBox("請選擇計量單位");</p><p><b>　　return;</b></p><p><b>　　}</b></p><p>　　if (cItId == "&

106、quot; || (cItId != "" && cItemName != m_ItemName))</p><p>　　if (cItm.HaveName(m_ItemName) == 1)</p><p><b>　　{</b></p><p>　　MessageBox("當前項目名稱已經(jīng)存在

107、，請重新輸入");</p><p><b>　　return;</b></p><p><b>　　}</b></p><p>　　cItm.SetItemName(m_ItemName);//項目名稱</p><p>　　cItm.SetUnitId(atoi(m_Unit.G

108、etBoundText()));//計量單位編號</p><p>　　cItm.SetBuyPrice(m_BuyPrice);//項目成本</p><p>　　cItm.SetSalePrice(m_SalePrice);//銷售價格</p><p>　　cItm.SetTotal(m_Total);//庫存數(shù)量</p&g

109、t;<p>　　if(cItId =="")//添加數(shù)據(jù)</p><p>　　cItm.sql_Insert();</p><p>　　else//修改數(shù)據(jù)</p><p>　　cItm.sql_Update(cItId);</p><p><b>　　/

110、/關(guān)閉對話框</b></p><p>　　CDialog::OnOK();</p><p><b>　　}</b></p><p>　　2．設(shè)計收費項目管理功能：</p><p>　　void CItemsManDlg::RefreshData()</p><p><b>　

111、　{</b></p><p>　　UpdateData(TRUE);</p><p><b>　　// 刷新記錄</b></p><p>　　CString cSql;</p><p>　　cSql = "SELECT i.ItemId, i.ItemName AS 項目名稱, i.UnitId,

112、b.TypeName AS 單位,";</p><p>　　cSql += " i.BuyPrice AS 項目成本, i.SalePrice AS 銷售價格, i.Total AS 庫存數(shù)量 ";</p><p>　　cSql += " FROM Items i, BaseType b WHERE b.TypeId=3 AND i.UnitId=b

113、.Id";</p><p>　　// 查詢條件是否為空</p><p>　　if(m_ItemName!="")</p><p>　　cSql += " AND i.ItemName LIKE '%" + m_ItemName + "%'";</p><p>

114、;　　//MessageBox(cSql);</p><p>　　m_Adodc.SetRecordSource((LPCTSTR)(_bstr_t)cSql);</p><p>　　m_Adodc.Refresh();</p><p><b>　　// 設(shè)置列寬度</b></p><p>　　_variant_t v

115、Index;</p><p>　　vIndex = long(0);</p><p>　　m_DataGrid.GetColumns().GetItem(vIndex).SetWidth(0);</p><p>　　vIndex = long(1); // 項目名稱</p><p>　　m_DataGrid.GetColumns().Get

116、Item(vIndex).SetWidth(120);</p><p>　　vIndex = long(2); // 單位</p><p>　　m_DataGrid.GetColumns().GetItem(vIndex).SetWidth(0);</p><p>　　vIndex = long(3); // 單位</p><p>　　m

117、_DataGrid.GetColumns().GetItem(vIndex).SetWidth(50);</p><p>　　vIndex = long(4); // 項目成本</p><p>　　m_DataGrid.GetColumns().GetItem(vIndex).SetWidth(80);</p><p>　　vIndex = long(5); /

118、/ 銷售價格</p><p>　　m_DataGrid.GetColumns().GetItem(vIndex).SetWidth(80);</p><p>　　vIndex = long(6); // 庫存數(shù)量</p><p>　　m_DataGrid.GetColumns().GetItem(vIndex).SetWidth(120);</p>

119、<p><b>　　}</b></p><p>　　3.門診登記單收費項目編輯功能：</p><p>　　void CPayItemsDlg::OnSelectionButton() </p><p><b>　　{</b></p><p>　　UpdateData(true);</

120、p><p>　　// 根據(jù)選擇的收費類型選擇窗口</p><p>　　if(m_Radio==0) // 藥品</p><p><b>　　{</b></p><p>　　CMedSelectionDlg dlg;</p><p>　　if(dlg.DoModal()==IDOK)</p>

121、;<p><b>　　{</b></p><p>　　m_Name = Reg_ItemName;//項目名稱</p><p>　　m_Unit = Reg_ItemUnit;//計量單位</p><p>　　m_SalePrice = Reg_ItemSalePrice;//銷售價格</p>&l

122、t;p>　　m_Total = Reg_ItemTotal;//數(shù)量</p><p><b>　　}</b></p><p><b>　　}</b></p><p>　　else// 其它收費項目</p><p><b>　　{</b></p>

123、<p>　　CItemSelectionDlg dlg;</p><p>　　if(dlg.DoModal()==IDOK)</p><p><b>　　{</b></p><p>　　m_Name = Reg_ItemName;//項目名稱</p><p>　　m_Unit = Reg_ItemU

124、nit;//計量單位</p><p>　　m_SalePrice = Reg_ItemSalePrice;//銷售價格</p><p>　　m_Total = Reg_ItemTotal;//數(shù)量</p><p><b>　　}</b></p><p><b>　　}</b><

125、/p><p>　　UpdateData(FALSE);//更新顯示</p><p><b>　　}</b></p><p>　　4.3.4統(tǒng)計查詢管理模塊：</p><p>　　統(tǒng)計查詢管理模塊可以實現(xiàn)以下功能：</p><p>　　·銷售信息統(tǒng)計表，讀者可以統(tǒng)計指定月份的藥品

126、和收費項目的銷售情況；</p><p>　　·醫(yī)生效益統(tǒng)計表，讀者可以統(tǒng)計指定月份的醫(yī)生創(chuàng)收情況；</p><p><b>　　代碼實現(xiàn)如下：</b></p><p>　　銷售信息統(tǒng)計表的功能實現(xiàn)：</p><p>　　void CReport1Dlg::RefreshData()</p><

127、;p><b>　　{</b></p><p>　　UpdateData(true);</p><p><b>　　//讀取月份信息</b></p><p>　　CString cYear, cMonth;</p><p>　　int index;</p><p>　　i

128、ndex = m_year.GetCurSel();</p><p>　　m_year.GetLBText(index, cYear);</p><p>　　index = m_month.GetCurSel();</p><p>　　m_month.GetLBText(index, cMonth);</p><p><b>　　/

129、/ 刷新記錄</b></p><p>　　CString cSql;</p><p>　　if (m_type.GetCurSel() == 0) //查詢藥品銷售情況</p><p><b>　　{</b></p><p>　　cSql = "SELECT * FROM ReportMedici

130、ne_v WHERE 銷售日期='";</p><p>　　cSql += cYear + "-" + cMonth + "'";</p><p><b>　　}</b></p><p><b>　　else</b></p><p>

131、<b>　　{</b></p><p>　　cSql = "SELECT * FROM ReportItems_v WHERE 銷售日期='";</p><p>　　cSql += cYear + "-" + cMonth + "'";</p><p><b>

132、;　　}</b></p><p><b>　　//設(shè)置數(shù)據(jù)源</b></p><p>　　m_adodc.SetRecordSource(cSql);</p><p>　　m_adodc.Refresh();</p><p><b>　　}</b></p><p>