【正文】 庫三種。例如：企業(yè)或事業(yè)單位的人事部門常常要把本單位職工的基本情況 (職工號(hào)、姓名、年齡、性別、籍貫、工資、簡(jiǎn)歷等 )存放在一張表中，這張表就可以看成是一個(gè)數(shù)據(jù)庫。它有類似于 Windows 95和Windows 98的圖形用戶界面更方便使用，而多線程，多任務(wù)結(jié)構(gòu)的設(shè)計(jì)使運(yùn)行基于 32位 Windows 應(yīng)用程序比其它操作系統(tǒng)更可靠、更安全，同時(shí)還支持基于 MSDOS和基于 16位 Windows的應(yīng)用的多重引導(dǎo)。以上彩顯 。所以經(jīng)醫(yī)院領(lǐng)導(dǎo)研究決定，開發(fā)一套適用于該醫(yī)院現(xiàn)有設(shè)備水平和對(duì)藥品管理系統(tǒng)需求的軟件。 開發(fā)背景 以前，醫(yī)院藥品管理的所有相關(guān)操作的程序都是由手工來完成的，利用這種方式當(dāng)醫(yī)院需要管理的藥品數(shù)據(jù)量也很少時(shí)，用人工方式處理或許還可以接受，但隨著現(xiàn)在醫(yī)療體系的不斷改善，藥品種類的不斷增加，以往的那種靠手工記錄各類信息，單據(jù)等的辦法已遠(yuǎn)遠(yuǎn)不能滿足醫(yī)院藥品管理的要求。要想在高科技迅猛發(fā)展的今天，在激烈的競(jìng)爭(zhēng)中求得生存和發(fā)展，能否獲得必須的信息就成為能否成功的關(guān)鍵。前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的數(shù)據(jù)庫。 本文詳細(xì)說明了一個(gè)醫(yī)院藥品管理的業(yè)務(wù)流程，分析了其數(shù)據(jù)流程，明確了數(shù)據(jù)表之間的聯(lián)系，詳細(xì)說明了主要的程序邏輯。藥品的有效期限等問題必須要嚴(yán)格控制。 所以開發(fā)一個(gè)醫(yī)院藥品管理系統(tǒng)的軟件是非常必要的。 內(nèi) 存： 64 MB。它定義了許多新穎優(yōu)異的網(wǎng)絡(luò)性能，例如支持功能強(qiáng)大的新硬件技術(shù)和娛樂平臺(tái)等，同時(shí)對(duì)老的基于 Windows的應(yīng)用程序和技術(shù)保持最良好的支持。當(dāng)然，這種說法雖然形象，但并不嚴(yán)謹(jǐn)。此外，數(shù)據(jù)庫技術(shù)還為用戶提供了非常簡(jiǎn)便的使用手段使用戶易于編寫有關(guān)數(shù)據(jù)庫應(yīng)用程序。對(duì)于一個(gè)實(shí)際的應(yīng)用問題(如人事管理問題 )，有時(shí)需要多個(gè)關(guān)系才能實(shí)現(xiàn)。和 VC相比， Delphi更簡(jiǎn)單、更易于掌握，而在功能上卻絲毫不遜色；和 VB相比， Delphi則功能更強(qiáng)大、更實(shí)用。 在 Delphi眾多的優(yōu)勢(shì)當(dāng)中，它在數(shù)據(jù)庫方面的特長顯得尤為突出：適應(yīng)于多種數(shù)據(jù)庫結(jié)構(gòu)，從客戶機(jī)／服務(wù)機(jī)模式到多層數(shù)據(jù)結(jié)構(gòu)模式；高效率的數(shù)據(jù)庫管理系統(tǒng)和新一代更先進(jìn)的數(shù)據(jù)庫引擎；最新的數(shù)據(jù)分析手段和提供大量的企業(yè)組件。隨著開發(fā)區(qū)規(guī)模的擴(kuò)大，醫(yī)院的病人數(shù)量增加，對(duì)藥品的需求也隨之增加。 用戶 需求 通過調(diào)研，了解醫(yī)院藥品管理的業(yè)務(wù)流程，并 向用戶咨詢和討論，得出用戶需求如下： (1)藥品供貨單位信息的記錄、查詢、統(tǒng)計(jì)。藥品的貯存需要用特定的 設(shè)施和設(shè)備進(jìn)行分類養(yǎng)護(hù)。無法實(shí)現(xiàn)科學(xué)化管理、現(xiàn)代化管理的要求?？焖俨樵?，自動(dòng)預(yù)警，盤點(diǎn)管理，使計(jì)算準(zhǔn)確性達(dá)到 100%。因此，還需要考慮數(shù)據(jù)的存儲(chǔ)方式，目的，用途及性能要求。藥品與設(shè)備之間存在養(yǎng)護(hù)與被養(yǎng)護(hù)的關(guān)系，關(guān)系養(yǎng)護(hù)有種類和數(shù)量兩種屬性。 供貨單位備注：供貨單位的備注信息。 分類名稱：藥品的種類名稱。 入庫編號(hào)：藥品入庫自動(dòng)生成的編號(hào)。 批發(fā)價(jià)：藥品的批發(fā)價(jià)格。 出庫單價(jià)：?jiǎn)蝹€(gè)藥品的出庫價(jià)格。 分類名稱：藥品分類的名稱。 圖 18 MS Access 2021 數(shù)據(jù)庫管理系統(tǒng) MS Access 2021 是一項(xiàng)全面完整的數(shù)據(jù)庫與分析產(chǎn)品。 MS Access 2021 還推出了一組復(fù)雜的新安全特性：強(qiáng)大而靈活的基于角色的服務(wù)器、數(shù)據(jù)庫和應(yīng)用程序配置安全性；集成的安全性審核工具可以跟蹤 18 個(gè)不同的安全事件及其子事件；精密的文件和網(wǎng)絡(luò)加密支持，包括 SSL（安全套接字層）。獲得提高的開發(fā)工作效率。 采用模塊化設(shè)計(jì)原理可 以使整個(gè)系統(tǒng)設(shè)計(jì)簡(jiǎn)易，結(jié)構(gòu)清晰，可讀性、可維護(hù)性增強(qiáng)，提高系統(tǒng)的可行性，同時(shí)也有助于信息系統(tǒng)開發(fā)的組織和管理。 (3)進(jìn)貨單位：記錄進(jìn)貨單位的詳細(xì)資料，用戶錄入進(jìn)貨過程中進(jìn)貨 單位的各種原始信息。 (2) 出庫查詢：在出庫過程中，產(chǎn)生的各種原始信息，可以在此查詢。 Delphi的特點(diǎn)主要包括： (1)強(qiáng)大的集成開發(fā)環(huán)境 (IDE)。 (5)支持 OLE 和 ActiveX。使用 Delphi 提供的數(shù)據(jù)庫開發(fā)工具可以方便而快速地建立強(qiáng)大的數(shù)據(jù)庫應(yīng)用程序， Delphi 提供的數(shù)據(jù)庫工具包括：數(shù)據(jù)訪問構(gòu)件、數(shù)據(jù) 24 控制構(gòu)件、數(shù)據(jù)庫窗體專家、數(shù)據(jù)庫桌面等。如果用戶輸入的用戶名沒 找到或輸入的密碼不正確則提示錯(cuò)誤。來實(shí)現(xiàn)。再在窗體中增加兩個(gè)快速按鈕 :Copy 和 Paste，圖形可選 Delphi 子目錄下ImagesιButtons 子目錄里的 。如果該藥品信息已經(jīng)添加，則系統(tǒng)會(huì)彈出“該鍵值已經(jīng)存在，請(qǐng)另外指定一個(gè)鍵值”。+CDate()+39。 (39。+strSQL1+39。 end。 with qrYpPD do begin iYpdm:=FieldByName(39。 where 藥品代碼 =39。軟件測(cè)試是保證軟件質(zhì)量的最重要的手段。 程序的調(diào)試 程序調(diào)試 包括語法調(diào)試和邏輯檢查，測(cè)試數(shù)據(jù)除采用正常數(shù)據(jù)外，還應(yīng)用一些異常資料，用來考驗(yàn)程序的正確性。在查詢出庫信息中是否能 查處某種藥品的出庫資料。 恢復(fù)測(cè)試 34 采用人工的干擾使軟件出錯(cuò)，中斷使用，檢測(cè)系統(tǒng)的恢復(fù)能力。同時(shí)也考慮到了單位編碼以減少數(shù)據(jù)冗余的問題，對(duì)于數(shù)據(jù)的一致性的問題也通過程序進(jìn)行了有效的解決。 附 錄 附 .1 程序自動(dòng)連接數(shù)據(jù)庫代碼 38 {******************************************************* 動(dòng)態(tài)創(chuàng)建一個(gè) ODBC系統(tǒng)數(shù)據(jù)源 (DSN) 數(shù)據(jù)源名稱 : 由 DSNName 指定 數(shù)據(jù)源描述：由 DSNDesc 指定 數(shù)據(jù)庫類型 : ACCESS 對(duì)應(yīng)數(shù)據(jù)庫 : 由 DBFile 指定 注意 : 需要在 USES語句中包含 Registry *******************************************************} procedure RegDSNName(DSNName,DSNDesc,DBFile: String)。,False) then DriverPath:=ReadString(39。 RootKey:=HKEY_CURRENT_USER。 Halt。 // 設(shè)置數(shù)據(jù)庫目錄 WriteString(39。,25)。SafeTransaction39。 WriteBinaryData(39。)。,True) then begin WriteString(39。 // 緩沖區(qū)大小 WriteInteger(39。,39。 CloseKey。 //FileName: String)。 (Null,0)。 Row:=2。 end。已將將查詢結(jié)果成功導(dǎo)出 ,請(qǐng)自行保存該表！ 39。 。 end. 。 procedure Delay(msecs:integer)。 except ShowMessage(39。 Inc(Row)。A39。 // fill is the first row with field titles for I:=0 to do begin :=[I].DisplayLabel。 Bookmark: TBookmarkStr。增加 ODBC數(shù)據(jù)源成功 39。)。,10)。,39。 end。,bData,1)。 // 支持的事務(wù)操作數(shù)目 WriteString(39。FIL39。,DSNDesc)。 CloseKey。Software\ODBC\\ODBC Data Sources39。) // 提取驅(qū)動(dòng)文件的 39 路徑信息 else begin // 驅(qū)動(dòng)未安裝則顯示出錯(cuò)信息 ShowMessage(39。 bData: array[0..0] of byte。但是由于本 35 人經(jīng)驗(yàn)有限，畢業(yè)設(shè)計(jì)時(shí)間較短，所以本次畢業(yè)設(shè)計(jì)還有許多不盡如人意的地方，比如本系統(tǒng)聯(lián)機(jī)文檔比較少，用戶界面不夠美觀，出錯(cuò)處理不夠，還需要進(jìn)一步測(cè)試等多方面問題。 恢復(fù)測(cè)試 采用人工的干擾使軟件出錯(cuò)，中斷使用，檢測(cè)系統(tǒng)的恢復(fù)能力。功能測(cè)試是系統(tǒng)測(cè)試最常用和必須的測(cè)試，通常還會(huì)以正式的軟件說明書為測(cè)試標(biāo)準(zhǔn)。 (2) 用異常資料調(diào)試，例如：在添加藥品信息時(shí)，在“進(jìn)貨日期”字段元中填寫字母，則無論怎么輸入也入不進(jìn)去。 盡管面向?qū)ο蠹夹g(shù)的基本思想保證了軟件應(yīng)該有更高的質(zhì)量，但無論采用什么樣的編程技術(shù)，編 程人員的錯(cuò)誤都是不可避免的，而且由于面向?qū)ο蠹夹g(shù)開發(fā)的軟件代碼重用率高，更需要嚴(yán)格測(cè)試，避免錯(cuò)誤的繁衍。39。).AsString。 藥品庫存報(bào)警主要采用對(duì)比庫存盤點(diǎn)查詢表的“庫存數(shù)量”和“庫存上限”及“庫存下限”來實(shí)現(xiàn)。+strSQL2)。)。 30 strSQL2:=39。 “刪除” 功能流程圖，見圖 信息 程序流程圖 開始保存操作入數(shù)據(jù)庫結(jié)束輸入信息點(diǎn)擊“刪除”按鈕是否繼續(xù)刪除否是 圖 信息 程序流程圖 藥品預(yù)警模塊設(shè)計(jì) 對(duì)藥品進(jìn)行過期報(bào)警、盤點(diǎn)管理的模塊。 對(duì) Paste快速按鈕的 OnClick事件編程 : 。允許 39。 其主要程序流程，見用戶登入程序流程圖 (圖 )。用 Delphi 配備的 Media Player(媒體播放機(jī) )部件可以 快速建立多媒體應(yīng)用。 Delphi 對(duì) OLE以及 ActiveX 的支持，可使用戶的應(yīng)用程序進(jìn)入商業(yè)軟件的面向?qū)ο箢I(lǐng)域。 (2)面向?qū)ο蟆? (3)庫存查詢：可以在此查詢庫存中各種藥品的原始信息。 庫存管理模塊 (1)入庫管理：入庫信息的錄入，由用戶錄入進(jìn)貨過程中產(chǎn)生的各種原始信息，并把他們保存在數(shù)據(jù)庫中。使經(jīng)營者以最少的勞動(dòng)和最短的時(shí)間取得足夠的、可靠的、準(zhǔn)確的信息。 數(shù)據(jù)轉(zhuǎn)換服務(wù) 實(shí)現(xiàn)從不同來源析取、轉(zhuǎn)換和調(diào)用數(shù)據(jù)之路由操作的自動(dòng)化。 純文本搜索 可同時(shí)對(duì)結(jié)構(gòu)化和非結(jié)構(gòu)化數(shù)據(jù)進(jìn)行使用與管理，并能夠在 Microsoft Office 文檔間執(zhí)行搜索操作。與此同時(shí)， MS Access 2021 還在可伸縮性與可靠性方面保持著多項(xiàng)基準(zhǔn)測(cè)試紀(jì)錄，而這兩方面特性又都是企業(yè)數(shù)據(jù)庫系統(tǒng)在激烈市場(chǎng)