茹建華
(浙江慈溪市人民醫院,慈溪市 315300)
隨著醫療機構藥品集中招標采購的進一步深入和發展,浙江省縣及縣以上醫院除少數特殊藥品(如麻醉藥品、精神藥品、生物制品)外,都必須在海虹網上交易系統上采購。醫院信息系統(HIS)在浙江省縣及縣以上醫院已廣泛使用多年,功能越來越強大,其中的醫院藥房庫存管理系統在規范、科學設置藥品高低限后,結合近期各種藥品的消耗量,能自動生成數量準確、合理的藥品采購計劃,并以Excel文件導出[1]。由于網上交易系統和HIS由2家不同的軟件公司開發維護,雖然各自系統每種藥品的藥品編碼是唯一的,但同一種藥品的藥品編碼在網上交易系統和HIS中各自設定,互不相同,故網上交易系統不能識別HIS中的藥品編碼,HIS導出的采購文件無法使用,只能手工逐條輸入要采購的藥品,工作量大、效率低。為此,筆者用Excel表格設計網上交易系統與HIS的藥品編碼匹配功能,使HIS采購信息文件中的藥品編碼用網上交易系統中的藥品編碼替換,而能被網上交易系統識別,通過文件導入的方式將采購信息導入到網上交易系統中,從而大大提高了工作效率。現介紹如下:
工作薄含2張工作表,sheet1為藥品編碼對照表,具體內容見圖1;sheet2為藥品采購信息表,具體內容見圖2。
根據藥品編碼規則可知,每個品種的藥品只有1個唯一不重復的編碼[2],即各有1個唯一的HIS藥品編碼和網上交易系統藥品編碼。sheet1為藥品基本信息表,sheet2通過與sheet1共有的HIS藥品編碼單元格發生關聯。

圖1 藥品編碼對照表(sheet1)Fig 1 Drug code table(sheet1)

圖2 藥品采購信息表(sheet2)Fig 2 Table for drug purchase information(sheet2)
sheet1中“網上交易系統藥品編碼、藥品名稱、規格、單位、生產廠家、供貨公司”數據從網上交易系統中導出,然后將各藥品在HIS中相對應的藥品編碼輸入到列A相應的單元格中。信息輸入完成后,選中F2單元格,單擊菜單欄“格式/單元格”調出單元格設置窗口,在保護窗口去掉鎖定項前的“√”。然后再單擊“工具/保護/保護工作表”輸入密碼,這樣除F2單元格外,其它單元格內容都無法編輯,從而完成對工作表的保護[3],防止數據受到誤修改。單擊“視圖/工作欄/窗體”,顯示“窗體”工具欄,再單擊按鈕,在工作表上要放置按鈕的位置按住鼠標左鍵,拖拉出大小合適的按鈕后,選取宏,按“確定”,按鈕形成,再把按鈕名稱改為編碼匹配。鼠標右鍵單擊編碼匹配按鈕,選擇“指定宏/編輯”在代碼框中輸入以下VBA代碼:

以上代碼的作用是找出sheet2中所有藥品在sheet1中所對應的網上交易系統的藥品編碼,并將此藥品編碼寫在相應的單元格中(sheet2 A列中),從而實現藥品采購信息表中的所有藥品的編碼匹配。
sheet2中的“HIS藥品編碼、藥品名稱、規格、單位、生產廠家、進價、采購數量、供貨公司”信息從HIS導出的采購計劃表中復制過來(以sheet2的B3單元格為初始位置,將上述信息復制到相應單元格)。再單擊菜單“數據/篩選/自動篩選”,在數據上方出現篩選下拉菜單標志。建立好自動篩選功能后,點擊“供貨公司”和“到貨否”下拉菜單可以對表中數據按各供貨單位和是否到貨等情況進行自動篩選。若原網上交易采購輸入界面和HIS入庫界面中無“文件導入”功能,則與軟件開發商聯系,在網上交易系統采購輸入界面和HIS入庫界面中增加“文件導入”的功能。
將sheet2中的藥品記錄數(最后一條藥品記錄行號減去2)填入藥品編碼對照表F2單元格中,然后點擊編碼匹配按鈕,VBA代碼自動將sheet2中每一條藥品對應的網上交易系統藥品編碼寫入相應的單元格中,然后把sheet2中的“網上交易系統藥品編碼、藥品名稱、規格、單位、生產廠家、進價、采購數量、供貨公司”復制到另一張Excel表中,即生成網上交易系統能夠識別的文件,在網上交易平臺上導入該文件,即可將采購信息一次性納入采購界面中,大大提高了工作效率。
在醫藥公司貨到驗收后,若實際到貨數量與采購數量不同,將sheet2中的采購數量改成實際到貨數量,對未到貨的品種在“到貨否”一欄里打入“否”。點擊“到貨否”的下拉菜單標志,選擇“空白”,Excel自動把未到貨品種過濾掉,然后再點擊“供貨公司”下拉菜單標志,逐個選擇各醫藥公司,選擇“HIS藥品編碼、藥品名稱、規格、單位、進價、生產廠家、采購數量、供貨公司”復制生成各醫藥公司的Excel到貨文件。在HIS到貨入庫界面中依次導入上述文件,即自動完成入庫操作,可免去手工逐條錄入之苦。
VBA(Visual Basic for Application)是微軟公司為了加強Office軟件的二次開發能力而附加于其中的編程語言。VBA與BASIC完全一致的語法結構,便于藥師等非計算機專業人員理解和掌握,利用VBA編程可極大增強Excel現有的功能[4]。本文利用VBA編制藥品編碼匹配功能,方法簡單實用,能自動列出采購文件中HIS藥品編碼所對應的網上交易系統中的藥品編碼,大大提高了工作效率。
為了保障醫院網絡的安全性,絕大部分醫院運行的HIS為醫院內部網絡[5],與Internet未聯網,而網上交易系統是建立在Internet上的,二者互不相通。本文通過導入導出Excel文件方式,實現網上交易系統與HIS間藥品數據傳遞,安全性好,能夠被醫院所接受,特別值得計算機網絡系統不是很成熟的縣級醫療機構推廣使用。
[1]楊 晨,胡麗輝,林偉斌,等.我院藥品實行網上采購的方法和體會[J].中國藥房,2006,17(20):1550.
[2]楊天燕,王 勁,姜柏玫,等.利用Access軟件實現藥品編碼升位[J].中國藥房,2006,17(18):1377.
[3]侯愛蓮.Excel表格實用技巧例解[J].計算機系統應用,2001,2:49.
[4]趙衛旭,陳國棟.用VBA拓展Excel[J].中國管理信息化,2007,10(12):37.
[5]許群芬,曹幼紅,林蕓竹,等.科學優化醫院藥品采購流程[J].中國藥房,2008,19(34):2671.