醫(yī)院管理系統(tǒng)數(shù)據(jù)庫原理與應(yīng)用

1、個人收集整理僅供參考學(xué)習(xí)數(shù)據(jù)庫原理與應(yīng)用課程設(shè)計醫(yī)院管理系統(tǒng)班級：計算機(jī) 11-2學(xué)號： 11041214姓名：張福良成績：1/18個人收集整理僅供參考學(xué)習(xí)數(shù)據(jù)庫名稱 : SM1說明：（ 1）數(shù)據(jù)庫中包含地數(shù)據(jù)表地個數(shù)及名稱. 數(shù)據(jù)庫中包含了 4 個表 如下：Sickroom( 病房表 ) Doctor( 醫(yī)生表 ) Office( 科室表 ) Patient( 病人表 )（ 2）數(shù)據(jù)表結(jié)構(gòu)設(shè)計需填寫下表 .sickroom (病房表 )字段名稱數(shù)據(jù)類型是否允許空值約束說明Bnumbervarchar(50)主鍵病房號Bednumbervarchar(50)主鍵病床號Knamevarchar(

2、50)科室名Doctor( 醫(yī)生表 )字段名稱數(shù)據(jù)類型Dnamechar(10)Dtitleschar(20)Knamevarchar(50)DworknumberChar(20)是否允許空值是是是約束主鍵說明醫(yī)生姓名職稱科室名工作編號個人收集整理僅供參考學(xué)習(xí)Office（科室表）字段名數(shù)據(jù)類型是否允許空值約束說明Knamevarchar(50)主鍵科室名Kaddressvarchar(50)科室地址Knumbervarchar(50)科室號Dnamevarchar(50)醫(yī)生姓名Patient（病人表）字段名稱數(shù)據(jù)類型是否允許空值約束說明Pcnumberchar(10)主鍵病歷號Pnamec

3、har(10)病人姓名Psexchar(2)性別BednumberVarchar （ 50）外鍵病床號IntimeDatetime(8)入院時間OuttimeDatetime(8)出院時間PhoneVarchar （ 50）聯(lián)系電話Knamevarchar （ 50）科室名Psymptomsvarchar （ 50）癥狀Dnamechar （ 10）醫(yī)生姓名3/18個人收集整理僅供參考學(xué)習(xí)（ 2）數(shù)據(jù)表記錄需用圖說明 . sickroom ( 病房表 )4/18個人收集整理僅供參考學(xué)習(xí)Doctor( 醫(yī)生表 )Office（科室表）5/18個人收集整理僅供參考學(xué)習(xí)Patient（病人表）6/1

4、8個人收集整理僅供參考學(xué)習(xí)三數(shù)據(jù)表關(guān)系設(shè)計要求：畫E-R 圖 .病床號病房號科室名病房職稱科室名醫(yī)生名工作證號醫(yī)生科室地址科室號科室名醫(yī)生名科室醫(yī)生姓名病床號診斷所屬科室名性別入院時間姓名出院時間病歷號聯(lián)系電話病人7/18個人收集整理僅供參考學(xué)習(xí)N1科室病房組成11入住所屬XMb5E2RGbCAPY1診治p1EanqFDPw病人醫(yī)生四數(shù)據(jù)庫功能設(shè)計功能：查詢 Patient表中前 5個病人地病歷號、姓名及性別 .源代碼：SELECT Top 5 Pcnumber,Pname,pSexFROM Patient功能：查找兒科骨科內(nèi)科地辦公室地址源代碼：SELECT Kname,Kaddress,K

5、numberFROM OfficeWHERE Kname in( 兒科 ,骨科 ,內(nèi)科 )8/18個人收集整理僅供參考學(xué)習(xí)功能：統(tǒng)計該醫(yī)院男女個有多少個源代碼：select pSex,count(*)from Patientgroup by pSex功能：查詢張達(dá)明姓地病人地信息源代碼：SELECTPcnumber,Pname,Psymptoms,Phone,Psex,Bednumber,Intime,Outtime,Kname,DnameDXDiTa9E3dFROM Patient9/18個人收集整理僅供參考學(xué)習(xí)WHERE Pname LIKE 張達(dá)明 ESCAPE 功能：查詢該醫(yī)院內(nèi)科病人

6、地姓名病歷號性別診斷手機(jī)號源代碼：select Pcnumber,Pname,pSex,Phone,Psymptomsfrom Patientwhere Kname in (內(nèi)科 )功能：查詢各個科室病人地人數(shù)和該病人地病歷號和姓名源代碼：select Pcnumber,Kname,pNamefrom Patientorder by Kname compute count(Pcnumber) by Kname10/18個人收集整理僅供參考學(xué)習(xí)個人收集整理僅供參考學(xué)習(xí)12/18個人收集整理僅供參考學(xué)習(xí)名稱：存儲過程P_base功能 : 查詢病人地主治醫(yī)師，診斷情況，所屬科室，病床號源代碼：CRE

7、ATE procedure P_base Pnumber char(10)asbeginselectpname as 病 人 姓 名 ,patient.Psymptomsas 診 斷 情 況 ,patient.knameas 所 屬 科室,patient.bednumber as 病床號 RTCrpUDGiTfrom patient,sickroomwhere pcnumber=pnumber and sickroom.bednumber=patient.bednumber 5PCzVD7HxA endGOexec P_base0011名稱：自定義住院繳納費(fèi)用函數(shù)：moneyConvert功能

8、：根據(jù)病人住院天數(shù)，計算病人應(yīng)繳納地住院金額源代碼：create function moneyConvert(intime datetime,outtime datetime)returns intasbeginjLBHrnAILg13/18個人收集整理僅供參考學(xué)習(xí)declare in datetimedeclare outtimes datetimedeclare day intdeclare money intset in=(select intime from Patient WHERE intime=intime)xHAQX74J0Xsetouttimes=(selectouttime

9、fromPatientwhereouttime=outtime)LDAYtRyKfEset day=convert(int,outtimes-in)set money=day*50return moneyEndselect dbo.moneyConvert(2013-11-1,2013-11-11) as應(yīng)付住院費(fèi)Zzz6ZB2Ltk14/18個人收集整理僅供參考學(xué)習(xí)功能：用來向病人表中增加一個病人地記錄，以及入院信息源代碼：CREATE PROCEDURE addP(Pcnumberchar(10),Pnamechar(10),Psexvarchar(100),dvzfvkwMI1Dname

10、 char(20),Bednumber varchar(50),Kname varchar(50),intime datetime)char(2),Psymptoms rqyn14ZNXIasbegininsertintopatient(Pcnumber,Pname,Psex,Psymptoms,Dname,Bednumber,Kname,intime)EmxvxOtOcovalues (Pcnumber,Pname,Psex,Psymptoms,Dname,Bednumber,SixE2yXPq5Kname ,intime )beginselect *from patientendEndex

11、ecaddp0032,王 老 五,男,感 冒,張 國 強(qiáng),A014-01,外 科,2014/1/36ewMyirQFL個人收集整理僅供參考學(xué)習(xí)功能：通過病歷號刪除某個病人地全部信息源代碼：CREATE PROCEDURE DELETEP pcnumber char(10) ASbegindeletefrom patient where Pcnumber=pcnumberbeginselect *from patientendendGOexec DELETEP 003116/18個人收集整理僅供參考學(xué)習(xí)版權(quán)申明本文部分內(nèi)容，包括文字、圖片、以及設(shè)計等在網(wǎng)上搜集整理.版權(quán)為個人所有This art

12、icleincludessome parts,includingtext,pictures,and design. Copyright is personal ownership.kavU42VRUs用戶可將本文地內(nèi)容或服務(wù)用于個人學(xué)習(xí)、研究或欣賞，以及其他非商業(yè)性或非盈利性用途， 但同時應(yīng)遵守著作權(quán)法及其他相關(guān)法律地規(guī)定，不得侵犯本網(wǎng)站及相關(guān)權(quán)利人地合法權(quán)利. 除此以外，將本文任何內(nèi)容或服務(wù)用于其他用途時，須征得本人及相關(guān)權(quán)利人地書面許可，并支付報酬 . y6v3ALoS89Users may use the contents or services of this article for

13、personal study, research or appreciation, and other non-commercial or non-profit purposes, but at the same time, they shall abide by the provisions of copyright law and other relevant laws, and shall not infringe upon the legitimaterights of this website and its relevant obligees. In addition, when

14、any content or service of this article is used for other purposes, written permission and remuneration shall be obtained from the person concerned and the relevantobligee.M2ub6vSTnP轉(zhuǎn)載或引用本文內(nèi)容必須是以新聞性或資料性公共免費(fèi)信息為17/18個人收集整理僅供參考學(xué)習(xí)使用目地地合理、善意引用，不得對本文內(nèi)容原意進(jìn)行曲解、修改，并自負(fù)版權(quán)等法律責(zé)任. 0YujCfmUCwReproduction or quotation of the content of this articlemust be reasonable and good-faith