陳文霞 張 鵬 荊 斌 張 宏*

基于VBA計量與質(zhì)量控制檔案管理的系統(tǒng)實(shí)現(xiàn)*

陳文霞① 張 鵬① 荊 斌① 張 宏①*

目的：實(shí)現(xiàn)醫(yī)院醫(yī)療設(shè)備計量及質(zhì)量控制文檔管理的標(biāo)準(zhǔn)化和自動化。方法：通過系統(tǒng)分析、總結(jié)和歸納等方法，分析當(dāng)前醫(yī)院計量及質(zhì)量控制文檔工作流程，并設(shè)計出其系統(tǒng)執(zhí)行方案。結(jié)果：結(jié)合醫(yī)院計量及質(zhì)量工作中文檔管理特點(diǎn)，編制出計量與質(zhì)量控制檔案管理系統(tǒng)軟件。結(jié)論：通過建立文檔管理系統(tǒng)，健全了文檔管理制度，實(shí)現(xiàn)醫(yī)療設(shè)備計量及質(zhì)量控制的標(biāo)準(zhǔn)化和自動化，能夠降低維護(hù)成本，確保醫(yī)療設(shè)備的正常運(yùn)行。

計量檢定；質(zhì)量控制；數(shù)據(jù)庫；Visual Basic應(yīng)用程序

[First-author’s address]Medical Engineering Department of No.307 Hospital of PLA, Beijing 100071, China.

隨著醫(yī)學(xué)檢測技術(shù)的飛速發(fā)展，越來越多的醫(yī)療設(shè)備納入強(qiáng)制檢定范圍，成為診斷治療規(guī)范化和數(shù)據(jù)科學(xué)化的質(zhì)量保證。醫(yī)學(xué)計量是醫(yī)療衛(wèi)生領(lǐng)域的重要技術(shù)支持和基本保證，其管理是以保障患者生命安全為最終目標(biāo)。醫(yī)學(xué)計量管理是醫(yī)療設(shè)備的量值準(zhǔn)確統(tǒng)一的可靠保證，是保證醫(yī)院使用國家法定計量單位和醫(yī)療設(shè)備準(zhǔn)確、安全和有效工作的必要措施，且逐漸成為醫(yī)院管理的重要組成部分[1]。

目前，醫(yī)療設(shè)備存在著種類繁多、數(shù)量龐大、文檔存放地點(diǎn)繁亂、重復(fù)檢測頻率高以及數(shù)據(jù)管理復(fù)雜等問題，使得人工管理文檔非常困難，迫切需要一種信息化文檔管理系統(tǒng)[1]。

通常，數(shù)據(jù)庫開發(fā)技術(shù)都需要開發(fā)設(shè)計人員具有高級語言編程能力，而專業(yè)的開發(fā)人員往往難以準(zhǔn)確把握使用者意圖，因此極大限制了信息化技術(shù)在醫(yī)療領(lǐng)域的擴(kuò)展。目前，以office為標(biāo)志辦公自動化軟件已廣泛應(yīng)用于臨床，直接采用office辦公軟件進(jìn)行系統(tǒng)開發(fā)具有良好的兼容性和易用性。

Visual Basic應(yīng)用程序(Visual Basic for applications，VBA)是Visual Basic的一種宏語言，開發(fā)簡單便于短期掌握，其主要功能為用于擴(kuò)展Windows的應(yīng)用程序，尤其是Microsoft Office軟件。使可編程應(yīng)用軟件得到完美的實(shí)現(xiàn)，可作為一種通用的宏語言被所有的Microsoft可編程應(yīng)用軟件所共享，使各應(yīng)用軟件產(chǎn)品具有高效、靈活性及一致性。

1 計量與質(zhì)量控制檔案管理系統(tǒng)設(shè)計

1.1 需求分析

計量與質(zhì)量控制文檔管理系統(tǒng)是以文檔管理為核心，將質(zhì)量體系運(yùn)行與標(biāo)準(zhǔn)化文檔模板技術(shù)、數(shù)據(jù)存儲技術(shù)和自動化數(shù)據(jù)處理技術(shù)有機(jī)結(jié)合，通過建立以質(zhì)量負(fù)責(zé)人為中心的分布式管理體系，集單位受檢裝備集合管理、送檢儀器設(shè)備管理、檢測資料管理、人員資質(zhì)管理以及檢測工具說明書管理等諸多功能于一身，組成完整的計量和質(zhì)量控制文檔化管理系統(tǒng)。計量與質(zhì)量控制管理系統(tǒng)提供了各種信息存儲和統(tǒng)計分析的數(shù)字化平臺，可減少和避免由于疲勞或粗心導(dǎo)致的失誤，實(shí)現(xiàn)辦公自動化和管理信息化，降低紙質(zhì)文檔管理成本。促進(jìn)計量工作高效、規(guī)范和科學(xué)運(yùn)作，達(dá)到信息化管理和無紙化辦公的目的。

1.2 系統(tǒng)設(shè)計

通過Access實(shí)現(xiàn)原始數(shù)據(jù)表管理和窗體數(shù)據(jù)表設(shè)計，由數(shù)據(jù)透視圖實(shí)現(xiàn)統(tǒng)計功能。采用ADO數(shù)據(jù)引擎與數(shù)據(jù)庫建立連接，建立條件查詢及SQL查詢語句，實(shí)現(xiàn)動態(tài)查詢功能。由Word設(shè)計文檔模板，實(shí)現(xiàn)文檔報表功能，其流程如圖1所示。

圖1 系統(tǒng)功能設(shè)計圖

2 計量與質(zhì)量控制檔案管理系統(tǒng)實(shí)現(xiàn)

2.1 數(shù)據(jù)模型

根據(jù)系統(tǒng)設(shè)計要求實(shí)現(xiàn)受檢設(shè)備信息管理、計量與質(zhì)量控制原始檢定記錄管理及統(tǒng)計數(shù)據(jù)分析等功能。受檢設(shè)備信息從醫(yī)療設(shè)備管理系統(tǒng)數(shù)據(jù)庫中提取。選取設(shè)備名稱、設(shè)備制造商、設(shè)備使用科室、價格、啟用日期、型號規(guī)格及單位等字段建立受檢設(shè)備信息。計量與質(zhì)量控制原始檢定統(tǒng)一定義為“設(shè)備事件信息體現(xiàn)了受檢設(shè)備計量與質(zhì)量控制的相關(guān)檢測信息”。設(shè)備信息包括設(shè)備事件等信息。通過受檢設(shè)備的個體化將設(shè)備事件派生出呼吸機(jī)、監(jiān)護(hù)儀及注射泵等設(shè)備事件信息表。通過增加數(shù)據(jù)耦合，解決傳統(tǒng)的手動謄寫計量、質(zhì)檢數(shù)據(jù)不準(zhǔn)確以及計量與質(zhì)檢儀器設(shè)備易漏檢等問題[2]。

2.2 系統(tǒng)功能實(shí)現(xiàn)

(1)設(shè)備庫及設(shè)備事件管理。設(shè)備及設(shè)備檢測信息輸入新建報告鏈接，由數(shù)據(jù)庫存儲設(shè)備檢測事件明細(xì)?？赏ㄟ^附件列表選擇文件進(jìn)行修改和顯示。

(2)檢定記錄文檔。采用COM對象實(shí)現(xiàn)Word對象的操作，將CreateObject函數(shù)返回的對象傳給一個以參數(shù)為對象的函數(shù)。通過將數(shù)據(jù)庫的數(shù)據(jù)傳入Word模板控件生成報表。由計量室出具檢測報告，可采用電子版檢定記錄表進(jìn)行記錄及審核，最后由文檔管理人員進(jìn)入數(shù)據(jù)庫查詢送檢設(shè)備的檢測信息之后統(tǒng)一打印，既可節(jié)約紙張，又可提高工作效率，便于原始記錄的長期保存[3-5]。

(3)電子化檢定記錄。系統(tǒng)采用電子化檢定記錄的方式可以極大的提高辦公效率，通過系統(tǒng)控件選擇對應(yīng)設(shè)備，可減少原始檢定記錄中關(guān)于設(shè)備信息的重復(fù)錄入信息，其優(yōu)勢是檢定員只需負(fù)責(zé)鑒定過程和填寫電子版檢測報告，通過電子化的方式傳遞給審核人員。檢定人員將數(shù)據(jù)報給審核人員，審核人員核驗(yàn)后予以批準(zhǔn)，然后統(tǒng)一打印檢測報告并加蓋印章，之后紙質(zhì)原始記錄可經(jīng)過掃描保存在對應(yīng)電子記錄附件中。當(dāng)檢測過程中某一環(huán)節(jié)出現(xiàn)問題時可在文檔管理系統(tǒng)中通過追溯明確權(quán)責(zé)，從而有章可循[6]。同時，通過建立網(wǎng)絡(luò)系統(tǒng)，實(shí)現(xiàn)數(shù)據(jù)與窗體分離，在遵循檢定計劃的基礎(chǔ)上，送檢科室可根據(jù)需求及自身實(shí)際情況，合理分配送檢設(shè)備及送檢時間。

(4)統(tǒng)計與查詢。通過建立數(shù)據(jù)庫連接，使用窗體Filter屬性保存動態(tài)篩選條件。篩選可隨窗體對象創(chuàng)建時一起保存。打開對象時加載對應(yīng)篩選器。通過交互窗體由用戶輸入查詢條件，建立條件篩選器，實(shí)現(xiàn)一定時間內(nèi)受檢設(shè)備查詢，如下列代碼所示：

Dim frm As Form, strMsg As String, str1 As String, str2

DoCmd.OpenForm "設(shè)備明細(xì)視圖"

Set frm = Forms!設(shè)備明細(xì)視圖

str1 = "請輸入需要檢定設(shè)備對應(yīng)的時間內(nèi)(天)"

str2 = InputBox(str1)

strMsg = "(365-DateDiff('d',[lasttime],now))<" & str2

frm.Filter = strMsg

frm.FilterOn = True

數(shù)據(jù)透視圖是一種交互的、交叉制表的數(shù)據(jù)圖表，可用于對多種來源(包括Access、Excel、SQL Server的外部數(shù)據(jù))的數(shù)據(jù)進(jìn)行匯總和分析。在創(chuàng)建數(shù)據(jù)透視圖時，可使用多種不同的源數(shù)據(jù)類型。同時，也可以實(shí)現(xiàn)多重條件篩選和分類。以檢測日期、受檢設(shè)備類型及使用科室字段等內(nèi)容建立受檢設(shè)備分類條件，設(shè)備檢測結(jié)果分為合格、檢測后合格以及準(zhǔn)用(如圖2所示)。

圖2 數(shù)據(jù)透視統(tǒng)計結(jié)果圖

(5)報表與標(biāo)簽。分別按照原始檢定記錄的報表布局和樣式，建立報表模板，系統(tǒng)采用Word對象建立報表。

Set appWord = CreateObject("Word.Application")

strPath = Str+Filename

Set docs = appWord.Documents

docs.Add strPath

通過建立COM對象，新建檢定記錄，將數(shù)據(jù)庫對應(yīng)的記錄數(shù)據(jù)寫入記錄對象中，分別生成對應(yīng)的報表和標(biāo)簽對象。

With appWord.Selection

.GoTo What:=wdGoToBookmark, Name:="gaopindian dao7"

.TypeText Text:=rec118

End With

關(guān)閉報表對象并顯示。

Set doc = appWord.ActiveDocument

Set prps = doc.CustomDocumentProperties

appWord.Visible = True

(6)數(shù)據(jù)備份與恢復(fù)。數(shù)據(jù)備份與恢復(fù)采用傳遞電子表格(Transferspreadsheet)方法實(shí)現(xiàn)，通過該方法可在Microsoft Access數(shù)據(jù)庫和電子表格文件之間導(dǎo)入或?qū)С鰯?shù)據(jù)。也可將Microsoft Excel電子表格中的數(shù)據(jù)鏈接到當(dāng)前的Access數(shù)據(jù)庫。通過鏈接的電子表格可實(shí)現(xiàn)Access查看和編輯電子表格數(shù)據(jù)，同時允許從Excel電子表格程序中對數(shù)據(jù)進(jìn)行完全訪問。通過下方代碼實(shí)現(xiàn)將數(shù)據(jù)庫中數(shù)據(jù)表對象備份至當(dāng)前路徑下Excel文件中。

Dim rstSchema As ADODB.Recordset

Dim XlsPath As String

XlsPath = CurrentProject.Path & "備份.xls"

Dim cnn2 As ADODB.Connection

Set cnn2 = CurrentProject.Connection

Set rstSchema = cnn2.OpenSchema(adSchemaTables)

Dim i As Long

Do Until rstSchema.EOF

If rstSchema("TABLE_TYPE") = "TABLE" Then

For i = 0 To rstSchema.Fields.Count - 1

If rstSchema(i).Name = "TABLE_NAME" Then

DoCmd.TransferSpreadsheet acExport, 8, rstSchema.Fields(i).Value, XlsPath, True

End If

Next

End If

rstSchema.MoveNext

Loop

rstSchema.Close

cnn2.Close

MsgBox "備份已經(jīng)完成！文件名稱為：" & XlsPath

通過使用

DoCmd.TransferSpreadsheet acImport, 8, rstSchema. Fields(i).Value, XlsPath, True代碼可實(shí)現(xiàn)當(dāng)前路徑下備份文件的讀取恢復(fù)。

3 計量與質(zhì)量控制檔案管理系統(tǒng)優(yōu)勢

應(yīng)用計量與質(zhì)量控制管理系統(tǒng)一年以來的實(shí)踐表明，該系統(tǒng)對檢定效率的提高、匯總統(tǒng)計的快捷和檔案管理標(biāo)準(zhǔn)化的提升均起到較大的促進(jìn)作用，具有傳統(tǒng)管理方式無法比擬的優(yōu)點(diǎn)，主要體現(xiàn)在下述4個方面。

(1)完善了計量與質(zhì)量控制管理系統(tǒng)，促進(jìn)計量室管理的科學(xué)化、系統(tǒng)化。實(shí)現(xiàn)了受檢設(shè)備的動態(tài)管理，使計量文檔的管理科學(xué)化、規(guī)范化和數(shù)字化。同時，可定期針對各數(shù)據(jù)庫進(jìn)行維護(hù)備份，有效避免了因斷電、誤操作等原因可能造成的數(shù)據(jù)結(jié)果丟失等情況[5-8]。

(2)促進(jìn)和完善了質(zhì)量管理體系的科學(xué)化建設(shè)。質(zhì)量體系管理走向了自動化、信息化，采取了操作人員、核驗(yàn)人員、檔案管理人員分級管理模式，進(jìn)行內(nèi)部審核、管理評審等，隨時可提出不符合項(xiàng)，要求相關(guān)專業(yè)室整改并監(jiān)督落實(shí)，對完善質(zhì)量體系建設(shè)起到重要作用[9-10]。

(3)提高了計量準(zhǔn)確度，及時提供了準(zhǔn)確、可靠的計量信息，通常由人工計算的數(shù)據(jù)項(xiàng)目由程序運(yùn)算獲得，加快數(shù)據(jù)輸入和計算過程，減少在數(shù)據(jù)輸入及計算過程中所產(chǎn)生的錯誤，促進(jìn)計量管理的標(biāo)準(zhǔn)化、規(guī)范化。

(4)為科學(xué)統(tǒng)籌和數(shù)據(jù)分析提供依據(jù)。通過管理系統(tǒng)可較為便捷直觀地查看設(shè)備受檢狀況，如技術(shù)指標(biāo)、負(fù)責(zé)人及檢定有效期等參數(shù)；通過管理系統(tǒng)可組織中短期設(shè)備檢測計劃，及時掌握工作進(jìn)展?fàn)顩r，便于工作的順利開展和相互間的協(xié)調(diào)配合。

4 結(jié)語

計量與質(zhì)量控制檔案管理系統(tǒng)的實(shí)現(xiàn)，提高了計量管理的工作效率，是計量管理工作走向信息化、正規(guī)化的重要條件[11]。該系統(tǒng)為計量與質(zhì)量控制體系的運(yùn)行和日常管理帶來較大的便利，能夠提高工作效率和統(tǒng)計的時效性，減少失誤；從而有效地對計量工作過程實(shí)施動態(tài)控制，便于各級機(jī)關(guān)全面實(shí)時了解和掌控計量工作，極大提升了計量與質(zhì)量控制管理水平。

[1]潘德祥，張進(jìn)，王瑞寶.計量質(zhì)量控制管理系統(tǒng)的開發(fā)與應(yīng)用[J].儀器儀表標(biāo)準(zhǔn)化與計量，2012(6)：42-43.

[2]吳平鳳，蔡東江.數(shù)字化醫(yī)院設(shè)備計量動態(tài)管理的研究[J].臨床醫(yī)學(xué)工程，2011，18(5)：786-787.

[3]郝霞莉.完善計量技術(shù)保障確保遠(yuǎn)程醫(yī)療應(yīng)用[J].中國計量，2012(8)：28-29.

[4]楊俊，潘其明，金偉.醫(yī)療設(shè)備質(zhì)量檢測及風(fēng)險評估軟件的設(shè)計與應(yīng)用[J].中國醫(yī)學(xué)裝備，2012，9(12)：54-56.

[5]商洪濤，劉宇靜，唐輝.醫(yī)院計量中心業(yè)務(wù)管理信息系統(tǒng)的建立[J].中國醫(yī)學(xué)裝備，2011，8(10)：68-69.

[6]陳宏文，廖偉光，夏景濤，等.醫(yī)院設(shè)備計量網(wǎng)絡(luò)化管理系統(tǒng)的研究[J].醫(yī)療衛(wèi)生裝備，2011，32(12)：30-31.

[7]尹軍，陳維平.醫(yī)院設(shè)備使用期數(shù)據(jù)管理系統(tǒng)的風(fēng)險-效益評估[J].中國藥物警戒，2011，8(6)：346-347.

[8]高文清，劉勝軍.計量信息系統(tǒng)在石化企業(yè)的應(yīng)用[J].計量技術(shù)，2010(12)：62-64.

[9]陶梅.計量信息管理系統(tǒng)軟件設(shè)計初探[J].計量與測試技術(shù)，2009(5)：104-105.

[10]吳書銘，蔣紅兵，曹安之，等.醫(yī)療設(shè)備全程管理技術(shù)(七)—計量管理[J].醫(yī)療設(shè)備信息，2004，19(9)：57-58.

[11]孔曉艷，張福勇，程衛(wèi)國.計量管理是醫(yī)院設(shè)備管理不可忽視的重要環(huán)節(jié)[J].醫(yī)療裝備，2004，16(1)：34-35.

The acquisition and analysis of test parameters for cardiopulmonary resuscitation equipment/

CHEN Wen-xia, ZHANG Peng, JING Bin, et al// China Medical Equipment,2014,11(6):21-24.

Objective:To achieve the quality of hospital medical equipment, measurement and control of document management standardization and automation.Methods:By systematic analysis and other methods to summarize, analyze the current measurement and quality control of document workflow hospital and execution methods.Results:The combination of measurement and quality of work in the hospital document management features, preparing management system software.Conclusion:Through the establishment of document management system, improve the document management system, standardize and automate measurement and quality control of medical equipment, reduce maintenance costs and ensure the normal operation of medical equipment.

Metrology; Quality control; Database; Visual basic for applications

10.3969/J.ISSN.1672-8270.2014.06.007

1672-8270(2014)06-0021-04

R197.324

A

2014-02-17

軍事醫(yī)學(xué)計量科研專項(xiàng)課題(2012-JL2-027)“基于臨床日常計量檢測的醫(yī)療設(shè)備不良事件警示分析系統(tǒng)研究”

①解放軍第307醫(yī)院醫(yī)學(xué)工程科 北京 100071

*通訊作者： 13601192278@163.com

陳文霞，女，(1970- )，本科學(xué)歷，工程師。解放軍第307醫(yī)院醫(yī)學(xué)工程科，從事醫(yī)院信息化及計算智能工作。研究方向：醫(yī)學(xué)計量標(biāo)準(zhǔn)化及醫(yī)用耗材的臨床應(yīng)用研究。