【正文】 我們在編程時可以為 SQL 屬性設(shè)置多條 SQL語句。 江蘇大學(xué)本科生畢業(yè)論文 第 19 頁 共 55 頁 19 當(dāng) SQL語句執(zhí)行完之后，要想準(zhǔn)備下一個查詢，首先必須調(diào)用 Close方法，然后才能調(diào)用Prepare方法準(zhǔn)備下一個查詢。為參數(shù)賦值有三種方法： ①根據(jù)參數(shù)在 SQL語句中出現(xiàn)的順序，設(shè)置 TADOQuery組件的 parameters屬性值為參數(shù) 賦值。 DTI文件在編譯時不起任何作用。 OLE DB是一種底層編程接口，用來訪問許多不同類型的數(shù)據(jù)源，其中包括消息、文件系統(tǒng)以及其他一些非傳統(tǒng)的數(shù)據(jù)源。也就是說組件這個概念要大于控件，控件在內(nèi)涵上包含于組件中。 圖形組件與窗口組件并列，是另一大類組件。 這一小節(jié)簡略介紹一下 Delphi VCL（可視化組件庫）組件的體系結(jié)構(gòu)。 標(biāo)準(zhǔn)語法： 江蘇大學(xué)本科生畢業(yè)論文 第 15 頁 共 55 頁 15 UPDATE table_name SET columnname1 = value1 [, columname2 = value2]... WHERE search_condition Delete 語句標(biāo)準(zhǔn)語法： DELETE FROM tablename WHERE condition 復(fù)雜操作實(shí)現(xiàn) 在信息管理系統(tǒng)中，我們往往會遇到歸類、匯總、映射、索引、子查詢等復(fù)雜操作，相應(yīng)的支持與實(shí)現(xiàn)如下： * GROUP BY方法 GROUP BY子句語法為： SELECT column1, SUM(column2) FROM listoftables GROUP BY columnlist。而數(shù)據(jù)更新所造成的風(fēng)險大大超過數(shù)據(jù)查詢。 SQL為許多任務(wù)提供了命令，其中包括： 1. 查詢數(shù)據(jù) 2. 在表中插入、修改和刪除記錄 3. 建立、修改和刪除數(shù)據(jù)對象 4. 控制對數(shù)據(jù)和數(shù)據(jù)對象的存取 5. 保證數(shù)據(jù)庫一致性和完整性 以前的數(shù)據(jù)庫管理系統(tǒng)為上述各類操作提供單獨(dú)的語言，而 SQL 將全部任務(wù)統(tǒng)一在一種語言中。雖然絕大多數(shù)的數(shù)據(jù)庫系統(tǒng)使用 SQL，但是它們同樣有它們自立另外的專有擴(kuò)展功能用于它們的系統(tǒng)。 第三范式 (third normal form，簡稱 3rd NF)就是指表中的所有數(shù)據(jù)元素不但要能夠唯一地被主關(guān)鍵字所標(biāo)識，而且它們之間還必須相互獨(dú)立，不存在其它的函數(shù)關(guān)系。 第一范式 (first normal form，簡稱 1st NF)就是指在同一表中沒有重復(fù)項(xiàng)出現(xiàn)，如果有則應(yīng)將重復(fù)項(xiàng)去掉。規(guī)范化表達(dá)還規(guī)定在每一個基本表中必須定義一個數(shù)據(jù)元素為關(guān)鍵字 (key)，它可以唯一地標(biāo)識出該表中其它相關(guān)的數(shù)據(jù)元素。 b．統(tǒng)計(jì)文件 (表 )和數(shù)據(jù)錄入文件一般只對本工作站定義為只寫方式，對其它工作站則定義為只讀方式。因?yàn)樵诿總€表中只有主關(guān)鍵詞才能唯一地標(biāo)識表中的這一個記錄值 (因?yàn)楦鶕?jù)第三范式的要求，表中其它數(shù)據(jù)字段函數(shù)都依賴于主關(guān)鍵詞 )，所以將表通過關(guān)鍵詞連接就能夠唯一地標(biāo)識出某一事物不同屬性在不同表中的存放位置。 為了更好地組織數(shù)據(jù)和設(shè)計(jì)出實(shí)際應(yīng)用數(shù)據(jù)庫，應(yīng)該注意如下問題：規(guī)范化地重組數(shù)據(jù)結(jié)構(gòu)：江蘇大學(xué)本科生畢業(yè)論文 第 10 頁 共 55 頁 10 對數(shù)據(jù)進(jìn)行規(guī)范化表達(dá)，這在后面將會具體討論。 數(shù)據(jù)庫設(shè)計(jì)的步驟是： （ 1） 數(shù)據(jù)庫結(jié)構(gòu)定義：目前的數(shù)據(jù)庫管理系統(tǒng)（ DBMS）有的是支持聯(lián)機(jī)事務(wù)處理 CLTP負(fù)責(zé)對事務(wù)數(shù)據(jù)進(jìn)行采集、處理、存儲）的操作型 DBMS，有的可支持?jǐn)?shù)據(jù)倉庫、有聯(lián)機(jī)分析處理 CLAP（指為支持決策的制定對數(shù)據(jù)的一種加工操作）功能的大型 DBMS，有的數(shù)據(jù)庫是關(guān)系型的、有的可支持面向?qū)ο髷?shù)據(jù)庫。 ? 字段的個數(shù)越少越好。 （ 1） 數(shù)據(jù)庫需求分析的任務(wù)是將業(yè)務(wù) 管理單證流化為數(shù)據(jù)流，劃分主題之間的邊界，繪制出 DFD圖，并完成相應(yīng)的數(shù)據(jù)字典。 主要功能： ? 進(jìn)行藥品入庫（對盤存報增、溢余、病人退藥等多種形式提供了相應(yīng)的入庫處理功能）、出庫（發(fā)藥、報損、退藥等）、盤存、短缺、報損日常單據(jù)處理業(yè)務(wù)， 并記明細(xì)帳、流水帳和打印單據(jù)，自動增減庫存。 醫(yī)院信息管理系統(tǒng)（ HIS）主要設(shè)計(jì)思想是以患者為中心，系統(tǒng)設(shè)計(jì)突出強(qiáng)化系統(tǒng)與數(shù)據(jù)的安全性，標(biāo)準(zhǔn)化構(gòu)架、構(gòu)件設(shè)計(jì)；實(shí)時響應(yīng)速度，聯(lián)機(jī)事務(wù)處理能力；人機(jī)界面設(shè)計(jì)的友善性；支持患者臨床醫(yī)療記錄和影像資料的過程傳遞，并適應(yīng)醫(yī)療保險信息的兼容等。在某些情況下， DBMS產(chǎn)品不具備實(shí)施必要業(yè)務(wù)規(guī)則的能力，必須以代碼形式把它們編入應(yīng)用程序。數(shù)據(jù)庫模式是一種設(shè)計(jì)，數(shù)據(jù)庫和應(yīng)用正是建立在此基礎(chǔ)上的。 設(shè)計(jì)子系統(tǒng)有一個方便數(shù)據(jù)庫及其應(yīng)用創(chuàng)建的工具集。 關(guān)系模型。一般來說，數(shù)據(jù)庫開發(fā)人員和用戶都不直接訪問應(yīng)用元數(shù)據(jù)，相反，他們通過DBMS中的工具來處理這些數(shù)據(jù)。這些系統(tǒng)表存儲了數(shù)據(jù)庫中表的情況，指出每一個表中有多少列，那一列是主關(guān)鍵字，每一列的數(shù)據(jù)類型的描述，它也存儲索引、關(guān)鍵字、規(guī)則和數(shù)據(jù)庫結(jié)構(gòu)的其他部分。它主要包括四個要素：用戶數(shù)據(jù)、元數(shù)據(jù)、索引和應(yīng)用元數(shù)據(jù)。并且在本文的最后總結(jié)部分介紹了做畢業(yè)設(shè)計(jì)的體會和心得，并 指出了設(shè)計(jì)中的不足和改進(jìn)的方向。系統(tǒng)運(yùn)行結(jié)果證明，本文所設(shè)計(jì)的醫(yī)院信息系統(tǒng)的子系統(tǒng) 醫(yī)院藥庫管理系統(tǒng) 可以滿足 病人、 藥庫 工作人員和高級管理員三方面的需要。 第一 章 ：對數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)和醫(yī)院信息系統(tǒng)及其子系統(tǒng) 醫(yī)院藥庫管理系統(tǒng) 系統(tǒng)進(jìn)行了簡明的介紹，并分析了開發(fā) 醫(yī)院藥庫管理系統(tǒng) 所應(yīng)進(jìn)行的工作。 江蘇大學(xué)本科生畢業(yè)論文 第 4 頁 共 55 頁 4 數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)簡介 在數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)之前，對開發(fā)數(shù)據(jù)庫的基本概念應(yīng)當(dāng)了解，對數(shù)據(jù)庫的結(jié)構(gòu)、開發(fā)數(shù)據(jù)庫應(yīng)用程序的步驟、開發(fā)體系及方法都應(yīng)當(dāng)有相當(dāng)清晰的了解和認(rèn)識。 用戶數(shù)據(jù) 目前，大多數(shù)主流數(shù)據(jù)庫管理系統(tǒng)把用戶數(shù)據(jù)表示為關(guān)系。 在表中存儲元數(shù)據(jù)不僅對 DBMS是 有效的，對用戶也是方便的，因?yàn)樗麄兛梢允褂门c查詢用戶數(shù)據(jù)同樣的查詢工具來查詢元數(shù)據(jù)。 Microsoft Access 2021 中就支持窗體、存儲過程等應(yīng)用元數(shù)據(jù)。關(guān)系模型主要是用二維表格結(jié)構(gòu)表達(dá)實(shí)體集，用外鍵表示實(shí)體間聯(lián)系。它典型地包含產(chǎn)生表、窗體、查詢和報表的工具。 域是一列可能擁有的值的集合。 創(chuàng)建表 定義聯(lián)系 應(yīng)用組件 數(shù)據(jù)庫應(yīng)用組件包括窗體、查詢、報表、菜單和應(yīng)用程序。依照軟件工程化方式開發(fā)的醫(yī)院全面信息管理系統(tǒng)，具有開放靈活、高性能價格比和幾乎無限地適應(yīng)醫(yī)院現(xiàn)在和未來信息處理增長的需求。 ? 根據(jù)門診處方進(jìn)行發(fā)藥管理 ,門診計(jì)價收費(fèi)處錄入了處方后 ,藥庫自動進(jìn)行需要發(fā)出的藥品的統(tǒng)計(jì)。 （ 2） 概念設(shè)計(jì)的任務(wù)是從 DFD出發(fā)，繪制出本主題的實(shí)體－關(guān)系圖，并列出各個實(shí)體與關(guān)系的綱要表。 ? 所有基本表的設(shè)計(jì)均應(yīng)盡量符合第三范式。針對選擇的 DBMS，進(jìn)行數(shù)據(jù)庫結(jié)構(gòu)定義。 關(guān)系數(shù)據(jù)結(jié)構(gòu)的建立：在進(jìn)行了數(shù)據(jù)基本結(jié)構(gòu)的規(guī)范化重組后，還必須建立整體數(shù)據(jù)的關(guān)系結(jié)構(gòu)。 （ 2）確定單一的父子關(guān)系結(jié)構(gòu) 所謂確定單一的父系關(guān)系結(jié)構(gòu)就是要在所建立的各種表中消除多對多（以下用 M:N來表示）的現(xiàn)象，即設(shè)法使得所有表中記錄之間的關(guān)系呈樹狀結(jié)構(gòu) (只能由一個主干發(fā)出若干條分支，而不能有若干條主干交錯發(fā)出若干條分支狀況 )。 c．財務(wù)等保密文件一般只對中工作站 (如財務(wù)科等 )定義為可寫、可改、可刪除方式，對其它工作站則定義為只讀方式，而且不是每個人都能讀，只有級別相同和高級別者才能讀。在規(guī)范化理論中表是二維的，它有如下四個性質(zhì)： 1. 在表中的任意一列上，數(shù)據(jù)項(xiàng)應(yīng)屬于同一個屬性。這個去掉重復(fù)項(xiàng)的過程就稱之為規(guī)范化處理。也就是說對于一個滿足了 2nd NF的數(shù)據(jù)結(jié)構(gòu)來說，表中有可能存在某些數(shù)據(jù)元素依賴于其它非關(guān)鍵宇數(shù)據(jù)元素的現(xiàn)象，必須加以消除。但是，標(biāo)準(zhǔn)的 SQL命令，比如 Select、 Insert、 Update、 Delete、 Create和 Drop常常被用于完成絕大多數(shù)數(shù)據(jù)庫的操作。所有關(guān)系數(shù)據(jù)庫的公共語言：由于所有主要的關(guān)系數(shù)據(jù)庫管理系統(tǒng)都支持 SQL語言，用戶可將使用 SQL的技能從一個 RDBMS(關(guān)系數(shù)據(jù)庫管理系統(tǒng) )轉(zhuǎn)到另一個，所有用 SQL編寫的程序都是可以移植的。數(shù)據(jù)庫管理系統(tǒng)必須在更改期內(nèi)保護(hù)所存儲的數(shù)據(jù)的一致性，確保有效的數(shù)據(jù)進(jìn)入數(shù)據(jù)庫，數(shù)據(jù)庫必須保持一致性， DBMS還必須協(xié)調(diào)多用戶的并行更新，以確保用戶和它們的更改不至于影響其它用戶的作業(yè)。 這個 GROUP BY子句將集中所有的行在一起，它包含了指定列的數(shù)據(jù)以及允許合計(jì)函數(shù)來計(jì)算一個或者多個列。凡是做過程序開發(fā)的人都知道從來沒有單純的數(shù)據(jù)應(yīng)用程序，也就是說，數(shù)據(jù)庫應(yīng)用程序必須和用戶界面（可以是圖形界面，也可以是命令接口）元素相結(jié)合，只講界面或只講數(shù)據(jù)庫本身都構(gòu)不成數(shù)據(jù)庫應(yīng)用程序，因而用 Delphi 。圖形組件不是基于窗口的，因而不能有窗口句柄，不能接受輸入焦點(diǎn)和包含其它組件?？丶?Windows系列操作系統(tǒng)提出并使用，而組件是 Borland和其它廠商在對 Windows控件做了必要的擴(kuò)展之后提出來的概念，它們是在不同時期由不同的廠商提出的概念。 OLE DB是一個由 Component Object Model（ COM）接口組成的集合，用來隱藏創(chuàng)建數(shù)據(jù)訪問服務(wù)過程中的細(xì)節(jié)。 SQL語言在 Delphi中的應(yīng)用 在 Delphi中使用 SQL語言非常方便，一般來說，都是通過 Tquery或 TADOquery組件來使用SQL語言的。 ②直接根據(jù) SQL語句中各參數(shù)的名字，調(diào)用 ParamByName方法來為各參數(shù)賦值。一般來說，在一個應(yīng)用程序中應(yīng)該調(diào)用一次 Prepare方法，常常在窗體的 OnCreate事件處理過程中調(diào)用 Prepare方法， 然后用上述介紹的方法為參數(shù)賦值，最后調(diào)用 Open方法或 ExecSQL方法執(zhí)行 SQL語句，以完成查詢。在為 TQuery或 TADOquery部件設(shè)置完 SQL屬性的屬性值之后，也即編寫好適當(dāng)?shù)?SQL程序之后，可以有多種方式來執(zhí)行 SQL程序。在 Try 部分調(diào)用 Open方法，而在 Except部分調(diào)用 ExceSQL方法，這樣才能保證程序的正確運(yùn)行。當(dāng) Tquery或 TADOquery組件返回一個 “ 活 動 ” 的查詢結(jié)果數(shù)據(jù)集時，它的 CanModIfy屬性的值會被設(shè)置成 True。 Access的數(shù)據(jù)庫元 素：字段和記錄 數(shù)據(jù)庫工作表分為行和列，行稱為記錄，列稱為字段。表中信息分行、列存儲。 第四章： 醫(yī)院藥庫管理 系統(tǒng) 設(shè)計(jì)分析 系統(tǒng)功能分析 醫(yī)院藥庫管理 系統(tǒng) 需要滿足來自三方面的需求，這三個方面分別是病人， 醫(yī)院藥庫 工作人員和 醫(yī)院藥庫 管理人員。 ? 醫(yī)院藥庫 數(shù)據(jù)模塊：管理藥庫的相關(guān)數(shù)據(jù)業(yè)務(wù)。一種完整的方式是對局部結(jié)構(gòu)中任意兩個實(shí)體類型，依據(jù)需求分析的結(jié)果，考 察局部結(jié)構(gòu)中任意兩個實(shí)體類型之間是否存在聯(lián)系。簡單說來，數(shù)據(jù)模塊是用來集中管理數(shù)據(jù)源的一個窗體，該窗體可被需要的地方隨時引入。源代碼比較簡單， procedure (Sender: TObject)。39。39。 。 end //如果姓名或密碼有錯誤，通知用戶檢查！ else begin //如果輸入正確，使菜單和按鈕可用！ :=true。 :=true。 var sql:string。 //找到發(fā)藥前的庫存量 outnum:=(39。).asstring+ 39。 continue。+inttostr(totalnum) +39。39。 。 sql:=39。+39。 。 。39。+ 39。發(fā)藥成功，已經(jīng)更改數(shù)據(jù)庫中的數(shù)據(jù)！??！ 39。+ +39。+bianhao +39。編號 39。+ (39。).AsInteger。 江蘇大學(xué)本科生畢業(yè)論文 第 29 頁 共 55 頁 29 outnum:integer。 :=false。 :=true。用戶名或密碼錯誤，請檢查！ 39。39。39。 begin 。啟動畫面的窗體略，主要的源代碼如下 ( za在 中 )：?? 。還要考察一個實(shí)體類型內(nèi)部是否存在聯(lián)系，兩個實(shí)體類型之間是否存在聯(lián)系，多個實(shí)體類型之間是否存在聯(lián)系，等等。 如圖 第 0層 處方單號（病人） 藥品 藥品 1 藥品 1 圖 第 1層 處方單號 (收費(fèi)憑證 ) 藥品 藥品 醫(yī)院藥庫發(fā)藥子系統(tǒng) 醫(yī)院藥庫數(shù)據(jù)庫