校醫(yī)院門診管理信息系統(tǒng)實(shí)驗(yàn)報(bào)告.

1、數(shù)據(jù)庫技術(shù)與應(yīng)用實(shí)驗(yàn)報(bào)告實(shí)驗(yàn)題目： 校醫(yī)院門診管理信息系統(tǒng) 姓 名： 學(xué) 號： 班 級： 聯(lián)系方式： 2015年12月1 需求分析1. 系統(tǒng)需求設(shè)計(jì)這個(gè)校醫(yī)院門診管理信息系統(tǒng)的目的是為了規(guī)范校醫(yī)院門診過程中處方、收費(fèi)單據(jù)等的財(cái)務(wù)規(guī)范性，提高看病、報(bào)銷效率。校醫(yī)院門診管理信息系統(tǒng)的主要功能是實(shí)現(xiàn)各項(xiàng)相關(guān)信息（包括病人的相關(guān)信息、費(fèi)用標(biāo)準(zhǔn)的相關(guān)信息）的編輯和查詢以及對各類新用戶的添加。本系統(tǒng)中的用戶分為如下四種：（1）醫(yī)生。在本系統(tǒng)中，醫(yī)生的用戶類型被定義為“1”。“醫(yī)生”類型的用戶在本系統(tǒng)中具有以下權(quán)限：a.查詢學(xué)生的掛號記錄。b.創(chuàng)建維護(hù)學(xué)生的診療記錄，如癥狀、診療結(jié)果等。（即進(jìn)行編輯）c.創(chuàng)

2、建維護(hù)學(xué)生的處方單。（即進(jìn)行編輯）（2）掛號人員。在本系統(tǒng)中，掛號人員的用戶類型被定義為“2”?！皰焯柸藛T”類型的用戶在本系統(tǒng)中具有以下權(quán)限：a.創(chuàng)建、維護(hù)學(xué)生掛號記錄，如學(xué)號、姓名、年齡、學(xué)院、本科、研究生、醫(yī)保類型等。（即進(jìn)行編輯）b.查詢學(xué)生的診療記錄、處方。（3） 財(cái)務(wù)人員。在本系統(tǒng)中，財(cái)務(wù)人員的用戶類型被定義為“3”。“財(cái)務(wù)人員”類型的用戶在本系統(tǒng)中具有如下權(quán)限：A.查詢學(xué)生的掛號記錄、處方記錄、診療記錄、交費(fèi)記錄。b.查詢藥品費(fèi)用記錄。 c.查詢治療費(fèi)用標(biāo)準(zhǔn)記錄。d.維護(hù)學(xué)生的醫(yī)藥費(fèi)報(bào)銷記錄。（即進(jìn)行編輯）（4） 劃價(jià)人員。在本系統(tǒng)中，劃價(jià)人員的用戶類型被定義為“4”?！皠潈r(jià)人員”

3、類型的用戶在本系統(tǒng)中具有如下權(quán)限；a.創(chuàng)建藥品價(jià)格記錄、治療費(fèi)用標(biāo)準(zhǔn)。（即進(jìn)行編輯）b.查詢藥品價(jià)格紀(jì)錄。c.查詢治療費(fèi)用標(biāo)準(zhǔn)。d.創(chuàng)建、維護(hù)學(xué)生的交費(fèi)費(fèi)用單據(jù)。（即進(jìn)行編輯）2. 功能需求根據(jù)系統(tǒng)需求分析，本系統(tǒng)的功能要求如下：（1） 病人管理。病人管理的功能是供用戶對病人的掛號記錄、診療記錄、處方、繳費(fèi)記錄、醫(yī)保報(bào)銷記錄等信息進(jìn)行編輯和查詢。（2） 費(fèi)用標(biāo)準(zhǔn)管理。費(fèi)用標(biāo)準(zhǔn)管理的功能是供用戶對治療費(fèi)用標(biāo)準(zhǔn)（對于診療項(xiàng)目而言的）、藥品價(jià)格記錄等信息進(jìn)行編輯和查詢。（3） 添加新用戶。用戶可以添加新用戶的信息來創(chuàng)建與自己用戶類型即使用權(quán)限相同的新用戶。（4） 退出系統(tǒng)。用戶在結(jié)束使用之后可以主界

4、面選擇“退出系統(tǒng)”，進(jìn)而退出系統(tǒng)，回到Windows環(huán)境。3. 軟件環(huán)境需求（1） 操作系統(tǒng)：Windows 7。（2） 數(shù)據(jù)庫：Microsoft SQL Server 2008.2 系統(tǒng)設(shè)計(jì)1. 數(shù)據(jù)庫設(shè)計(jì)整個(gè)校醫(yī)院門診管理信息系統(tǒng)涉及的數(shù)據(jù)實(shí)體主要有病人、藥品、診療項(xiàng)目、費(fèi)用、醫(yī)生、財(cái)務(wù)人員、掛號人員、劃價(jià)人員、處方、診療記錄等?！安∪恕睂?shí)體與“藥品”實(shí)體之間的聯(lián)系描述了病人的用藥情況，“醫(yī)生”、“劃價(jià)人員”、“掛號人員”、“財(cái)務(wù)人員”都是為“病人”服務(wù)的，“病人”消耗“藥品”，“病人”使用“診療項(xiàng)目”，“病人”花費(fèi)“費(fèi)用”?！搬t(yī)生”為“病人”開具“處方”，創(chuàng)建編輯“診療記錄”。所以，系

5、統(tǒng)有如下關(guān)系模式：（1） 病人（學(xué)號，姓名，性別，年齡，學(xué)院，學(xué)歷，醫(yī)保類型）（2） 藥品（藥品編號，藥品名稱，進(jìn)貨價(jià)格，出售價(jià)格，保質(zhì)期，庫存量，藥品功能，用法用量，劃價(jià)日期，劃價(jià)人員編號）（3） 診療項(xiàng)目（診療項(xiàng)目編號，收費(fèi)標(biāo)準(zhǔn)，診療項(xiàng)目名稱）（4） 費(fèi)用（學(xué)號，醫(yī)保報(bào)銷費(fèi)用，需交費(fèi)用，診療項(xiàng)目花費(fèi)，藥品費(fèi)用，實(shí)交費(fèi)用，繳費(fèi)日期，劃價(jià)人員編號）（5） 醫(yī)生（醫(yī)生編號，醫(yī)生姓名，所屬科室）（6） 劃價(jià)人員（劃價(jià)人員編號，劃價(jià)人員姓名）（7） 財(cái)務(wù)人員（財(cái)務(wù)人員編號，財(cái)務(wù)人員姓名）（8） 掛號人員（掛號人員姓名，掛號人員編號）（9） 處方（學(xué)號，醫(yī)生編號，處方，開具日期，診療結(jié)果，病人癥狀）（

6、10） 診療記錄（學(xué)號，醫(yī)生編號，癥狀，診療結(jié)果）（I)E-R圖如下： 劃價(jià)人員 醫(yī)生 財(cái)務(wù)人員 掛號人員 服務(wù) 病人 診療記錄 使用 產(chǎn)生 包含 藥品 診療項(xiàng)目 費(fèi)用 處方學(xué)號 姓名 性別 年齡 學(xué)歷 醫(yī)保類型病人財(cái)務(wù)人員財(cái)務(wù)人員編號 財(cái)務(wù)人員姓名處方學(xué)號 醫(yī)生編號 處方 開具日期 診療結(jié)果 癥狀費(fèi)用 繳費(fèi)日期 劃價(jià)人員編號 學(xué)號 醫(yī)保 報(bào)銷費(fèi)用 需交費(fèi)用 診療項(xiàng)目花費(fèi) 藥品費(fèi)用 實(shí)交費(fèi)用掛號人員掛號人員編號 掛號人員姓名 劃價(jià)人員劃價(jià)人員編號 劃價(jià)人員姓名藥品功能 用法用量 劃價(jià)日期 劃價(jià)人員編號藥品藥品名稱 藥品編號 進(jìn)貨價(jià)格 出售價(jià)格 保質(zhì)期 庫存量 醫(yī)生醫(yī)生編號 醫(yī)生姓名 所屬科室診

7、療記錄學(xué)號 醫(yī)生編號 癥狀 診療結(jié)果診療項(xiàng)目編號 診療項(xiàng)目 診療項(xiàng)目名稱收費(fèi)標(biāo)準(zhǔn) (II)將E-R圖轉(zhuǎn)換為如下關(guān)系表： 病人信息表 財(cái)務(wù)人員信息表 處方信息 費(fèi)用 掛號人員信息表 劃價(jià)人員信息表 系統(tǒng)用戶登錄表 藥品信息表 醫(yī)保報(bào)銷記錄 醫(yī)生信息表 診療記錄 診療項(xiàng)目信息表 (III)創(chuàng)建掛號人員信息表的語句如下，其他表的創(chuàng)建語句與此類似不再贅述：Use 校醫(yī)院門診信息管理系統(tǒng)GoCREATE TABLE 掛號人員信息表（掛號人員姓名 nchar(10) NOT NULL,掛號人員編號 nchar(10) NOT NULL),PRIMARY KEY(掛號人員編號）(IV)數(shù)據(jù)庫中的關(guān)系圖：2.

8、 VB程序設(shè)計(jì)過程a. 功能描述這個(gè)程序的功能是通過各類用戶實(shí)現(xiàn)各項(xiàng)相關(guān)信息（包括病人的相關(guān)信息、費(fèi)用標(biāo)準(zhǔn)的相關(guān)信息）的編輯和查詢以及對各類新用戶的添加。具體的內(nèi)容在“功能需求”部分有詳細(xì)介紹。而四類用戶分別為醫(yī)生、掛號人員、財(cái)務(wù)人員、劃價(jià)人員，他們對應(yīng)的權(quán)限在前文的“系統(tǒng)需求”部分已經(jīng)有詳細(xì)的交代，在此不再贅述。編輯即對應(yīng)用戶對于相關(guān)信息的創(chuàng)建和修改，在程序中用戶可通過一條一條翻閱相關(guān)信息進(jìn)行修改、保存，還可以進(jìn)行刪除和添加。一個(gè)編輯信息的界面如圖一所示。至于查詢功能，用戶可通過在對應(yīng)文本框中輸入對應(yīng)的信息，即可實(shí)現(xiàn)查詢功能。一個(gè)查詢信息的界面如圖二所示。 圖一 學(xué)生處方編輯 圖二 病人掛號

9、記錄查詢在數(shù)據(jù)庫表中原本保存了幾條各類型用戶的信息，原始的用戶可通過查詢數(shù)據(jù)表中自己的信息將自己的信息輸入登錄界面，進(jìn)而登錄該系統(tǒng)。當(dāng)用戶登錄該系統(tǒng)以后，不同的用戶會(huì)擁有不同的權(quán)限，即對于一類用戶而言界面上出現(xiàn)的部分功能不能使用，只能使用自己的類型相對應(yīng)的功能。每一類用戶都可添加新用戶，但是建議用戶添加與自己類型相同的用戶，這樣可以便于各種職業(yè)的用戶各司其職，不會(huì)看到自己的用戶類型本不應(yīng)該看到的信息，更好地保護(hù)用戶的隱私。每一次添加新用戶之前，系統(tǒng)會(huì)對用戶進(jìn)行提醒，請用戶注意要添加與自己類型相同的新用戶。當(dāng)用戶打算結(jié)束本次使用的時(shí)候，用戶可以在主界面中選擇“退出系統(tǒng)”選項(xiàng)，這時(shí)會(huì)彈出一個(gè)帶有作

10、者信息的消息框，點(diǎn)擊確定之后即可退出系統(tǒng)。b.程序中所用到的查詢語句 這個(gè)VB程序采用ADO數(shù)據(jù)控件連接數(shù)據(jù)庫，當(dāng)它的CommandType 屬性被設(shè)置為2-adCmdTable時(shí)，可以直接選擇要連接的表或存儲(chǔ)過程。而當(dāng)CommandType屬性被設(shè)置為1-adCmdText時(shí)，則需要用SQL語句獲取所需記錄集，需要將相應(yīng)SQL語句設(shè)置為ADO控件的RcordSource屬性。在這個(gè)程序所用到的所有SQL查詢語句如下： SELECT * From 藥品信息表（Form11) SELECT * From 診療項(xiàng)目信息表（Form13) SELECT * From 醫(yī)保報(bào)銷記錄（Form15) S

11、ELECT * From 診療記錄（Form5) SELECT * From 病人信息表（Form6) SELECT * From 處方信息（Form7) SELECT * From 費(fèi)用（Form9)c.關(guān)鍵代碼 在這個(gè)程序中要實(shí)現(xiàn)相應(yīng)的功能，我認(rèn)為較為關(guān)鍵的代碼有實(shí)現(xiàn)查詢和編輯功能的代碼，還有實(shí)現(xiàn)對不同用戶進(jìn)行權(quán)限設(shè)置的代碼。 （I)實(shí)現(xiàn)查詢功能的代碼（以Form9為例）： 在窗體Form9中插入ADO數(shù)據(jù)控件，將其命名為“Adodc1”,將其CommandType屬性設(shè)置為“1-adCmdText”,RcordSource屬性設(shè)置為“SELECT * From 費(fèi)用”。而“查詢”按鈕的名

12、稱為“Command1”。將數(shù)據(jù)網(wǎng)格“DataGrid1”的DataSource屬性設(shè)置為”Adodc1”,AllowUpdate屬性設(shè)置為“False”。在使用時(shí)，用戶將要查詢的學(xué)號輸入名為“Text1”的文本框中。此時(shí)該窗體的代碼如下：Private Sub Command1_Click()Adodc1.RecordSource = "SELECT * From 費(fèi)用 Where 學(xué)號='" & Trim(Text1.Text) & "'"Adodc1.RefreshEnd Sub Private Sub Comman

13、d2_Click()Unload MeEnd Sub這樣，當(dāng)用戶輸入了想要查詢費(fèi)用的病人的學(xué)號并且點(diǎn)擊了“查詢”按鈕之后，這個(gè)病人的繳費(fèi)記錄就能單獨(dú)顯示在數(shù)據(jù)網(wǎng)格中。Form9的窗口顯示如圖三所示： 圖三 使用Form9窗口進(jìn)行查詢（II)實(shí)現(xiàn)編輯功能的代碼（以Form2為例）“添加”、“修改”、“刪除”、“保存”、“第一條”、“下一條”、“上一條”、“最后一條”的按鈕的名稱分別為“Command1”、“Command2”、“Command3”、“Command4”、“Command5”、“Command6”、“Command7”、“Command8”。窗體中插入ADO控件，關(guān)聯(lián)到數(shù)據(jù)表“處方

14、信息”中。此時(shí)這個(gè)窗口中以上功能的代碼如下：Private Sub Command1_Click()Adodc1.Recordset.AddNewCommand1.Enabled = FalseCommand4.Enabled = TrueEnd SubPrivate Sub Command2_Click()Adodc1.Recordset.DeleteAdodc1.Recordset.MoveNextEnd SubPrivate Sub Command3_Click()Adodc1.Recordset.UpdateEnd SubPrivate Sub Command4_Click()Adod

15、c1.Recordset.UpdateCommand1.Enabled = TureCommand4.Enabled = FalseEnd SubPrivate Sub Command5_Click()Adodc1.Recordset.MoveFirstEnd SubPrivate Sub Command6_Click()Adodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF ThenAdodc1.Recordset.MoveLastEnd IfEnd SubPrivate Sub Command7_Click()Adodc1.Recordset.Mo

16、vePreviousIf Adodc1.Recordset.BOF ThenAdodc1.Recordset.MoveFirstEnd IfEnd SubPrivate Sub Command8_Click()Adodc1.Recordset.MoveLastEnd Sub （III)實(shí)現(xiàn)權(quán)限設(shè)置的代碼 定義一個(gè)模塊“Module1”,內(nèi)容如下： Public usertype As Integer 在Form1中使得用戶的類型被usertype的“1”、“2”、“3”、“4”所表示，這些數(shù)字的含義在開頭有提及，在此不再贅述。 以實(shí)現(xiàn)“醫(yī)生”用戶的“處方編輯”功能的權(quán)限為例，在MDIForm1

17、中有如下代碼：Private Sub 學(xué)生處方記錄編輯_Click()If usertype = 1 ThenForm2.Show/Form2為“處方編輯”窗口ElseMsgBox "對不起，您沒有訪問權(quán)限", , "提示"End IfEnd Sub3 程序運(yùn)行結(jié)果展示 以“掛號人員”用戶使用此系統(tǒng)為例展示運(yùn)行結(jié)果，其他用戶的運(yùn)行方式和所見到的各界面與此類似。 首先，在開始運(yùn)行這個(gè)程序的時(shí)候會(huì)出現(xiàn)一個(gè)登錄窗口，用戶應(yīng)該在這個(gè)登錄窗口中輸入自己的登錄信息，如下圖示：（之所以沒有將用戶的密碼隱藏起來是考慮到用戶修改方便）如果輸入的信息正確則進(jìn)入主界面： 如果

18、輸入的用戶名沒有定義則會(huì)彈出一個(gè)消息框顯示“沒有這個(gè)用戶”，如果輸入的密碼不正確則會(huì)彈出一個(gè)消息框顯示“密碼不正確”，如果輸入的用戶類型不對則會(huì)彈出一個(gè)消息框顯示“沒有符合條件的用戶”，而這三個(gè)消息框出現(xiàn)之后用戶可以點(diǎn)擊“確定”按鈕然后回到登錄窗口修改信息之后再登錄。1.掛號記錄編輯當(dāng)“掛號人員”進(jìn)入主界面時(shí)，可以選擇“病人管理”中的“學(xué)生掛號記錄編輯”來查詢學(xué)生的掛號記錄，如下圖所示：當(dāng)用戶單擊“添加”按鈕時(shí)，添加一個(gè)新紀(jì)錄，各輸入框顯示為空，同時(shí)添加按鈕變?yōu)椴豢捎?，避免多次單擊“添加”按鈕產(chǎn)生多條空記錄，而“保存”按鈕可以使用，當(dāng)用戶在輸入框中輸入各字段后，單擊“保存”按鈕，則將新紀(jì)錄寫入

19、數(shù)據(jù)庫中。例如，現(xiàn)在添加一條記錄：學(xué)號為“3”，姓名為“六六”，性別為“男”，年齡為“18”，學(xué)院為“信息科學(xué)與工程學(xué)院”，學(xué)歷為“本科”，醫(yī)保類型為“城市”，如圖示：此時(shí)數(shù)據(jù)表“病人信息表”中增加了關(guān)于學(xué)生“六六”的信息，而原本這個(gè)表中只有兩個(gè)學(xué)生的信息，如圖示：對“六六”的年齡進(jìn)行修改，再按下“修改”按鈕，如圖示：此時(shí)表格中的信息發(fā)生了變化，“六六”的年齡變?yōu)榱?9歲：若要?jiǎng)h除和“六六”相關(guān)的信息，則按下“刪除”，之后表格中關(guān)于“六六”的信息會(huì)被刪除：2.學(xué)生診療記錄查詢用戶還可選擇“病人管理”中的“學(xué)生診療記錄查詢”來查詢診療記錄，此時(shí)出現(xiàn)如下窗口：輸入想要查詢的病人的學(xué)號，然后按下“查詢”，對應(yīng)的學(xué)生的診療記錄出現(xiàn)在網(wǎng)格中：3. 學(xué)生處方查詢 這個(gè)操作與2中的操作一樣。4.注意由于前面的兩個(gè)關(guān)系圖的存在，所以對于用戶使用各功能的順序有要求，必須先由“掛號人員”錄入病人的基本信息，其他用戶才能進(jìn)一步進(jìn)行信息添加。而用戶本人的信息必須先在“系統(tǒng)用戶登錄表”中錄入才能再錄入對應(yīng)表格，對于程序中“添加新用戶”的功能而言，也是如此。當(dāng)用戶點(diǎn)擊不屬于