校醫(yī)院門診管理信息系統(tǒng)實驗報告.

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

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

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

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

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

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

7、療記錄學號 醫(yī)生編號 癥狀 診療結(jié)果診療項目編號 診療項目 診療項目名稱收費標準 (II)將E-R圖轉(zhuǎn)換為如下關(guān)系表： 病人信息表 財務人員信息表 處方信息 費用 掛號人員信息表 劃價人員信息表 系統(tǒng)用戶登錄表 藥品信息表 醫(yī)保報銷記錄 醫(yī)生信息表 診療記錄 診療項目信息表 (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程序設計過程a. 功能描述這個程序的功能是通過各類用戶實現(xiàn)各項相關(guān)信息（包括病人的相關(guān)信息、費用標準的相關(guān)信息）的編輯和查詢以及對各類新用戶的添加。具體的內(nèi)容在“功能需求”部分有詳細介紹。而四類用戶分別為醫(yī)生、掛號人員、財務人員、劃價人員，他們對應的權(quán)限在前文的“系統(tǒng)需求”部分已經(jīng)有詳細的交代，在此不再贅述。編輯即對應用戶對于相關(guān)信息的創(chuàng)建和修改，在程序中用戶可通過一條一條翻閱相關(guān)信息進行修改、保存，還可以進行刪除和添加。一個編輯信息的界面如圖一所示。至于查詢功能，用戶可通過在對應文本框中輸入對應的信息，即可實現(xiàn)查詢功能。一個查詢信息的界面如圖二所示。 圖一 學生處方編輯 圖二 病人掛號

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

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

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

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

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

14、信息”中。此時這個窗口中以上功能的代碼如下：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)實現(xiàn)權(quán)限設置的代碼 定義一個模塊“Module1”,內(nèi)容如下： Public usertype As Integer 在Form1中使得用戶的類型被usertype的“1”、“2”、“3”、“4”所表示，這些數(shù)字的含義在開頭有提及，在此不再贅述。 以實現(xiàn)“醫(yī)生”用戶的“處方編輯”功能的權(quán)限為例，在MDIForm1

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

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

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