畢業(yè)設(shè)計(jì)論文--醫(yī)院設(shè)備信息化綜合管理系統(tǒng)

1、<p>　　醫(yī)院設(shè)備信息化綜合管理系統(tǒng)</p><p>　　摘要：醫(yī)院設(shè)備信息化綜合管理系統(tǒng)廣泛應(yīng)用于各大中小醫(yī)院中，幾乎每個(gè)進(jìn)行了信息化建設(shè)的醫(yī)院類企業(yè)都建設(shè)了醫(yī)院設(shè)備管理信息系統(tǒng)。隨著科技的進(jìn)步社會(huì)的發(fā)展，對醫(yī)院的設(shè)備進(jìn)行現(xiàn)代化綜合管理已經(jīng)變得非常重要。醫(yī)院設(shè)備信息化綜合管理系統(tǒng)包括醫(yī)院設(shè)備的出入庫管理、醫(yī)院設(shè)備的庫存管理及查詢統(tǒng)計(jì)管理。</p><p>　　從設(shè)計(jì)到運(yùn)行，系

2、統(tǒng)基本上滿足了醫(yī)院對設(shè)備管理的需求，通過系統(tǒng)可以方便快捷的查詢設(shè)備的出入庫管理及庫存情況，打印輸出相應(yīng)明細(xì)報(bào)表，其中主要包括設(shè)備名稱、設(shè)備編號(hào)、規(guī)格型號(hào)、數(shù)量、單價(jià)、金額、最高庫存、最低庫存等相關(guān)內(nèi)容。并且可以方便的查詢進(jìn)庫、出庫等相關(guān)事宜以及各科室的領(lǐng)料情況,便于管理、提高。</p><p>　　醫(yī)院設(shè)備信息化綜合管理系統(tǒng)運(yùn)用了面向?qū)ο?、操作系統(tǒng)2000 、powerbuilder 9.0、SQL語言以及軟件工

3、程等各種工具方法，在滿足系統(tǒng)需求的基礎(chǔ)上追求代碼更加規(guī)范、界面更加美觀合理、使用操作更加方便，力求讓醫(yī)院的設(shè)備使用更加方便，患者就醫(yī)流程更加合理。</p><p>　　關(guān)鍵字：醫(yī)院 設(shè)備 管理 信息化</p><p>　　COMPREHENSIVE MANAGEMENT SYSTEM FOR HOSPITAL EQUIPMENT INFORMATION</p><p&g

4、t;　　ABSTRACT: The integrated management system of hospital equipment information is widely used in each large and middle hospitals, almost every hospital enterprise which has the informationization construction has been

5、building the information system of hospital equipment management.. With the development of science and technology, the modern comprehensive management of the hospital equipment has become very important.. The i

6、ntegrated management system of hospital equipment informationization inclu</p><p>　　From design to operation system basically meet the need of equipment management in hospitals, the system can quickly and ea

7、sily search for the equipment in and out of the warehouse management and inventory, print output the corresponding detailed reports, which mainly include device name, device number, specifications, types, quantity, unit

8、price, total amount, the highest inventory, minimum inventory etc. related content. And you can easily query the material into the library, library and other</p><p>　　Hospital equipment information inte

9、grated management system using the object-oriented, 2000, the original concept 9.0 operating system, SQL language, as well as a variety of tools such as software engineering method, on the basis of meet the system requir

10、ements in pursuit of code more standardized, more beautiful and reasonable, it is more convenient to use the operating interface, makes every effort to make hospital equipment use more convenient, was hospitalized proces

11、s more reasonable.</p><p>　　Keywords: hospital equipment management information</p><p><b>　　目錄</b></p><p><b>　　1.前言1</b></p><p>　　2.系統(tǒng)的需求設(shè)計(jì)概述2

12、</p><p>　　2.1 醫(yī)院設(shè)備管理要點(diǎn)及現(xiàn)狀2</p><p>　　2.2 醫(yī)院設(shè)備的定義及分類2</p><p>　　3.醫(yī)院設(shè)備管理系統(tǒng)設(shè)計(jì)應(yīng)用軟件4</p><p>　　3.1 系統(tǒng)開發(fā)環(huán)境4</p><p>　　3.2 其他管理系統(tǒng)工具簡介5</p><p>　　3.3

13、 開發(fā)數(shù)據(jù)庫應(yīng)用軟件綜述5</p><p>　　3.4 數(shù)據(jù)庫系統(tǒng)開發(fā)的幾個(gè)關(guān)鍵技術(shù)6</p><p>　　4.管理系統(tǒng)的對象分析設(shè)計(jì)9</p><p>　　4.1 面向?qū)ο蟮脑O(shè)計(jì)過程9</p><p>　　4.2 面向?qū)ο蠓治?</p><p>　　4.3面向?qū)ο笤O(shè)計(jì)9</p><p&

14、gt;　　4.4程序?qū)崿F(xiàn)及測試9</p><p>　　5.醫(yī)院設(shè)備管理系統(tǒng)結(jié)構(gòu)設(shè)計(jì)11</p><p>　　5.1 總體設(shè)計(jì)11</p><p>　　5.2 主要數(shù)據(jù)庫的邏輯關(guān)系設(shè)計(jì)11</p><p>　　5.3 系統(tǒng)結(jié)構(gòu)圖及其功能11</p><p>　　6.設(shè)備管理系統(tǒng)的實(shí)現(xiàn)22</p>

15、<p>　　7.設(shè)計(jì)總結(jié)及結(jié)論23</p><p><b>　　參考文獻(xiàn)24</b></p><p><b>　　附錄25</b></p><p><b>　　致謝35</b></p><p><b>　　1.前言</b></p&

16、gt;<p>　　隨著科技的進(jìn)步社會(huì)的發(fā)展，計(jì)算機(jī)技術(shù)已經(jīng)影響到我們生活的很多方面。我們的衣食住行正常生活以及辦公都離不開計(jì)算機(jī)的幫助，因此可以看出計(jì)算機(jī)在我們生活中的地位越來越重要。當(dāng)今社會(huì)是一個(gè)信息化的社會(huì)，為了提高生活水平和工作效率，各行各業(yè)對計(jì)算機(jī)的依賴越來越高，都在嘗試?yán)糜?jì)算機(jī)技術(shù)來實(shí)現(xiàn)自動(dòng)化管理手段，讓工作效率升高。醫(yī)院是與我們生活很貼近的一個(gè)行業(yè)，醫(yī)院的正常運(yùn)行工作已經(jīng)離不開計(jì)算機(jī)的支持。我們?nèi)メt(yī)院掛號(hào)、問

17、診、拿藥或是手術(shù)，沒有一樣能離開計(jì)算機(jī)的幫助。隨著醫(yī)療水平的進(jìn)步和醫(yī)療體系的完善，醫(yī)院需要提高競爭力更好的服務(wù)于人類，其中擁有一套成熟完美的管理系統(tǒng)成為必要條件。醫(yī)療設(shè)備是醫(yī)院醫(yī)療水平的體現(xiàn)也是醫(yī)學(xué)能力的一部分，醫(yī)學(xué)工作者的工作離不開精密的醫(yī)療設(shè)備。設(shè)備管理作為醫(yī)院管理系統(tǒng)的一個(gè)重要組成部分具有極其重要的作用，保證醫(yī)院醫(yī)療設(shè)備的正常運(yùn)行，使用一系列科學(xué)的計(jì)算機(jī)技術(shù)和方法，從而實(shí)現(xiàn)醫(yī)院的價(jià)值，提高醫(yī)院的經(jīng)濟(jì)效益。</p>&

18、lt;p>　　本醫(yī)院設(shè)備信息化管理系統(tǒng)基于PowerBuilder面向?qū)ο髴?yīng)用開發(fā)工具的使用， 在PowerBuilder使用的基礎(chǔ)上，探究了很多相關(guān)例子，比較具有代表性。通過對PowerBuilder的摸索和探究，包括老師的耐心指導(dǎo)，很大程度上提高了相關(guān)開發(fā)能力。</p><p>　　2 系統(tǒng)的需求設(shè)計(jì)概述</p><p>　　2.1 醫(yī)院設(shè)備管理要點(diǎn)及現(xiàn)狀</p>

19、<p>　　醫(yī)院設(shè)備是醫(yī)院不可或缺的一部分，醫(yī)療設(shè)備的正常工作是醫(yī)院得以運(yùn)行的基礎(chǔ)。起初沒有什么規(guī)范的信息化管理系統(tǒng)，經(jīng)過多年的發(fā)展，我國的醫(yī)院設(shè)備已經(jīng)有了相當(dāng)?shù)囊?guī)模，這就需要更加趨于規(guī)范和合理的醫(yī)院設(shè)備信息化管理系統(tǒng)。隨著人民生活水平的不斷提高，醫(yī)院設(shè)備的選用越來越嚴(yán)格，各種設(shè)備結(jié)構(gòu)和功能在不斷調(diào)整，應(yīng)用范圍也在逐步擴(kuò)大。擁有一個(gè)很好的設(shè)備管理系統(tǒng)則是整個(gè)醫(yī)院加強(qiáng)管理、更快的醫(yī)院運(yùn)行的必須條件設(shè)備管理優(yōu)劣，直接關(guān)系經(jīng)濟(jì)效益的

20、好壞。這無庸質(zhì)疑。</p><p>　　醫(yī)療設(shè)備是人類不斷研究發(fā)明的產(chǎn)物，具有高度的專業(yè)性、嚴(yán)密性，從開始到結(jié)束的全過程都是要加強(qiáng)管理控制。目前我國現(xiàn)階段醫(yī)療設(shè)備的管理不夠完善,缺乏一套統(tǒng)一規(guī)范的標(biāo)準(zhǔn)體系?，F(xiàn)狀是：我國不同地區(qū)的醫(yī)院設(shè)備水平差異大，管理軟件多種多樣無法形成規(guī)范，網(wǎng)絡(luò)使用星形拓?fù)浣Y(jié)構(gòu)。</p><p>　　2.2 醫(yī)院設(shè)備的定義及分類</p><p>

21、　　醫(yī)院設(shè)備是醫(yī)院為實(shí)施救治所必須的物質(zhì)保障，有了醫(yī)院設(shè)備的正常運(yùn)行，醫(yī)院的工作才能有條不紊的進(jìn)行。醫(yī)院設(shè)備指救治期間用于人體的儀器、設(shè)備及材料。就目前來說，醫(yī)院醫(yī)療水平的高低在很大程度上表現(xiàn)在儀器上。</p><p>　　使用醫(yī)院設(shè)備的目的在于：</p><p>　?。ㄒ唬╊A(yù)防、診斷治療和緩解疾病。</p><p>　?。ǘ┰\斷、治療、緩解損傷或者殘疾。<

22、/p><p>　　（三）研究、替代、調(diào)節(jié)解剖和生理過程。</p><p><b>　?。ㄋ模┛刂迫焉?。</b></p><p>　　為了更好地掌握醫(yī)院設(shè)備的情況，需要給他們分類。此次分為三大類：</p><p>　?。ㄒ唬┰\斷設(shè)備類又分為8類，即功能檢查設(shè)備、超聲診斷設(shè)備、內(nèi)窺鏡檢查設(shè)備、核醫(yī)學(xué)設(shè)備、X射線診斷設(shè)備、實(shí)驗(yàn)診斷

23、設(shè)備及病理診斷裝備。</p><p>　?。ǘ┲委熢O(shè)備類：又分為十小類 </p><p>　　1、 病房護(hù)理設(shè)備例如病床、推車等。</p><p>　　2、手術(shù)設(shè)備例如手術(shù)床、手術(shù)器械、顯微外科設(shè)備等。</p><p><b>　　3、放射治療設(shè)備。</b></p><p>　　核醫(yī)學(xué)治療設(shè)備。

24、 </p><p><b>　　理化設(shè)備。 </b></p><p>　　6、激光設(shè)備例如紅寶石激光、氦氖激光、二氧化碳激光等。 </p><p><b>　　7、透析治療設(shè)備。</b></p><p><b>　　8、體溫冷凍設(shè)備。</b></p><

25、;p><b>　　9、急救設(shè)備。</b></p><p>　　10、其它治療設(shè)備。</p><p>　?。ㄈ┹o助設(shè)備類例如空調(diào)設(shè)備、血庫設(shè)備、醫(yī)用錄像攝影設(shè)備等。</p><p>　　3 醫(yī)院設(shè)備信息化綜合管理系統(tǒng)設(shè)計(jì)軟件</p><p>　　3.1 系統(tǒng)開發(fā)環(huán)境</p><p>　　醫(yī)院

26、設(shè)備信息化綜合管理系統(tǒng)的開發(fā)選擇以下幾款軟件作為系統(tǒng)的平臺(tái)支持。</p><p>　　3.1.1網(wǎng)絡(luò)操作系統(tǒng) windows NT</p><p>　　Windows NT以其功能強(qiáng)大的系統(tǒng)軟件構(gòu)成，是目前使用最為普遍的網(wǎng)絡(luò)操作系統(tǒng)，因其安全性好、操作簡便及開放的互聯(lián)協(xié)議而被廣大用戶所采用。</p><p>　　Windows NT有多重引導(dǎo)功能、實(shí)現(xiàn)了“搶先式”多

27、任務(wù)和多線程操作、支持多CPU系統(tǒng)、支持多種硬件平臺(tái)、可與各種網(wǎng)絡(luò)操作系統(tǒng)實(shí)現(xiàn)互操作、支持多種協(xié)議、安全性極高等特點(diǎn)。</p><p>　　Windows NT引入了NIFS、共享、用戶賬戶、域、工作群組、權(quán)利、權(quán)限、安全審核等新概念，已經(jīng)逐漸取代其他平臺(tái)成為企業(yè)組網(wǎng)的標(biāo)準(zhǔn)平臺(tái)。</p><p>　　3.1.2安裝windows2000 客戶平臺(tái)</p><p>　

28、　Windows2000 客戶平臺(tái)是由微軟公司發(fā)行于1999年底的WindowsNT系列的32位視窗操作系統(tǒng)。</p><p>　　Windows2000共有4個(gè)版本：專業(yè)版、服務(wù)器版、高級(jí)服務(wù)器版和數(shù)據(jù)中心服務(wù)器版。它的新功能有：遠(yuǎn)程計(jì)算、安全性、基工作方式、計(jì)算環(huán)境、智能鏡像、多種多樣的資源管理工具、資源應(yīng)用等。 Windows2000對單CPU系統(tǒng)和雙CPU系統(tǒng)均支持。</p>&l

29、t;p>　　3.1.3面向?qū)ο蟮臄?shù)據(jù)庫開發(fā)工具PowerBuider 9.0</p><p>　　PowerBuilder是一種面向?qū)ο蟮膽?yīng)用開發(fā)工具，在數(shù)據(jù)庫前端開發(fā)工具里面是最好的一種。他繼承了一個(gè)強(qiáng)大和易于使用的第四代編程語言，內(nèi)置的對象類，包括各種數(shù)據(jù)，包括，可以很好的支持和訪問各種數(shù)據(jù)庫，目前廣泛使用的，如IBM DB2、Oracle、Microsoft SQL Serve、Informix等。他

30、還具有優(yōu)良的多平臺(tái)支持的特點(diǎn)。特別是PowerBuilder8.0的發(fā)布，使其在集成開發(fā)環(huán)境、項(xiàng)目組織上更趨完善，不僅能更好的進(jìn)行基于客戶機(jī)/服務(wù)器（C/S）模式的應(yīng)用開發(fā)，而且具有方便高效的優(yōu)勢。PowerBuilder9.0與以前的版本相比，其界面風(fēng)格有了很大的變化，增加了許多功能，主要體現(xiàn)在Web Services、版本控管能力和網(wǎng)頁制作功能等方面。其中菜單中增加了Run 和Tools兩項(xiàng)，因此與之前的版本有所不同，功能也更加方便

31、合適。另一方面引入了一些新的概念（如工作區(qū)、目標(biāo)、系統(tǒng)數(shù)等），工具欄也發(fā)生了變化，對新的功能作了一些處理。</p><p>　　PowerBuilder的安裝環(huán)境-需要用到的計(jì)算機(jī)基本配置：</p><p>　　?486以上的CPU;</p><p>　　?16MB以上的內(nèi)存；</p><p>　　?CD-ROM驅(qū)動(dòng)器；</p>

32、<p><b>　　?VGA顯示器；</b></p><p>　　?不少于45MB的硬盤空間；</p><p>　　?Windows95/98,或Windows NT4.0/5.0操作系統(tǒng)。</p><p>　　3.2 其他管理系統(tǒng)工具簡介</p><p>　　3.2.1大型數(shù)據(jù)庫管理系統(tǒng)Sybase &l

33、t;/p><p>　　Sybase是國際上流行的三大數(shù)據(jù)庫之一，是真正開放的數(shù)據(jù)庫；是一種高性能的數(shù)據(jù)庫，率先實(shí)現(xiàn)了客戶/服務(wù)器體系結(jié)構(gòu)。 </p><p>　　3.2.2 SQL Server 7.0簡介</p><p>　　SQL SERVER 又叫結(jié)構(gòu)化查詢語言，作用于與各種數(shù)據(jù)庫直接建立聯(lián)系。其主要特點(diǎn)有真正的客戶機(jī)/服務(wù)器體系結(jié)構(gòu)、圖形化用戶界面、與Wind

34、ows NT完全集成等。SQL Server 7.0是1998年開發(fā)出來的，其配置有特定的要求。對于一些復(fù)雜的業(yè)務(wù)流程，需要相應(yīng)的程序來描述，要求在在考慮實(shí)用性的同時(shí)還應(yīng)考慮到設(shè)備使用頻率，頻率高的優(yōu)先購買，反之?dāng)嗪蟆?lt;/p><p>　　3.3 開發(fā)數(shù)據(jù)庫應(yīng)用軟件概述</p><p><b>　　軟件開發(fā)方法</b></p><p>　　3

35、.3.1結(jié)構(gòu)化方法</p><p>　　結(jié)構(gòu)化分析，顧名思義就是面向數(shù)據(jù)流自上而下逐步的進(jìn)行分析。（1）根據(jù)可行性研究繪畫，數(shù)據(jù)流圖。（2）檢查和細(xì)化數(shù)據(jù)流圖，以保證能滿足客戶的要求。</p><p>　　結(jié)構(gòu)化設(shè)計(jì)由兩部分組成：總體設(shè)計(jì)和詳細(xì)設(shè)計(jì)?？傮w設(shè)計(jì)步驟：首先設(shè)想供選擇的方案并選取合理的然后推薦最佳方案最后進(jìn)行功能分解。</p><p>　　3.3.2面向數(shù)

36、據(jù)結(jié)構(gòu)的軟件開發(fā)方法</p><p>　　1.Jackson方法-是至今仍在廣泛使用的開發(fā)方法，主要用于設(shè)計(jì)詳細(xì)模塊，主要針對輸入、輸出數(shù)據(jù)結(jié)構(gòu)比較明確的系統(tǒng)。</p><p>　　2. Weanier只考慮出入數(shù)據(jù)結(jié)構(gòu)，Jackson方法同時(shí)還考慮輸出數(shù)據(jù)結(jié)構(gòu)，因此Warnier方法和Jackson方法類似。</p><p>　　3.問題分析法,不僅考慮輸入、輸出

37、結(jié)構(gòu)，還指導(dǎo)系統(tǒng)的分解。這一方法的局限性就是只適用于中小型問題</p><p><b>　　4.原型化方法</b></p><p>　　5.面向?qū)ο蟮能浖_發(fā)方法</p><p><b>　　6.可視化開發(fā)方法</b></p><p>　　7.基于組件的軟件開發(fā)</p><p&g

38、t;　　因此構(gòu)件必須自包容，組件還能跨網(wǎng)絡(luò)而運(yùn)行，突出的特點(diǎn)是涉及的成員，這是軟件工廠的生產(chǎn)線的組件，軟件開發(fā)的必要性成員不得是持續(xù)的，即沒有屬性的個(gè)體特異性成分。這可以理解為，其成員不得與自己不同的副本。</p><p>　　用組件開發(fā)應(yīng)用程序的意義</p><p>　　現(xiàn)狀是很多的專門開發(fā)商開發(fā)出了能滿足客戶需求完成特定任務(wù)功能的組件。例如Microsoft公司的COM/DCOM，由O

39、MG集團(tuán)定義的CORBA等。在COM庫中就可提供如下4類可執(zhí)行代碼：</p><p>　　提供COM的應(yīng)用程序接口函數(shù)（API），例如在客戶方提供聲稱基本對象的函數(shù)，在服務(wù)器方提供對外公布其接口的函數(shù)等.</p><p>　　提供遠(yuǎn)程過程調(diào)用服務(wù)。</p><p>　　提示進(jìn)程內(nèi)的內(nèi)存分配管理。</p><p>　　用戶可首先考慮購買合適的組

40、件，然后想想自己的發(fā)展，然后按照一定的要求，構(gòu)建自己的應(yīng)用程序可以在這些組件，極大地提高了工作效率，降低了成本。</p><p>　　3.4 數(shù)據(jù)庫系統(tǒng)開發(fā)的幾個(gè)關(guān)鍵技術(shù)</p><p>　　3.4.1數(shù)據(jù)庫系統(tǒng)的主要組件</p><p>　　應(yīng)該包含4個(gè)要素，他們分別是：</p><p>　　·用戶數(shù)據(jù)：用戶希望此系統(tǒng)保存和使用的

41、數(shù)據(jù)。</p><p>　　·元數(shù)據(jù)：數(shù)據(jù)庫自身結(jié)構(gòu)描述的數(shù)據(jù)。</p><p>　　·指數(shù)：為了訪問一組輔助數(shù)據(jù)的增加性能變化的數(shù)據(jù)庫。</p><p>　　·應(yīng)用元數(shù)據(jù)：用于存儲(chǔ)用戶表，保存，查詢和其他形式的數(shù)據(jù)接口。 </p><p>　　數(shù)據(jù)庫管理系統(tǒng)(DBMS)按照其特點(diǎn)和功能又劃分為3個(gè)方面。<

42、/p><p>　　·運(yùn)行子程序：它處理用設(shè)計(jì)工具開發(fā)的應(yīng)用組件，此外還有一種運(yùn)行組件，有它處理應(yīng)用程序讀寫數(shù)據(jù)庫數(shù)據(jù)的請求。</p><p>　　·DBMS引擎：數(shù)據(jù)庫引擎還涉及事務(wù)管理，鎖緊，備份和恢復(fù)。</p><p><b>　　3.4.2開發(fā)策略</b></p><p>　　數(shù)據(jù)庫開發(fā)分為兩種：自

43、底向上和自頂向下。數(shù)據(jù)庫分析是軟件開發(fā)過程中很重要的一個(gè)階段。自頂向下的方法是為了構(gòu)造抽象的數(shù)據(jù)模型，它的優(yōu)點(diǎn)是用全局觀點(diǎn)建立數(shù)據(jù)模型，因此使得該軟件的接口好，數(shù)據(jù)共享及完整性約束都相對好一些。自底向上的方法避免了自頂向下可能導(dǎo)致的許多難以實(shí)現(xiàn)的結(jié)果，風(fēng)險(xiǎn)小一些，雖然生成的系統(tǒng)不一定是最好的，但一定是很快并且有用的。一般在日常工作中人們經(jīng)常把這兩種方法相結(jié)合，在總體上使用自頂向下而在細(xì)節(jié)中采用自底向上的方式。</p>&l

44、t;p><b>　　3.4.3數(shù)據(jù)建模</b></p><p>　　數(shù)據(jù)模型傳統(tǒng)的分為三種：層次模型、網(wǎng)狀模型和關(guān)系模型。數(shù)據(jù)模型在概念級(jí)被描述分為三種：實(shí)體-聯(lián)系模型和語義對象模型以及類模型。</p><p>　　1．實(shí)體-聯(lián)系模型，這就是所謂的E-R模型。</p><p><b>　　2．語義對象模型</b>&l

45、t;/p><p>　　3．類模型，類模型一般在用面向?qū)ο蠓椒ㄩ_發(fā)軟件時(shí)則采用。</p><p>　　3.4.4數(shù)據(jù)規(guī)范化</p><p>　　在分析問題的過程中根據(jù)系統(tǒng)的建模，子模型完整的集成系統(tǒng)模型。此過程中有時(shí)會(huì)發(fā)生沖突：屬性沖突，結(jié)構(gòu)沖突，命名沖突。</p><p>　　3.4.5數(shù)據(jù)模型到關(guān)系數(shù)據(jù)庫的映射</p><p

46、>　　1．E-R模型到關(guān)系數(shù)據(jù)庫的映射</p><p>　　1：1關(guān)系，形成1：1關(guān)聯(lián)；</p><p>　　1:N關(guān)系，形成1對多關(guān)聯(lián)；</p><p>　　M:N關(guān)系，把一個(gè)實(shí)體用一個(gè)關(guān)系表示并建第三個(gè)關(guān)系，來表示多對多關(guān)系，在關(guān)系中存放原來兩個(gè)關(guān)系的主鍵，把多對多關(guān)系轉(zhuǎn)化為一對多關(guān)系。</p><p>　　2．語義對象模型到關(guān)系數(shù)

47、據(jù)庫的映射</p><p>　　3．類到關(guān)系數(shù)據(jù)庫的映射</p><p>　　3.4.6數(shù)據(jù)庫的安全設(shè)計(jì)</p><p>　　用戶 ----〉 DBMS ------〉 OS ----〉 DB </p><p>　　--- ----- ---</p><p>　　

48、用戶標(biāo)識(shí)和鑒定 存取控制 OS級(jí)安全控制 密碼存取</p><p>　　圖3.1網(wǎng)絡(luò)安全級(jí)別</p><p>　　用戶集 訪問權(quán) 信息集</p><p>　　-------------------〉</p><p>　　圖3.2 訪問權(quán)設(shè)置</p><p>　　4

49、. 管理系統(tǒng)的對象分析設(shè)計(jì)</p><p>　　4.1 面向?qū)ο蟮脑O(shè)計(jì)過程</p><p>　　運(yùn)用面向?qū)ο蠹夹g(shù)開發(fā)軟件時(shí)，要深刻理解熟練使用面向?qū)ο蟮母鞑糠?，以及類似基本模型和永久模型這樣的構(gòu)件來消除使用UML(UnifideModelLanguage統(tǒng)一建模語言)所產(chǎn)生的與實(shí)際問題之間的差異。用面向?qū)夹g(shù)來開發(fā)軟件的最小過程:</p><p>　　需求

50、 分析 設(shè)計(jì) 編程</p><p><b>　　測試</b></p><p>　　圖4.1開發(fā)軟件過程</p><p>　　4.2 面向?qū)ο蠓治?lt;/p><p>　　面向?qū)ο蠓治鼍褪乔宄枨笠约懊靼滓鍪裁?，面向?qū)ο蠓治龅哪康氖菍陀^世界的系統(tǒng)進(jìn)行建模。</p&g

51、t;<p><b>　　4.3面向?qū)ο笤O(shè)計(jì)</b></p><p>　　面向?qū)ο笤O(shè)計(jì)的目的是確定如何建造系統(tǒng)，即要看系統(tǒng)所要實(shí)現(xiàn)的功能。與面向?qū)ο蠓治霾煌?，分析主要是理解需要做什么。首先來說設(shè)計(jì)過程與需求和分析過程類似，也是一個(gè)交互的過程；其次分析和設(shè)計(jì)相互作用而且分析類模型發(fā)展成為設(shè)計(jì)類模型，以此反映出實(shí)現(xiàn)的環(huán)境特點(diǎn)，類似層次這樣的設(shè)計(jì)概念以及設(shè)計(jì)模式的應(yīng)用。</p&g

52、t;<p>　　4.4程序?qū)崿F(xiàn)及測試</p><p>　　面向?qū)ο缶幊痰哪康臉?gòu)造系統(tǒng),開發(fā)代碼。設(shè)計(jì)構(gòu)件去動(dòng)員代碼的開發(fā)。然而程序的設(shè)計(jì)和實(shí)際編程在一定程度上相互聯(lián)系相互作用。編程能揭示出設(shè)計(jì)中存在的缺陷。面向?qū)ο缶幊痰哪康氖悄軌驅(qū)崿F(xiàn)程序的代碼，可以說是從模型轉(zhuǎn)換到代碼的過程。</p><p>　　圖4.2全生命周期面向?qū)ο鬁y試方法的技術(shù)</p><p&g

53、t;　　5.醫(yī)院設(shè)備信息化綜合管理系統(tǒng)結(jié)構(gòu)設(shè)計(jì)</p><p><b>　　5.1 總體設(shè)計(jì)</b></p><p>　　醫(yī)院設(shè)備的基礎(chǔ)管理指對醫(yī)院設(shè)備申請購置、入庫、出庫、報(bào)廢進(jìn)行管理。</p><p>　　圖5.1醫(yī)院設(shè)備的基礎(chǔ)管理</p><p>　　5.2 主要數(shù)據(jù)庫的邏輯關(guān)系設(shè)計(jì)</p><

54、p>　　數(shù)據(jù)庫開發(fā)技術(shù)就是在正式進(jìn)行程序編碼設(shè)計(jì)之前對系統(tǒng)的需求、功能、結(jié)構(gòu)以及流程進(jìn)行設(shè)計(jì)，以此來提高效率。</p><p>　　每個(gè)設(shè)備名稱對應(yīng)一個(gè)編號(hào)代碼，錄入數(shù)據(jù)庫，既能進(jìn)行分類，又實(shí)現(xiàn)了標(biāo)準(zhǔn)規(guī)范化。</p><p>　　醫(yī)院設(shè)備進(jìn)倉庫。每種設(shè)備入庫時(shí)，等級(jí)日期、數(shù)量、規(guī)格等屬性，構(gòu)建基本庫。</p><p>　　醫(yī)療設(shè)備在用庫和報(bào)廢庫。</p&

55、gt;<p>　　5.3 系統(tǒng)結(jié)構(gòu)圖及其功能</p><p>　　圖5.2醫(yī)院專家系統(tǒng)網(wǎng)絡(luò)結(jié)構(gòu)示意圖</p><p>　　本軟件系統(tǒng)主要包括設(shè)備出入庫管理、庫存管理、查詢統(tǒng)計(jì)以及系統(tǒng)維護(hù)等功能，因此在設(shè)計(jì)上分為五大功能模塊?，F(xiàn)將設(shè)計(jì)功能分析如下：</p><p>　?。?）系統(tǒng)維護(hù)功能由以下幾方面組成：</p><p>　　&#

56、183;綜合初始系數(shù)設(shè)置：由出入庫單號(hào)、月起始日和終止日來設(shè)置初始系數(shù)。</p><p>　　·清除數(shù)據(jù)庫中數(shù)據(jù)：將永久性刪除數(shù)據(jù)庫中的數(shù)據(jù)。</p><p>　　·設(shè)備檔案管理：包括設(shè)備編號(hào)、名稱、類別、計(jì)量單位、庫存數(shù)量、最高庫存、最低庫存等用來查詢、增加、刪除、修改設(shè)備等。</p><p>　　圖5.3 設(shè)備檔案建立</p>

57、<p>　　·單位部門字典：以單位部門為檢索，有增加、刪除、修改、查詢功能。</p><p>　　·管理用戶：增加、刪除或修改用戶，每增加一個(gè)用戶系統(tǒng)自動(dòng)生成默認(rèn)口令。</p><p>　　·常用設(shè)備名稱字典：統(tǒng)計(jì)常用設(shè)備的名稱，有刪除、增加、查詢等功能。</p><p>　　·規(guī)格型號(hào)字典：統(tǒng)計(jì)設(shè)備的規(guī)格型號(hào)，有刪

58、除、增加、查詢等功能。</p><p>　　·初始化設(shè)備：用來初始化設(shè)備的信息，包括設(shè)備的名稱，規(guī)格型號(hào)，數(shù)量，單價(jià)金額等要素，可以對設(shè)備的管理進(jìn)行增加及刪除。</p><p>　　·會(huì)計(jì)人員字典：會(huì)計(jì)人員名單的保存，具備刪除、增加、查詢功能</p><p>　　·保管員字典：保管員的名單，具備刪除、增加、查詢功能</p>

59、<p>　　·經(jīng)辦人字典：經(jīng)辦人的名單，具備刪除、增加、查詢功能</p><p>　　圖5.4 名稱輸入界面</p><p>　　設(shè)備分類字典：設(shè)備的分類屬性，可以增加、刪除、查詢設(shè)備種類、設(shè)備的名稱，設(shè)備類別的統(tǒng)計(jì)。</p><p>　　圖5.5設(shè)備名稱輸入界面</p><p>　　計(jì)量單位字典：設(shè)備的計(jì)量單位，有增加

60、、刪除、查詢等功能。</p><p>　　圖5.6 計(jì)量單位輸入界面</p><p>　?。?）設(shè)備入庫管理功能</p><p>　　設(shè)備入庫：輸入設(shè)備的入庫單號(hào)，設(shè)備名稱，設(shè)備的規(guī)格型號(hào)，發(fā)票號(hào)，入庫數(shù)量，入庫單價(jià)，入庫金額，設(shè)備保管員，物資會(huì)計(jì)，備注等要素以便用來查詢、增加、刪除。</p><p><b>　　1）入庫記帳：&l

61、t;/b></p><p>　　//string mmcc,ffll,ddww,wz_bh</p><p>　　string rck_rq,rck_bh,rck_mc,rck_ggxh,rck_cd,yyyy,rck_dw,rck_wzbh,rck_wzfl</p><p>　　string xx_1,xx_2</p><p>　　d

62、ouble rck_sm,x000</p><p>　　dec {3} rck_gjje,rck_dj//打印之前先保存，防止發(fā)生意外錯(cuò)誤</p><p>　　dw_1.accepttext ()</p><p>　　IF dw_1.Update( ) = 1 THEN</p><p><b>　　COMMIT ;</b&

63、gt;</p><p><b>　　ELSE</b></p><p>　　messagebox('提示','存盤錯(cuò)誤！')</p><p>　　ROLLBACK ;</p><p><b>　　return</b></p><p><b&

64、gt;　　END IF</b></p><p>　　圖5.7設(shè)備入庫界面</p><p>　　重打印設(shè)備入庫清單：首先進(jìn)入窗口，輸入入庫單的編號(hào)，即可查詢出相關(guān)設(shè)備編號(hào)，設(shè)備的類別、設(shè)備的名稱、設(shè)備規(guī)格、單位、入庫數(shù)量、入庫單價(jià)、入庫金額、備注及設(shè)備保管人、經(jīng)手人、會(huì)計(jì)等信息。</p><p>　　設(shè)備入庫查詢：可以根據(jù)設(shè)備入庫的時(shí)間、設(shè)備的分類或者設(shè)備

65、名稱來查詢，查詢結(jié)果包括入庫日期、入庫單號(hào)、設(shè)備分類、設(shè)備名稱、規(guī)格型號(hào)、計(jì)量單位、入庫數(shù)量、設(shè)備購進(jìn)單價(jià)、入庫金額、入庫發(fā)票號(hào)、生產(chǎn)廠家、設(shè)備保管員、經(jīng)辦人、備注等。</p><p>　　設(shè)備的入庫統(tǒng)計(jì)分類表：可以根據(jù)設(shè)備當(dāng)時(shí)的入庫時(shí)間、設(shè)備分類或設(shè)備名稱來查詢，查詢的結(jié)果包括設(shè)備類別、設(shè)備的名稱、規(guī)格單位、數(shù)量、單價(jià)、金額等。</p><p>　　設(shè)備月入庫明細(xì)：根據(jù)要查詢的月份來查詢

66、，結(jié)果包括入庫日期、入庫單號(hào)、設(shè)備的分類、設(shè)備的名稱、規(guī)格、型號(hào)、計(jì)量單位、數(shù)量、單價(jià)、總金額、發(fā)票號(hào)、設(shè)備保管員、經(jīng)辦人、備注等。</p><p>　　設(shè)備每月入庫統(tǒng)計(jì)：根據(jù)要查詢的月份來查詢設(shè)備每月入庫情況，查詢的結(jié)果包括設(shè)備名稱，設(shè)備數(shù)量及金額，同時(shí)軟件會(huì)自動(dòng)匯總出本月總?cè)霂旖痤~。</p><p>　　圖5.8入庫單編輯界面</p><p>　?。?）設(shè)備出庫

67、管理功能：</p><p>　　設(shè)備出庫：領(lǐng)設(shè)備部門為依據(jù)進(jìn)行查詢，例如內(nèi)科、婦科科、醫(yī)務(wù)科、口腔科、針灸科、外科等科室，查詢結(jié)果包括設(shè)備入庫單號(hào)、設(shè)備名稱、相關(guān)領(lǐng)料部門、規(guī)格、型號(hào)、數(shù)量、單價(jià)、金額、報(bào)關(guān)員、物資會(huì)計(jì)等，打印即存盤。</p><p>　　圖5.9出庫原由界面</p><p>　　重打印設(shè)備出庫清單：根據(jù)出庫單的編號(hào)查詢并打印出庫單據(jù)，查詢結(jié)果包括領(lǐng)

68、料部門、出庫單號(hào)及設(shè)備的類別、名稱、規(guī)格單位、數(shù)量、單價(jià)、金額、設(shè)備保管員、領(lǐng)物人、會(huì)計(jì)等。</p><p>　　圖5.10打印出庫單界面</p><p>　　設(shè)備出庫查詢：根據(jù)查詢時(shí)間的范圍或相關(guān)部門、設(shè)備編號(hào)、設(shè)備分類、設(shè)備名稱等關(guān)鍵詞查詢，查詢的結(jié)果包括出庫日期、領(lǐng)用的單位、設(shè)備的出庫單、設(shè)備的分類、設(shè)備名稱、規(guī)格型號(hào)、計(jì)量單位、出庫數(shù)量、出庫單價(jià)、出庫金額、設(shè)備相關(guān)保管員、經(jīng)辦人、

69、備注等。</p><p>　　出庫設(shè)備統(tǒng)計(jì)分類表：根據(jù)查詢時(shí)間或使用部門、設(shè)備編號(hào)、分類、名稱等查詢，結(jié)果包括單位名稱、設(shè)備編號(hào)、設(shè)備名稱、規(guī)格、單位、數(shù)量、單價(jià)、金額等，軟件根據(jù)查詢結(jié)果自動(dòng)生成合計(jì)等結(jié)果，另一方面也能夠查詢出設(shè)備的保管人、領(lǐng)用人、制表人。</p><p>　　圖5.11入庫單查詢界面</p><p>　　只有管理“倉庫一”的操作員才能在“選擇出庫

70、憑證”表單中看到該收貨單。設(shè)定操作員的“倉庫”屬性如下圖（在出庫單中）所示：</p><p>　　圖5.12 設(shè)備出庫倉庫查詢界面</p><p>　　設(shè)備出庫查詢：可以根據(jù)設(shè)備出庫時(shí)間范圍、分類或名稱來查詢，結(jié)果包括出庫日期、出庫單號(hào)、設(shè)備編號(hào)、設(shè)備名稱、設(shè)備分類、使用單位、出庫數(shù)量、出庫單價(jià)、出庫金額、規(guī)格型號(hào)、單位、經(jīng)辦人、保管員、備注等。</p><p>　

71、　設(shè)備出庫統(tǒng)計(jì)：根據(jù)設(shè)備出庫時(shí)間、分類或名稱來對設(shè)備進(jìn)行查詢，結(jié)果包括設(shè)備類別、設(shè)備名稱、規(guī)格、單位、數(shù)量、單價(jià)、金額等。</p><p>　　圖5.13單位月領(lǐng)用設(shè)備清單界面</p><p>　　庫存明細(xì)查詢：根據(jù)設(shè)備類別或名稱查詢相應(yīng)庫存信息，結(jié)果包括設(shè)備編號(hào)、名稱、庫存、單位等。</p><p>　　月出庫統(tǒng)計(jì)：根據(jù)所需要查詢月份來查詢，通過設(shè)備信息的具體條件

72、來查詢，結(jié)果包括月初月末庫存、本月入庫出庫等。</p><p>　　設(shè)備檔案查詢：根據(jù)類別或名稱查詢相應(yīng)設(shè)備庫存的信息，查詢結(jié)果包括設(shè)備編號(hào)、名稱、庫存、單位等。</p><p>　　圖5.14設(shè)備庫存檔案查詢界面</p><p>　　設(shè)備庫存名細(xì)表：該表記錄了設(shè)備的庫存情況，查詢結(jié)果包括設(shè)備編號(hào)、名稱、規(guī)格、數(shù)量、單價(jià)、金額、庫存等。</p><

73、;p>　　部門月領(lǐng)用設(shè)備統(tǒng)計(jì)：根據(jù)領(lǐng)用時(shí)間查詢設(shè)備的領(lǐng)用情況，也可根據(jù)年月份及具體部門名稱查詢某部門的領(lǐng)用設(shè)備情況及金額。查詢結(jié)果可以有設(shè)備名稱、數(shù)量、金額等。</p><p>　　圖5.15單位月領(lǐng)用設(shè)備統(tǒng)計(jì)界面</p><p>　　6 設(shè)備管理系統(tǒng)的實(shí)現(xiàn)</p><p>　　程序的運(yùn)行與調(diào)試分析：</p><p>　　在完成編碼的實(shí)

74、現(xiàn)之后，需要對程序進(jìn)行必要的運(yùn)行與調(diào)試。目的是為了審核程序的實(shí)現(xiàn)及功能與用戶的需求是否一致，也是對程序編碼進(jìn)行查錯(cuò)的過程。一般來說，根據(jù)系統(tǒng)的性能特點(diǎn)，用編碼測試和測試實(shí)例的方法來測試以保證系統(tǒng)的正常運(yùn)行。編碼測試即調(diào)試，是發(fā)現(xiàn)錯(cuò)誤的位置并排除錯(cuò)誤的過程。</p><p>　　醫(yī)院設(shè)備信息化綜合管理系統(tǒng)包括需求分析、方案選擇、系統(tǒng)設(shè)計(jì)、模塊設(shè)計(jì)以及程序運(yùn)行與調(diào)試，其中還有很多細(xì)節(jié)方面的不足。隨著現(xiàn)代醫(yī)學(xué)的進(jìn)步醫(yī)療

75、水平的提高，本系統(tǒng)的功能和特性也會(huì)不斷完善與修改。</p><p>　　經(jīng)過多次調(diào)試與修改之后，系統(tǒng)能基本上滿足醫(yī)院對設(shè)備管理的需求，能做到基本信息錄入、系統(tǒng)的出入庫操作管理、庫存管理、查詢統(tǒng)計(jì)以及系統(tǒng)維護(hù)功能，提高工作效率和醫(yī)院效益。</p><p><b>　　7 設(shè)計(jì)總結(jié)及結(jié)論</b></p><p>　　醫(yī)療設(shè)備是當(dāng)代醫(yī)學(xué)界有力的支撐，

76、利用設(shè)備管理系統(tǒng)對醫(yī)療設(shè)備合理規(guī)范的管理是醫(yī)院的一項(xiàng)必不可少的項(xiàng)目。醫(yī)院設(shè)備信息化綜合管理系統(tǒng)是一個(gè)趨于全面的規(guī)范的系統(tǒng)，隨著醫(yī)療水平的不斷進(jìn)步，利用網(wǎng)絡(luò)的計(jì)算機(jī)技術(shù)也會(huì)日益成熟，助醫(yī)院合理完善的管理設(shè)備走上現(xiàn)代化之路。</p><p>　　本次實(shí)踐，通過對操作系統(tǒng)2000 、powerbuilder 9.0、SQL語言以及軟件工程的親身實(shí)踐和應(yīng)用，學(xué)到了往日在書本上學(xué)不到的知識(shí)，由此體會(huì)到了實(shí)踐的重要性。另一方

77、面，通過本次實(shí)踐體現(xiàn)出了自己在宏觀設(shè)計(jì)方面的不足，在初期設(shè)計(jì)思想能力方面還需下很大的功夫。本次設(shè)計(jì)我最大的收益是學(xué)會(huì)了把以前學(xué)過的各種知識(shí)聯(lián)系起來，對各種相關(guān)的概念有了更加全面的掌握。理論與實(shí)際相結(jié)合，不拘泥于書本，又以書為本。</p><p><b>　　參考文獻(xiàn)</b></p><p>　　[1] 李石山，孫韶光、王新海.管理信息系統(tǒng)[M].北京：高等教育出版社.

78、2010.1</p><p>　　[2] 李玲.數(shù)據(jù)庫管理系統(tǒng)及應(yīng)用[M].北京：中國經(jīng)濟(jì)出版社.2012.10</p><p>　　[3] 衛(wèi)海.Power builder課程設(shè)計(jì)案例精編[M].北京：中國水利水電出版社.2012.8</p><p>　　[4] 薩師煊，王珊.數(shù)據(jù)庫系統(tǒng)概論[M].北京：高等教育出版社.2013</p><p&

79、gt;　　[5] 馬安貴，李明武，朱永生.Power builder Win32 API程序設(shè)計(jì)寶典[M].北京：清華大學(xué)出版社.2013.7</p><p>　　[6] 姚阿慶等.醫(yī)院管理大全[M].北京：科學(xué)技術(shù)文獻(xiàn)出版社.1996:156-237</p><p>　　[7] 蔡毅.PowerBuilder 9.0基礎(chǔ)開發(fā)篇[M].北京：清華大學(xué)出版社.2003:253-321<

80、/p><p>　　[8] 朱愛民.PowerBuilder編程實(shí)用技術(shù)與案例[M].清華大學(xué)出版社.2002.6:277-309</p><p>　　[9] 周鋼.PowerBuilder 項(xiàng)目開發(fā)實(shí)踐[M].中國鐵道出版社.2003.08:165-204</p><p>　　[10] 顧澤月.PowerBuilder9.0 基礎(chǔ)教程[M].機(jī)械工業(yè)出版社.2004.0

81、9:246-283 </p><p>　　[11] 陳春玲.軟件工程與數(shù)據(jù)庫概論[M](第一版).西安:西安電子科技大學(xué)出版社.2002.8:93-109</p><p>　　[12] 陳永強(qiáng),謝維成.SQL Server數(shù)據(jù)庫企業(yè)應(yīng)用系統(tǒng)開發(fā)[M] (第一版).北京：清華大學(xué)出版社,2004.4:55-112</p><p>　　[13] 羅駿.SQL 實(shí)用簡明教

82、程[M] (第一版).武漢：中國水利出版社. 2004.8:65-120</p><p>　　[14] 夏邦貴.SQL Server數(shù)據(jù)庫開發(fā)入門與范例解析[M]. 北京：機(jī)械工業(yè)出版社.2004.3:91-144</p><p>　　[15] [美]William E.Perry.《軟件測試的有效方法》[M].北京：機(jī)械工業(yè)出版社. 2004.3:71-125</p>&l

83、t;p>　　[16] 古樂,史九林.軟件測試技術(shù)概論[M] (第一版). 北京： 清華大學(xué)出版社. 2004.4:97-143</p><p>　　[17] 宋振會(huì).SQL Server2000中文版基礎(chǔ)教程[M].北京：清華大學(xué)出版社.2005:235-260</p><p>　　[18] 宋振會(huì).面向?qū)ο蠹夹g(shù)原理與設(shè)計(jì)[M].長沙：國防科技大學(xué)出版社.1992:100-134 &

84、lt;/p><p>　　[19] 王維紅,樊廷玖; 基于TPM的醫(yī)療設(shè)備維護(hù)管理要點(diǎn) [J]; 中國醫(yī)療設(shè)備; 2008年02期</p><p>　　[20] 陳宏文; 醫(yī)療設(shè)備維護(hù)管理初探 [J]; 醫(yī)療設(shè)備信息; 2006年12期</p><p>　　[21] 何金環(huán); 醫(yī)療設(shè)備的現(xiàn)代管理 [J];醫(yī)療裝備</p><p><b>

85、　　附錄</b></p><p>　　本次的醫(yī)院設(shè)備管理系統(tǒng)的部分源程序如下：</p><p><b>　　1.入庫記帳：</b></p><p>　　//string mmcc,ffll,ddww,wz_bh</p><p>　　string rck_rq,rck_bh,rck_mc,rck_ggxh,r

86、ck_cd,yyyy,rck_dw,rck_wzbh,rck_wzfl</p><p>　　string xx_1,xx_2</p><p>　　double rck_sm,x000</p><p>　　dec {3} rck_gjje,rck_dj</p><p>　　//打印前必須先存盤，預(yù)防有不規(guī)則數(shù)據(jù)產(chǎn)生</p><

87、;p>　　dw_1.accepttext ()</p><p>　　IF dw_1.Update( ) = 1 THEN</p><p><b>　　COMMIT ;</b></p><p><b>　　ELSE</b></p><p>　　messagebox('提示',

88、'存盤錯(cuò)誤！')</p><p>　　ROLLBACK ;</p><p><b>　　return</b></p><p><b>　　END IF</b></p><p>　　//產(chǎn)生打印入庫單編號(hào)</p><p>　　string max_dydh

89、</p><p>　　long xx1 //最大入庫單打印號(hào)</p><p>　　SELECT max(rk_d.dybz) INTO :xx1 FROM rk_d where rk_d.dybz<>'ffff';</p><p>　　if sqlca.SQLCode <>0 then</p

90、><p><b>　　xx1=1</b></p><p><b>　　else</b></p><p>　　xx1=xx1 + 1</p><p><b>　　end if</b></p><p>　　max_dydh =string(xx1,'0

91、0000') //求出的本次打印入庫單號(hào)</p><p>　　//求出所有的未打印入庫的入庫設(shè)備數(shù)，準(zhǔn)備做相應(yīng)數(shù)據(jù)處理</p><p><b>　　int ii,jj</b></p><p>　　jj=dw_1.rowcount()</p><p>　　if jj=0 then </p>&l

92、t;p>　　messagebox('提示','無數(shù)據(jù)可處理、打??！')</p><p><b>　　return</b></p><p><b>　　end if</b></p><p><b>　　comm_bz=0</b></p><p&

93、gt;　　sqlca.AutoCommit=false//設(shè)置提交標(biāo)志</p><p>　　FOR ii=1 TO jj</p><p>　　//取出每條記錄的值</p><p>　　rck_wzbh=dw_1.getitemstring(ii,"wzbh")</p><p>　　rck_rq =dw_1.getit

94、emstring (ii,"rq")</p><p>　　rck_bh =dw_1.getitemstring (ii,"bh")</p><p>　　rck_wzfl=dw_1.getitemstring(ii,"wzfl")</p><p>　　rck_mc =dw_1.getitemstri

95、ng (ii,"rk_mc")</p><p>　　rck_ggxh=dw_1.getitemstring (ii,"ggxh")</p><p>　　rck_cd =dw_1.getitemstring (ii,"rk_cd")</p><p>　　rck_dj =dw_1.getitemdecima

96、l(ii,"rk_gjdj")</p><p>　　rck_sm =dw_1.getitemnumber(ii,"rk_sm")</p><p>　　rck_gjje=dw_1.getitemdecimal(ii,"rk_gjje")</p><p>　　rck_dw =dw_1.getitemstr

97、ing(ii,"rk_dw")</p><p>　　xx_1 =dw_1.getitemstring(1,"rk_bgy")</p><p>　　xx_2 =dw_1.getitemstring(1,"rk_jbr")</p><p><b>　　//插入流水庫</b&g

98、t;</p><p>　　INSERT INTO rckls_d (wzbh, rq, bh, wzfl, rck_mc, rck_ggxh, rck_cd, rck_gjdj, rck_sm, rck_bzsm, rck_je, rck_dw)</p><p>　　VALUES (:rck_wzbh,:rck

99、_rq, :rck_bh, :rck_wzfl, :rck_mc, :rck_ggxh, :rck_cd, :rck_dj, :rck_sm, 1, :rck_gjje, :rck_dw);</p><p>　　if sqlca.sqlcode <> 0 then</p><p><b>　　comm_bz=1</

100、b></p><p>　　messagebox('提示','入出庫流水處理錯(cuò)！~r~n出錯(cuò)物資編號(hào)是:'+rck_wzbh +',~r~n出錯(cuò)物資名是:'+rck_mc)</p><p><b>　　end if</b></p><p>　　//判斷庫存中是否有此物資（主要是單價(jià)）</

101、p><p>　　select wzbh into :yyyy from kcqd_d where wzbh=:rck_wzbh and kcqd_dj=:rck_dj;</p><p>　　if sqlca.sqlcode <> 0 then //無此單價(jià)物資，向庫存庫中添加該物資物資中</p><p>　　INSERT INTO kcqd_

102、d (wzbh, wzfl, kcqd_mc, kcqd_dj, kcqd_ggxh, rck_dw, rck_sm, rck_je )</p><p>　　VALUES (:rck_wzbh, :rck_wzfl, :rck_mc, :rck_dj, :rck_ggxh, :rck_dw, :rck_sm, :rck_g

103、jje);</p><p>　　if sqlca.sqlcode <> 0 then</p><p><b>　　comm_bz=1</b></p><p>　　messagebox('提示','向庫中添加物資出錯(cuò)！~r~n出錯(cuò)物資編號(hào)是:'+rck_wzbh +',~r~n出錯(cuò)物資名是:&#

104、39;+rck_mc)</p><p>　　end if </p><p>　　else //更改本類物資信息</p><p>　　update kcqd_d set rck_sm=rck_sm + :rck_sm ,</p><p>　　rck_je=rck_je + :rck_gjje</p>

105、<p>　　where wzbh=:rck_wzbh and kcqd_dj=:rck_dj; </p><p>　　if sqlca.sqlcode <> 0 then</p><p><b>　　comm_bz=1</b></p><p>　　messagebox('提示','更改

106、本類物資信息錯(cuò)！~r~n出錯(cuò)物資編號(hào)是:'+rck_wzbh +',~r~n出錯(cuò)物資名是:'+rck_mc)</p><p>　　end if </p><p><b>　　end if</b></p><p>　　//修改物資檔案庫存</p><p>　　select w

107、zbh into :yyyy from kc_da where wzbh=:rck_wzbh ;</p><p>　　if sqlca.sqlcode <> 0 then //物資檔案庫中無此物資，提示說明</p><p><b>　　comm_bz=1</b></p><p>　　messagebox('提

108、示','物資檔案中無此物資,更改物資檔案庫！')</p><p>　　else //更改物資檔案信息</p><p>　　update kc_da set rck_sm=rck_sm + :rck_sm </p><p>　　where wzbh=:rck_wzbh ; </p><p>　　if

109、 sqlca.sqlcode <> 0 then</p><p><b>　　comm_bz=1</b></p><p>　　messagebox('提示','更改物資檔案信息錯(cuò)！')</p><p>　　end if </p><p><b>

110、;　　end if</b></p><p>　　IF comm_bz=1 THEN</p><p><b>　　exit</b></p><p><b>　　END IF</b></p><p><b>　　NEXT</b></p><p

111、>　　if comm_bz=0 then</p><p>　　for ii=1 to jj</p><p>　　dw_1.object.dybz[ii]=max_dydh</p><p>　　dw_1.object.dyrq[ii]=d_rq</p><p><b>　　next</b></p>&

112、lt;p>　　dw_1.update()</p><p><b>　　COMMIT ;</b></p><p>　　dw_1.retrieve()</p><p><b>　　else</b></p><p><b>　　ROLLBACK;</b></p>

113、<p>　　messagebox("提示","數(shù)據(jù)處理錯(cuò)誤，按提示的信息查找原因！")</p><p><b>　　end if</b></p><p>　　sqlca.AutoCommit=true</p><p>　　dw_2.retrieve(max_dydh)</p>&l

114、t;p>　　int xxx,yyy,jjjj</p><p>　　string xx_bgr,xx_wzkj</p><p>　　xxx=dw_2.rowcount()</p><p>　　yyy=9 - xxx</p><p>　　for jjjj=1 to yyy</p><p>　　dw_2.insertr

115、ow(0)</p><p><b>　　next</b></p><p>　　dw_2.object.a111.text=xx_1</p><p>　　dw_2.object.a222.text=xx_2</p><p>　　dw_2.accepttext ()</p><p>　　jjjj=in

116、teger(print_sum)</p><p>　　for jj=1 to jjjj</p><p>　　dw_2.print(false)</p><p><b>　　next</b></p><p><b>　　2.出庫記帳</b></p><p>　　//string

117、 mmcc,ffll,ddww,wz_bh</p><p>　　string rck_rq,rck_bh,rck_mc,rck_ggxh,rck_cd,yyyy,rck_dw,rck_wzbh,rck_wzfl</p><p>　　string xx_1,xx_2</p><p>　　double rck_sm,x000</p><p>　

118、　dec {3} rck_gjje,rck_dj</p><p>　　//打印前必須先存盤，預(yù)防有不規(guī)則數(shù)據(jù)產(chǎn)生</p><p>　　dw_1.accepttext ()</p><p>　　IF dw_1.Update( ) = 1 THEN</p><p><b>　　COMMIT ;</b></p>

119、<p><b>　　ELSE</b></p><p>　　messagebox('提示','存盤錯(cuò)誤！')</p><p>　　ROLLBACK ;</p><p><b>　　return</b></p><p><b>　　END IF&l

120、t;/b></p><p>　　//產(chǎn)生打印入庫單編號(hào)</p><p>　　string max_dydh </p><p>　　long xx1 //最大入庫單打印號(hào)</p><p>　　SELECT max(ck_d.dybz) INTO :xx1 FROM ck_d;</p><p

121、>　　if sqlca.SQLCode <>0 then</p><p><b>　　xx1=1</b></p><p><b>　　else</b></p><p>　　xx1=xx1 + 1</p><p><b>　　end if</b></p