王曉雷,王云山,王威
1.解放軍161醫院 藥械科,湖北 武漢430010;2.廣州軍區武漢總醫院 醫學工程科,湖北 武漢 430070
醫療設備招標供應商管理系統的開發與應用
王曉雷1,王云山1,王威2
1.解放軍161醫院 藥械科,湖北 武漢430010;2.廣州軍區武漢總醫院 醫學工程科,湖北 武漢 430070
目的為提高設備招標工作效率,設計開發醫療設備招標供應商管理系統。方法 系統基于Access建立數據庫系統,使用Visual Basic.NET開發系統軟件,并調用Excel及水晶報表實現數據導入導出操作。結果系統在招標過程中初步使用,操作簡便、界面美觀、功能豐富。結論系統在后續的升級中考慮增加短信呼叫及授權資質和到期提醒等功能,使系統不斷完善,滿足招標工作需求。
醫療設備招標;供應商管理系統;監護儀;醫療設備管理
醫院組織設備采購招標時,不同的供應商會根據醫院公布的招標內容指派投標人進行報名,并提交報名資料,包括產品品牌型號、廠家、資質、售后服務、聯系方式等信息。為了對這些信息進行有效的記錄,目前我們依靠電子表格登記的方法,這種方法保證了信息記錄的詳實可靠[1],但由于缺乏合適的分析匯總工具,不利于后期對報名情況的進一步篩選整理。為此,我們參考相關供應商和招投標管理數據庫系統[2-4],開發了一套供應商招標管理軟件系統,用于存儲、收集、整理供應商、銷售、廠家、產品等信息,實現對信息的篩選整理,提高設備招標時對供應商信息的高效管理。
基于Access建立數據庫系統,使用Visual Basic.NET開發應用程序,并調用Excel及水晶報表實現數據導入導出操作。
Visual Basic是微軟開發的集成開發環境(Integrated De ve-Lopment Environment,IDE),具有可視化開發功能,控件豐富,上手快等優點,且可以使用ADO.NET進行數據訪問,統一了Web應用開發和桌面應用開發,還集成了各種輔助編程工具[5-6]。此外,還可以通過調用第三方數據庫或組件來擴展功能,如本系統實現的Excel文件導入導出及水晶報表功能。
Access是微軟辦公軟件的重要組件,能方便地配置本地數據庫,并可以進行數據庫查詢、導入導出數據、優化數據庫等操作[7]。
本軟件主要由設備信息管理、供應商信息管理、廠家信息管理、業務員信息管理、用戶信息管理5個模塊構成:①設備信息管理模塊:主要負責維護設備的名稱,代理商,業務員,廠家等信息;② 供應商信息模塊主要負責維護供應商的名稱、業務員、地址、法人、銀行賬號等信息;③ 廠家信息管理模塊:主要負責維護廠家的名稱、地址、聯系方式等信息;④ 業務員信息管理模塊:主要負責維護業務員的姓名、聯系電話與身份證等信息;⑤ 用戶信息管理模塊:可保證具有一定權限的用戶登錄系統并對各個模塊進行操作。本系統通過將設備信息管理模塊和各個具體信息管理模塊進行交叉查找的方式來節省數據庫系統冗余。軟件功能模塊構成,見圖1。

圖1 軟件構成模塊示意圖
3.1 數據庫開發
本數據庫共設計了5個數據表:設備信息(Equipment)表、供應商信息(Agency)表、廠家信息(Factory)表、業務員信息(People)表和用戶信息(Manager)表,分別對應于設備管理、供應商管理、廠家管理、業務員管理和用戶管理5個模塊的功能。其中Equipment表作為本數據庫系統的主要部分,按設備招標中一般用到的表征設備的主要參數(如名稱、供應商、廠家、業務員等),存儲字段設計見表1,并設置了自動編號的ID作為主鍵,以方便數據庫操作。

表1 Equipment表結構
Agency表、Factory表、People表作為輔助信息表,通過和Equipment表的聯合實現了更加詳細的設備管理信息。其中Agency表主要包括名稱、業務員、聯系方式、地址、法人、公司賬號等內容,見表2。

表2 Agency表結構
Equipment表中的AgencyID字段和Agency表中的AgencyID字段對應,通過使用SQL交叉查詢語言[8],可以找到設備對應的代理商信息(圖2)。例如要查找供應商名稱為“恒健”的所有設備,可采用如下SQL代碼:
SELECT a.*
FROM Equipment AS a, Agency AS b
WHERE a. AgencyID = b. AgencyID
AND b. AgencyShortName =“恒健”
ORDER BY b. AgencyShortName;
從Equipment表和Agency信息表中選擇具有同樣供應商ID,且供應商名稱為“恒建”的設備信息項目,并按照供應商簡稱排序(圖2)。

圖2 數據表交叉查詢示意圖
3.2 系統管理程序開發
3.2.1 系統登錄界面
在軟件啟動時,首先進入登錄界面(見圖3),驗證輸入的用戶名和密碼是否和Manager表中的信息匹配,通過后才能進入系統。

圖3 系統登錄界面
3.2.2 設備信息管理
成功登錄后,首先進入設備管理界面(見圖4)。

圖4 設備信息管理界面
在該模塊中,可實現對設備信息的查詢、修改、添加、刪除等操作。查詢時可采用組合查詢的方式,分別選取“名稱”、“供應商”、“業務員”等字段中的一個或多個作為查詢條件進行查詢。添加或修改操作時,對“供應商”、“業務員”等字段通過下拉列表進行了限制,保證是供應商信息Agency表或業務員信息People表中的項目。選中上方表格中的某一行,點擊“刪除”鍵即可在Equipment表中刪除該項信息。此外,為了方便操作,還擴展了導入導出及圖像操作,以實現對Excel文件的導入導出、水晶報表的查看打印以及圖像的儲存查看等操作。
3.2.3 供應商信息管理
該模塊提供了設備對應的供應商信息,通過操作Agency表實現,其管理界面見圖5。

圖5 廠家信息管理界面
由于Agency表中AgencyID項和Equipment表中AgencyID對應,因此對Agency表的某一項刪除操作時,如果Equipment表中存在供應商信息和刪除的供應商信息對應,程序會提示用戶先修改設備信息才能刪除該供應商信息。驗證信息代碼如下:
Dim SQLString1 As String’定義字符串變量
StrItemID = ListView1.Items(j).Name’獲取條目ID
SQLString1 = “SELECT * FROM Equipment Where AgencyID=” & StrItemID’生成SQL查詢語句
Dim Table As DataTable’定義數據表
Table = DBOperation.DBOperate(SQLString1)’執行SQL語句,得到數據表
If Table.Rows.Count <> 0 Then
MsgBox(設備表中含有選定的供應商信息,請先修改設備表方能刪除,MsgBoxStyle.Critical,刪除供應商信息)如果沒有查詢結果,彈出提示對話框
Return’返回
End If
同樣,若在Agency表中修改了供應商信息,Equipment表中對應的供應商信息會同步更改。
3.2.4 Excel導入導出
為了方便導入科室前期已有的投標信息,系統實現了Excel文件的導入功能,該模塊程序流程見圖6。
實現導出功能的主要代碼如下:Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook Dim xlWorkSheet As Excel.Worksheet Dim misValue As Object = System.Reflection.Missing. Value’定義Excel文件操作需要的變量
xlApp = New Excel.Application
xlApp.Visible = False’不顯示Excel界面
xlWorkBook = xlApp.Workbooks.Add’添加Excel文件
xlWorkSheet = xlWorkBook.Sheets(“sheet1”)’Excel工作表
Dim i As Integer
Dim itemCount As Integer = ListView1.Items.Count - 1
Dim j As Integer’定義循環變量
For i = 0 To itemCount
For j = 0 To 5
xlWorkSheet.Cells(i + 2, j + 1).Value = ListView1.Items(i). SubItems(j).Text’將ListView中的數據保存在Excel文件中
Next
Next
xlWorkSheet.SaveAs(FileFullName)’保存Excel文件
xlWorkBook.Close()’關閉Excel
xlApp.Quit()’退出Excel

圖6 Excel文件導入流程圖
3.2.5 報表功能
水晶報表是Visual Studio中的標準報表創建工具,簡單易用,可連接到多種數據源,可通過代碼實現多種操作,也可以導出Excel文件并實現數據的打印[9]。借助水晶報表,系統實現了對Equipment表中主要信息的導出及打印功能(見圖7)。
該功能的實現可通過如下4個步驟完成:① 建立一個數據集,該數據集包含需要在報表中顯示的所有字段;② 建立一個水晶報表模板,在模板上放置數據集的字段;③ 建立一個Windows窗體,放置一個水晶報表視圖控件,該控件的報表模板為前述建立的模板;④ 在程序中對數據集賦值,并顯示報表窗體。

圖7 報表功能
3.2.6 圖片的存儲與顯示
在附加功能中,軟件還提供了圖像的數據庫操作[10-11]。
其儲存圖像的代碼如下:
Dim Stream As New IO.MemoryStream’定義數據流
PictureBox1.Image.Save(Stream, System.Drawing. Imaging.ImageFormat.Bmp)’保存圖片
Stream.Flush()
Dim Bytes As Byte()’定義字節變量
Bytes = Stream.ToArray
String1 = String1 & “@bytes )”
command.CommandText = String1’定義數據庫操作命令
command.Parameters.AddWithValue(“@bytes”, SqlDbType.Binary).Value = Bytes’添加數據庫操作變量
其打開圖像的代碼如下:
Dim Bytes As Byte() = oledbdr.Item(“Pic”)’獲取圖像數據
Dim mStream As New IO.MemoryStream’定義數據流
mStream.Write(Bytes, 0, Bytes.Length)
mStream.Flush()’保存圖像數據
Dim Img As New Bitmap(mStream)
PictureBox1.Image = Img’顯示圖像
本系統在醫院實際設備招標過程中已應用,方便了對供應商投標信息的錄入、修改等操作,實現了信息的集成。同時系統提供的導入功能,可以將科室之前收集的供應商信息方便的導入,免去了重復輸入。導出及報表功能可以方便的將數據導出或打印,便于在其他設備上查看信息。提供的圖像的存儲及查看功能可以對設備的外觀進行保存,方便區分不同的設備??傊ㄟ^本軟件的使用,提高了科室對供應商投標信息管理的效率[12-14]。
為了在設備招標時提高對供應商提供信息處理的效率,我們利用Access建立了數據庫,并通過Visual Basic開發了該數據庫系統。該系統具有操作簡便、界面美觀、功能豐富的特點。在今后的系統升級中,還考慮增加短信呼叫通知以及授權資質到期提醒等,進一步豐富功能,提高效率[15-16]。
[1] 譚丹華.EXCEL電子表格在醫療設備管理中的應用[J].中國醫療設備器械信息,2010,16(3):69-72.
[2] 程廣斌,黃金清,馬承華.基于智能手機的醫療設備供應維護查詢數據庫的建立[J].醫療衛生裝備,2013,34(11):33-34.
[3] 林銳銘,周健煖,葉淼盛.基于VB&SQL Server開發的臨床藥械信息服務系統設計[J].計算機光盤軟件與應用,2012, (11):177-178.
[4] 徐浩然,馮自立,王文濤,等.醫療器械流通現狀分析與醫療機構的對策[J].中國醫療設備,2015,30(2):140-141.
[5] 石志國,劉冀偉,張維存.VB.NET數據庫編程[M].北京:清華大學出版社,2009.
[6] 劉珊.Visual Basic.NET 2005數據庫編程技術與實例[M].北京:人民郵電出版社,2007.
[7] 楊繼萍,孫巖,梁文新,等.Access2007數據庫應用與開發從新手到高手[M].北京:清華大學出版社,2008.
[8] Stephens R,Plew R,Jones AD.SQL入門經典[M].井中月,郝記生, 譯.5版.北京:人民郵電出版社,2011.
[9] 歐陽艷階.Net平臺下水晶報表的應用研究[J].軟件工程師, 2012,(7):38-40.
[10] 趙國俊.用ADO模型的記錄流對象存取數據庫圖片技術[J].電腦編程技巧與維護,2011,(5):36-40.
[11] 姚國紅,吳豪,劉運成,等.基于互聯網+技術醫療設備招標采購管理系統的構建[J].人民軍醫,2015,(10):1239-1240.
[12] 杜昱鏗,劉月月.互聯網時代的醫療設備管理新方式探討[J].醫學信息旬刊,2010,23,(11):21.
[13] 徐恒,許鋒,田金.醫院醫療設備維護管理新策略的探討[J].中國醫學裝備,2012,9(7):46-48.
[14] 劉宇靜,朝洛蒙,龍建成,等.醫療設備采購管理信息系統的研發[J].中國醫學裝備,2016,13(10):105-107.
[15] 黃曉萍.大型醫療設備招標采購審計實踐[J].現代醫院,2011, 11(5):89-90.
[16] 張臣舜,李繼,張濤.淺析醫療設備招標采購中存在的問題[J].醫療裝備,2012,25(7):41-43.
本文編輯 韓淑英
Development and Application of Supplier Management System of Medical Equipment Bidding
WANG Xiao-lei1, WANG Yun-shan1, WANG Wei2
1. Department of Drug and Equipment, the 161stHospital of PLA, Wuhan Hubei 430010, China; 2. Department of Medical Engineering, Wuhan General Hospital of Guangzhou Military, Wuhan Hubei 430070, China
ObjectiveTo design and develop supplier management system of medical equipment bidding so as to improve work efficiency of medical equipment bidding. Methods Database system was built based on Access, then developed system software with Visual Basic.NET, and transferred Excel and crystal reports to realize data import and export operation.ResultsThis system was primarily used in bidding process, which is simple to operate with beautiful interface and rich functions.ConclusionThis system will be added functions like message call, authorized certificate due remind, etc in the subsequent upgrade. Constant improvement of system will meet the bidding needs.
medical equipment bidding; supplier management system; monitor; medical equipment ma na ge ment
TP311.52
A
10.3969/j.issn.1674-1633.2017.01.030
1674-1633(2017)01-0112-04
2016-06-16
2016-06-30
作者郵箱:543500862@qq.com