【導(dǎo)讀】1．從附錄一中選擇一個(gè)題目進(jìn)行數(shù)據(jù)庫應(yīng)用系統(tǒng)設(shè)計(jì)。所設(shè)計(jì)的小型管理系統(tǒng)應(yīng)包含輸入輸出、查詢、插入、刪除等基本功能。設(shè)計(jì)課題可以從候選的項(xiàng)目中選出，根據(jù)題目的基本需求，畫出流程圖，編寫程序，并寫出詳細(xì)的設(shè)計(jì)說明書。（本項(xiàng)實(shí)際系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)可選，但。數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)是以表格的形式說明數(shù)據(jù)庫中有幾個(gè)表，每個(gè)表的表名以及。每個(gè)表的各字段名，類型和約束；確定表之間的關(guān)聯(lián)。運(yùn)用數(shù)據(jù)庫理論確定每個(gè)表至少屬于3NF。將你選的題目資料給出的信息整理后填在此處。Dulia是南亞的一家中型傳染病醫(yī)院。住院部同藥房、門診部是隔離的，位于遠(yuǎn)郊。鼠疫的流行，更使得本已處在一片混亂中的住院部的信息管理雪上加霜。目前，在州政府的支持下，Dulia領(lǐng)導(dǎo)層終于決定租用光纜，將本部與。Dulia的出入院受理處非常繁忙，值班情況信息，以及這些安排是否合理以便進(jìn)行人事管理。他設(shè)備使用情況的信息。

　　

【正文】 價(jià)格單次總費(fèi)用 from 病人 join 床位占用 on (病人 .病人號 =床位占用 .病人號 )join 床位 on (床位占用 .設(shè)備號 =.床位 .設(shè)備號 ) where 姓名 =39。曹操 39。 用查詢查看曹操床位總費(fèi)用 select /*病人 .病人號 ,病人 .姓名 ,床位 .設(shè)備號 ,床位 .價(jià)格 ,床位占用 .開始時(shí)間 ,床位占用 .結(jié)束時(shí)間 ,*/sum(convert(int,( (YEAR(床位占用 .結(jié)束時(shí)間 )YEAR(床位占用 .開始時(shí)間 ))*365+ (month(床位占用 .結(jié)束時(shí)間 )month(床位占用 .開始時(shí)間 ))*30+(day(床位占用 .結(jié)束時(shí)間 )day(床位占用 .開始時(shí)間 ))),105)*價(jià)格 ) 總費(fèi)用 from 病人 join 床位占用 on (病人 .病人號 =床位占用 .病人號 )join 床位 on (床位占用 .設(shè)備號 =.床位 .設(shè)備號 ) where 姓名 =39。曹操 39。 存儲過程 /觸發(fā)器 /事務(wù) /* 我們要做的是： 查看某個(gè)病人的所有病歷信息 查看病人的費(fèi)用信息 內(nèi)蒙古科技大學(xué)畢業(yè)設(shè)計(jì) 說明書（畢業(yè) 論文 ） 27 查看某個(gè)設(shè)備（床位，氧瓶，手術(shù)臺）的歷史使用情況 查看當(dāng)前某類所有設(shè)備的使用情況（被那個(gè)病人使用中 /未被使用） 查 看某個(gè)藥品信息（基本信息，庫存信息，） 查看藥品被購買信息，處方使用信息 */ use 住院部數(shù)據(jù)庫系統(tǒng) go create proc 查找病人詳細(xì)信息 @name char(15) as select 病人 .病人號 ,姓名 ,性別 ,年齡 ,診斷結(jié)果信息 from 病人 join 診斷 on(病人 .病人號 =診斷 .病人號 ) join 病歷 on(診斷 .病歷號 =病歷 .病歷號 ) where 姓名 =@name exec 查找病人詳細(xì)信息 39。曹操 39。 create proc 查找病人主治醫(yī)生信息 @name char(15) as select 醫(yī)護(hù)人員 .工號醫(yī)生編號 ,醫(yī)護(hù)人員 .姓名 ,醫(yī)護(hù)人員 .年齡 ,醫(yī)護(hù)人員 .畢業(yè)學(xué)校 ,病人 .病人號被治療過的病人號 ,病人 .姓名被治療過的病人姓名 from 病人 ,醫(yī)生 ,醫(yī)護(hù)人員 where 病人 .姓名 =@name and 病人 .主治醫(yī)生編號 =醫(yī)生 .工號 and 醫(yī)護(hù)人員 .工號 =醫(yī)生 .工號 exec 查找病人主治醫(yī)生信息 39。曹操 39。 create proc 查看當(dāng)前可用床位信息 @time datetime as select distinct 床位 .設(shè)備號空閑床位號 ,價(jià)格 from 床位 left join 床位占用 on (床位 .設(shè)備號 =床位占用 .設(shè)備號 ) where 結(jié)束時(shí)間 is null or 結(jié)束時(shí)間 getdate() @time 內(nèi)蒙古科技大學(xué)畢業(yè)設(shè)計(jì) 說明書（畢業(yè) 論文 ） 28 exec 查看當(dāng)前可用床位信息 創(chuàng)建觸發(fā)器 create trigger 藥品購買 on 購買藥品 for insert as begin declare @shuliang int declare @yaopinhao char(10) select @shuliang=數(shù)量 from inserted select @yaopinhao=藥品號 from inserted update 藥品存儲 set 剩余量 =剩余量 @shuliang where 藥品號 =@yaopinhao end insert 購買藥品 values(39。001739。,39。000539。,39。000139。,3,getdate()) create view 病人診斷信息表 as select 病人 .病人號 ,姓名 ,診斷結(jié)果信息 from 病人 join 診斷 on(病人 .病人號 =診斷 .病人號 ) join 病歷 on(診斷 .病歷號 =病歷 .病歷號 ) create view 醫(yī)生治療信息表 as select 病人 .病人號 ,診斷時(shí)間 ,醫(yī)護(hù)人員 .姓名 ,工號 from 病人 join 診斷 on(病人 .病人號 =診斷 .病人號 ) join 醫(yī)護(hù)人員 on(診斷 .醫(yī)生號 =醫(yī)護(hù)人員 .工號 ) create proc 查看病人被診斷詳細(xì)信息 @name char(15) as 內(nèi)蒙古科技大學(xué)畢業(yè)設(shè)計(jì) 說明書（畢業(yè) 論文 ） 29 select distinct 病人診斷信息表 .病人號 ,病人診斷信息表 .姓名病人姓名 ,工號診斷醫(yī)生編號 ,醫(yī)生治療信息表 .姓名醫(yī)生姓名 ,診斷時(shí)間 ,診斷結(jié)果信息 from 病人診斷信息表 join 醫(yī)生治療信息表 on(病人診斷信息表 .病人號 =醫(yī)生治療信息表 .病人號 ) where 病人診斷信息表 .姓名 =@name exec 查看病人被診斷詳細(xì)信息 39。曹操 39。 游標(biāo) declare emp_coursor scroll cursor for select 姓名 ,工號 from 醫(yī)護(hù)人員 for read only 刪除游標(biāo) deallocate emp_coursor open emp_coursor declare @emp_name char(20),@number char(5) fetch from emp_coursor into @emp_name,@number while @@FETCH_STATUS=0 begin print N39。醫(yī)護(hù)人員姓名 :39。+@emp_name+39。 39。+N39。醫(yī)護(hù)人員工號 :39。 +@number fetch next from emp_coursor into @emp_name,@number END close emp_coursor 事務(wù) insert 購買藥品 (購藥單號 ,病人號 ,藥品號 ,數(shù)量 ,時(shí)間 ) values(39。001939。,39。000539。,39。000139。,3,getdate()) begin transaction declare @gouyaodanhao char(5) declare @shuliang int declare @yaopinhao char(20) declare @eerror int 內(nèi)蒙古科技大學(xué)畢業(yè)設(shè)計(jì) 說明書（畢業(yè) 論文 ） 30 set @eerror=0 set @gouyaodanhao=39。001939。 select @shuliang=數(shù)量 ,@yaopinhao=藥品號 from 購買藥品 where 購藥單號 =@gouyaodanhao set @eerror=@eerror+@@error if(exists(select * from 藥品存儲 where 藥品號 =@yaopinhao and 剩余量 @shuliang )) begin set @eerror=@eerror+@@error update 藥品存儲 set 剩余量 =剩余量 @shuliang where 藥品號 =@yaopinhao print 39。藥品數(shù)量足夠 ,購藥成功 39。 mit transaction end else begin set @eerror=@eerror+@@error print 39。藥品數(shù)量不夠 ,或者不存在此購藥單號 ,不能購藥 39。 delete 購買藥品 where 購藥單號 =@gouyaodanhao set @eerror=@eerror+@@error if(@eerror0) rollback tran else mit tran end 用查詢查看曹操床位費(fèi)用詳情 select 病人 .病人號 ,病人 .姓名 ,床位 .設(shè)備號 ,床位 .價(jià)格 ,床位占用 .開始時(shí)間 ,床位 占用 .結(jié)束時(shí)間 ,convert(int,( (YEAR(床位占用 .結(jié)束時(shí)間 )YEAR(床位占用 .開始時(shí)間 ))*365+ (month(床位占用 .結(jié)束時(shí)間 )month(床位占用 .開始時(shí)間 ))*30+(day(床位占用 .結(jié)束時(shí)間 )day(床位占用 .開始時(shí)間 ))),105)*價(jià)格單次總費(fèi)用 from 病人 join 床位占用 on (病人 .病人號 =床位占用 .病人號 )join 床位 on (床位占用 .設(shè)備號 =.床位 .設(shè)備號 ) where 姓名 =39。曹操 39。 用查詢查看曹操床位總費(fèi)用 內(nèi)蒙古科技大學(xué)畢業(yè)設(shè)計(jì) 說明書（畢業(yè) 論文 ） 31 select /*病人 .病人號 ,病人 .姓名 ,床位 .設(shè)備號 ,床位 .價(jià)格 ,床位占用 .開始時(shí)間 ,床位占用 .結(jié)束時(shí)間 ,*/sum(convert(int,( (YEAR(床位占用 .結(jié)束時(shí)間 )YEAR(床位占用 .開始時(shí)間 ))*365+ (month(床位占用 .結(jié)束時(shí)間 )month(床位占用 .開始時(shí)間 ))*30+(day(床位占用 .結(jié)束時(shí)間 )day(床位占用 .開始時(shí)間 ))),105)*價(jià)格 ) 總費(fèi)用 from 病人 join 床位占用 on (病人 .病人號 =床位占用 .病人號 )join 床位 on (床位占用 .設(shè)備號 =.床位 .設(shè)備號 ) where 姓 名 =39。曹操 39。 用事務(wù)知識查看曹操床位總費(fèi)用 create proc 查看病人床位費(fèi)用 @name char(15), @tprice money output as declare @name char(15) declare @tprice money set @tprice=0 set @name=39。曹操 39。 declare @tprice money select /*病人 .病人號 ,病人 .姓名 ,床位 .設(shè)備號 ,床位 .價(jià)格 ,床位占用 .開始時(shí)間 ,床位占用 .結(jié)束時(shí)間 ,*/@tprice= sum(convert(int,( (YEAR(床位占用 .結(jié)束時(shí)間 )YEAR(床位占用 .開始時(shí)間 ))*365+ (month(床位占用 .結(jié)束時(shí)間 )month(床位占用 .開始時(shí)間 ))*30+(day(床位占用 .結(jié)束時(shí)間 )day(床位占用 .開始時(shí)間 ))),105)*價(jià)格 ) from 病人 join 床位占用 on (病人 .病人號 =床位占用 .病人號 )join 床位 on (床位占用 .設(shè)備號 =.床位 .設(shè)備號 ) where 姓名 =@name declare @price money exec 查看病人床位費(fèi)用 39。曹 操 39。,@price output select @price as 曹操的病床總費(fèi) 用游標(biāo)知識查看費(fèi)用 declare @name char(15) set @name=39。曹操 39。 declare cur_病人床位費(fèi)用 cursor for select /*病人 .病人號 ,病人 .姓名 ,床位 .設(shè)備號 ,床位 .價(jià)格 ,床位占用 .開始時(shí)間 ,床位占用 .結(jié)束時(shí)內(nèi)蒙古科技大學(xué)畢業(yè)設(shè)計(jì) 說明書（畢業(yè) 論文 ） 32 間 ,*/convert(int,( (YEAR(床位占用 .結(jié)束時(shí)間 )YEAR(床位占用 .開始時(shí)間 ))*365+ (month(床位占用 .結(jié)束時(shí)間 )month(床位占用 .開始時(shí)間 ))*30+(day(床位占用 .結(jié)束時(shí)間 )day(床位占用 .開始時(shí)間 ))),105)*價(jià)格單次總費(fèi)用 from 病人 join 床位占用 on (病人 .病人號 =床位占用 .病人號 )join 床位 on (床位占用 .設(shè)備號 =.床位 .設(shè)備號 ) where 姓名 =@name for read only go open cur_病人床位費(fèi)用 declare @price money declare @cprice money set @cprice=0 fetch from cur_病人床位費(fèi)用 into @price while @@FETCH_STATUS=0 begin print N39。病人床位單次費(fèi)用 39。+convert (char(10),@price) set @cprice=@cprice+@price fetch next from cur_病人床位費(fèi)用 into @price END select @cprice as 病人床位總費(fèi)用 go close cur_病人床位費(fèi)用 go deallocate cur_病人床位費(fèi)用 用查詢 查看曹操氧氣瓶費(fèi)用詳情 select 病人 .病人號 ,病人 .姓名 ,氧氣瓶 .設(shè)備號 ,氧氣瓶 .價(jià)格 ,氧氣瓶占用 .開始時(shí)間 ,氧氣瓶占用 .結(jié)束時(shí)間 ,氧氣瓶占用 .使用量 ,使用量 *價(jià)格單次總費(fèi)用 from 病人 join 氧氣瓶占用 on (病人 .病人號 =氧氣瓶占用 .病人號 )join 氧氣瓶 on (氧氣瓶占用 .設(shè)備號 =.氧氣瓶 .設(shè)備號 ) where 姓名 =39。曹操 39。 內(nèi)蒙古科技大學(xué)畢業(yè)設(shè)計(jì) 說明書（畢業(yè) 論文 ） 33 用查詢查看曹操藥品費(fèi)用詳情 select 病人 .病人號 ,病人 .姓名 ,藥品 .藥品號 ,藥品 .價(jià)格 ,購買藥品 .時(shí)間 ,購買藥品 .數(shù)量 ,數(shù)量 *價(jià)格單次總費(fèi)用 from 病人 join 購買藥品 on (病人 .病人號 =購買藥品 .病人號 )join 藥品 on (購買藥品 .藥品號 =.藥品 .藥品號 ) where 姓名 =39。曹操 39。 用查詢查看曹操手術(shù)臺費(fèi)用詳情 select 病人 .病人號 ,病人 .姓名 ,手術(shù)臺 .設(shè)備號 ,手術(shù)臺 .價(jià)格 ,手術(shù) .開始時(shí)間 ,手術(shù) .結(jié)束時(shí)間 ,價(jià)格單次總費(fèi)用 from 病人 join 手