醫(yī)保接口調(diào)試過程一例

王正凱

摘要：經(jīng)曲阜師范大學(xué)與山東省濟(jì)寧市人社局協(xié)商、溝通，大學(xué)校醫(yī)院納入醫(yī)保定點醫(yī)院。校醫(yī)院HIS系統(tǒng)需要與山大地緯醫(yī)保接口進(jìn)行數(shù)據(jù)對接。本文介紹了山大地緯醫(yī)保系統(tǒng)的接口環(huán)境，以及校醫(yī)院HIS系統(tǒng)對醫(yī)保接口的調(diào)試思路、調(diào)試過程和解決方案。

關(guān)鍵詞：醫(yī)保;接口技術(shù);編程;Perl

中圖分類號：G642? ? ? ? 文獻(xiàn)標(biāo)識碼：A

文章編號：1009-3044（2021）10-0263-03

Abstract：After negotiation between Qufu Normal University and Medical Insurance Bureau of Jining City Shandong Province， School hospital will be included Medical insurance designated hospitals. This article describes basic situation of Shandong University Medical Insurance System interface， and the? process of Interface docking technology.

Key words： the Social medical insurance system; Interface technology; Programming; Perl

1 社會醫(yī)?；粳F(xiàn)狀

黨的十九大報告確立了習(xí)近平新時代中國特色社會主義思想，明確闡述了健康中國的發(fā)展戰(zhàn)略及總體部署，提出打造共建共享的健康治理新格局，健康治理開始成為政府、學(xué)界及民眾普遍關(guān)注的重大民生問題。全民醫(yī)保作為我國健康保障體系的主要制度安排，其治理問題也是健康治理的有機(jī)組成部分，關(guān)系到健康中國戰(zhàn)略目標(biāo)的實現(xiàn)。[1]

當(dāng)今時代，互聯(lián)網(wǎng)和大數(shù)據(jù)應(yīng)用日益成為管理創(chuàng)新發(fā)展的先導(dǎo)力量，深刻改變著傳統(tǒng)的政府行政管理方式。利用信息技術(shù)手段創(chuàng)新治理工具，推動醫(yī)保制度設(shè)計更加科學(xué)化、精細(xì)化、人性化，促進(jìn)醫(yī)藥衛(wèi)生體制改革全面深化，不僅是當(dāng)前社會發(fā)展的需要，更是實現(xiàn)醫(yī)保治理現(xiàn)代化的重要途徑。[2] 越來越多的地方醫(yī)院，通過醫(yī)保的規(guī)范技術(shù)接口，納入醫(yī)保的信息化管理系統(tǒng)，互聯(lián)網(wǎng)、大數(shù)據(jù)、云計算等現(xiàn)代信息技術(shù)在醫(yī)保領(lǐng)域正在全方位拓展。

2 本院面對的醫(yī)保接口環(huán)境

按照地方人社局的要求，筆者所在醫(yī)院需要與山大地緯醫(yī)保系統(tǒng)進(jìn)行數(shù)據(jù)對接。山東大地緯醫(yī)保結(jié)算覆蓋山東省80%地區(qū)的定點醫(yī)療機(jī)構(gòu)和定點藥店，山大地緯軟件公司向醫(yī)院提供的技術(shù)文檔是《地緯定點醫(yī)院嵌入式接口服務(wù)說明文檔（v1.0.7）》。該說明文檔的背景介紹是“定點醫(yī)療機(jī)構(gòu)業(yè)務(wù)是社會保險體系中的重要組成部分，定點醫(yī)療機(jī)構(gòu)結(jié)算系統(tǒng)更是核心平臺三版的核心外圍業(yè)務(wù)系統(tǒng)之一。為了更好地實現(xiàn)定點醫(yī)療機(jī)構(gòu)結(jié)算系統(tǒng)與醫(yī)院自身信息管理系統(tǒng)的對接，地緯公司研制設(shè)計了本接口系統(tǒng)。”

“地緯定點醫(yī)院接口服務(wù)系統(tǒng)”是在地緯公司采用面向服務(wù)的應(yīng)用程序開發(fā)（Services-oriented development of application，SODA）使定點醫(yī)院醫(yī)保結(jié)算系統(tǒng)轉(zhuǎn)換到面向服務(wù)架構(gòu)（service-oriented architecture，SOA）。該接口服務(wù)集成了醫(yī)療保險定點醫(yī)療機(jī)構(gòu)的所有結(jié)算業(yè)務(wù)服務(wù)函數(shù)，這些函數(shù)供給醫(yī)院HIS系統(tǒng)調(diào)用，并支持重要結(jié)算信息的返回。將該接口嵌入原醫(yī)院管理系統(tǒng)后，醫(yī)院管理系統(tǒng)可無縫連接到醫(yī)療保險網(wǎng)絡(luò)信息系統(tǒng)。

醫(yī)院端與醫(yī)保核心端應(yīng)用架構(gòu)如下：

3 醫(yī)院對醫(yī)保接口的調(diào)試過程

3.1 醫(yī)保接口調(diào)試前的硬件準(zhǔn)備

醫(yī)院向地方通信公司申請開通醫(yī)保專線連接，并準(zhǔn)備一臺連接醫(yī)保專線的電腦。按照地緯軟件公司的要求，該電腦安裝Win7 32位專業(yè)版。

3.2 山大地緯結(jié)算軟件的安裝

電腦安裝地緯醫(yī)保結(jié)算系統(tǒng)，安裝USB加密卡。

地緯醫(yī)保結(jié)算系統(tǒng)安裝過程中，在D盤會創(chuàng)建“地緯定點醫(yī)療機(jī)構(gòu)結(jié)算系統(tǒng)三版”文件夾。這個文件夾里的sei3.dll文件是接口類庫文件，需要在電腦命令行狀態(tài)完成sei3.dll文件的注冊：

regsvr32 sei3.dll

3.3 編程環(huán)境的創(chuàng)建

為了方便醫(yī)保接口的調(diào)試工作，經(jīng)過綜合考量，決定使用不需要編譯的腳本語言Perl編寫調(diào)試程序。

安裝Strawberry Perl 5.26.2.1 （32bit）。安裝后的Perl并不能直接處理dll文件，還需要在命令行狀態(tài)安裝“Win32：：OLE”模塊：

Perl –MCPAN –e “install ‘win32：：OLE”

3.4 編寫調(diào)用dll的測試程序：

按照醫(yī)保接口文檔說明，用Perl寫一個創(chuàng)建ole對象的程序如下：

#！"D：＼Strawberry＼perl＼bin＼perl"

use Win32：：OLE;

my $sei = CreateObject Win32：：OLE 'sei3' or die $！;

my $vi = $sei->connecttonewobject（'sei3'）;

if （$vi ！= 0）

{

print "創(chuàng)建地緯嵌入式接口sei對象失?。。躰";

}

else

{

print "創(chuàng)建地緯嵌入式接口sei對象成功?。躰";

}

運行結(jié)果：創(chuàng)建地緯嵌入式接口sei對象成功！

在創(chuàng)建sei對象的基礎(chǔ)上，對接口文檔中“讀取無卡取保人基本信息”的功能編寫Perl程序，對本市參保人員高某的醫(yī)保信息嘗試讀?。?/p>

# 讀取無卡取參保人的基本信息 Perl代碼：

$sei->resetvar（）;

$sei->putvarstring（'grbh'，' 37088119710429****'）;

$sei->putvarstring（'xm'，'高**'）;

$sei->putvarstring（'yltclb'，'4'）;

$r = $sei->putvarstring（'sbjgbh'，' 37088101'）;

if （$sei->request_service（'query_person_info'） ！= 0）

{

print "調(diào)用無卡取信息服務(wù)失?。。躰";

}

$vrqlb? = $sei->getvarstring（'rqlb'）;

$vxm? ?= $sei->getvarstring（'xm'）;

$vzfbz? = $sei->getvarstring（'zfbz'）;

$vmzdbjbs = $sei->getvarstring（'mzdbjbs'）;

print "$vrqlb $vxm $vzfbz $vmzdbjbs";

程序運行后，屏幕打?。?/p>

A 高** 1 甲狀腺功能亢奮（門診特?。?m00023/

打印信息的含義依次為：人群類別 姓名 標(biāo)志 疾病編碼。

這說明，測試程序能夠正常調(diào)用sei3.dll封裝的函數(shù)。

接口文檔中其他的功能實現(xiàn)，都可以通過Perl對sei3.dll的調(diào)用來完成。在調(diào)用sei3.dll時經(jīng)常會要求傳遞datetime（）類型的時間參數(shù)，由于Perl和PB編程語言的差異，在Perl中沒有并沒有這個數(shù)據(jù)類型，所以需要寫一個生成datetime（）時間格式數(shù)據(jù)的子函數(shù)，在傳遞datetime（）類型的時間參數(shù)前進(jìn)行調(diào)用：

sub get_datetime（）

{

$chpasstime = time（）;

use POSIX qw（strftime）;

$chpasstime = strftime "%Y-%m-%d %H：%M：%S"， localtime（$chpasstime）;

$chpasstime = $chpasstime ;

return $chpasstime;

}

還有其他一些類似的情況，需要在Perl中構(gòu)造數(shù)據(jù)轉(zhuǎn)換函數(shù)，在此不再敘述。

3.5 醫(yī)保慢性病門診處方的處理實例

在完成對醫(yī)保接口基本調(diào)用的測試之后，開始調(diào)試醫(yī)保慢性病類型的門診處方。在醫(yī)院HIS系統(tǒng)里需要做一些必要的改動，醫(yī)保慢性病處方錄入后，需要及時調(diào)用醫(yī)保接口把處方內(nèi)容傳遞給醫(yī)保系統(tǒng)，并等待醫(yī)保系統(tǒng)返回的結(jié)算信息。傳遞門診處方的核心程序代碼為：

# 創(chuàng)建對象句柄

use Win32：：OLE;

$sei = CreateObject Win32：：OLE 'sei3' or die $！;

$vi =? $sei->connecttonewobject（'sei3'）;

# 醫(yī)保接口初始化

$sei->resetvar（）;

$sei->putvarstring（'sbjgbh'，'37088101'）;? # 社保機(jī)構(gòu)編號入?yún)?/p>

$sei->putvarstring（'yybm'，'088137'）;? ? ? ?# 醫(yī)院編號入?yún)?/p>

$sei->putvarstring（'gzrybh'，'0001'）;? ? ? ?# 操作員編號入?yún)?/p>

$sei->putvarstring（'pwd'，'******'）;? ? ? ? # 密碼入?yún)?/p>

$vi = $sei->request_service（'init'）;

# 門診初始化

$sei->resetvar（）;

$sei->putvarstring（'sbjgbh'，"$sbjgbh"）;

$sei->putvarstring（'yltclb'，"$yltclb"）;

$sei->putvarstring（'xzbz'，"C"）;? ? ? ? ? ? ? ?# 險種標(biāo)識，醫(yī)療C;工傷E

$sei->putvarstring（'grbh'，"$grbh"）;? ? ? ? ? # 個人編號

$sei->putvarstring（'xm'，"$xm"）;? ? ? ? ? ? ? ?# 姓名

$sei->putvarstring（'xb'，"$xb"）;? ? ? ? ? ? ? ?# 性別

$sei->putvarstring（'jbbm'，"$jbbm"）;? ? ? ? ? # 疾病編碼

$sei->putvarstring（'ysbm'，"$ysbm"）;? ? ? ? ? # 醫(yī)師編碼

$sei->putvardatetime（'fyrq'，"$datetime"）;? ?# 當(dāng)前時間入?yún)?/p>

$vi = $sei->request_service （'init_mz'）;? ? # 調(diào)用門診初始化

if （$vi eq '0'）? ? # 如果門診初始化成功

{

$vjshid=$sei->getvarstring（'jshid'）;? ? ? ? # 從接口讀取結(jié)算號

$vfyid=$sei->getvarstring（'fyid'）;? ? ? ? ? # 從接口讀取費用號

$vzylsh=$sei->getvarstring（'zylsh'）;? ? ? ? # 從接口讀取流水號

# 門診費用項目循環(huán)上傳

# 此處通過標(biāo)準(zhǔn)SQL語句讀取HIS數(shù)據(jù)庫中門診處方信息（已略去），并傳遞到醫(yī)保接口

while （@data = $sth->fetchrow_array（））

{

$sei->putvarstring（'yyxmbm'，"$yyxmbm"）;

$sei->putvarstring（'yyxmmc'，"$medname"）;

$sei->putvardec（'dj'，"$lprice"）;

$sei->putvardec（'sl'，"$quantity"）;

$sei->putvardec（'bzsl'，'1'）;

$sei->putvardec（'zje'，"$zje"）;

$sei->putvarstring（'gg'，"$guige"）;

$sei->putvardec（'sxzfbl'，"$sxzfbl"）;? ? # 自付比例

$sei->putvardatetime（'fyfssj'，"$datetime"）; # 當(dāng)前時間入?yún)?/p>

$sei->putvarstring（'zxksbm'，'006'）;? ? ?# 執(zhí)行科室編碼

$sei->putvarstring（'kdksbm'，'006'）;? ? ?# 開單科室編碼

$sei->putvarstring（'sm'，''）;? ? ? ? ? ? ?# 說明，默認(rèn)保持空

$sei->putvarstring（'yzlsh'，''）;? ? ? ? ?# 醫(yī)囑流水號 默認(rèn)保持空

$sei->putvarstring（'sfryxm'，"$sfryxm"）; # 收費人員姓名

}

}

程序運行后，門診處方內(nèi)容傳遞給接口，并接收到醫(yī)保返回的結(jié)算信息，彈出結(jié)算單打印界面。

這樣就完成了醫(yī)保慢性病門診處方的一次結(jié)算。

3.6 醫(yī)保類型住院費用的處理

住院費用的處理和門診費用的處理類似，最大的不同在于，醫(yī)保住院患者產(chǎn)生的費用信息實時上傳，并不結(jié)算，直到患者出院時才完成結(jié)算。

住院費用的上傳、患者出院的結(jié)算，也都是對醫(yī)保接口函數(shù)的調(diào)用，和醫(yī)保門診處方的調(diào)用過程類似。

限于篇幅，醫(yī)保住院費用的上傳程序、出院結(jié)算程序，本文不再敘述。

4 討論總結(jié)

Perl屬于快速原型開發(fā)的高級編程語言，程序代碼不需要編譯，使用非常方便，這是本院選擇使用Perl作為調(diào)試語言的原因。

隨著全國社會醫(yī)保工作的展開，各地醫(yī)院都會陸續(xù)接入醫(yī)保系統(tǒng)。本文記錄了我院加入社會醫(yī)保接口調(diào)試的主要流程，事實上，醫(yī)院管理系統(tǒng)（HIS）需要做的改動很多，細(xì)節(jié)工作也很煩瑣，比如醫(yī)院費用項目與醫(yī)保費用項目的對應(yīng)等工作。但只要能明確思路，所有問題都可以逐步得到解決。醫(yī)保接口的改造成功不僅方便了醫(yī)保患者的就醫(yī)，提高了醫(yī)院的服務(wù)水平，而且還規(guī)范了醫(yī)院醫(yī)保患者的管理。[3]

雖然各地醫(yī)保機(jī)構(gòu)和醫(yī)院軟件系統(tǒng)存在差異，但接入醫(yī)保系統(tǒng)的思路和過程是相似的，可以相互參考、借鑒。

參考文獻(xiàn)：

[1] 王琬，詹開明.社會力量助推醫(yī)保治理現(xiàn)代化研究[J].社會保障評論，2018，2（1）：82-91.

[2] 馬穎穎.社會保障公私合作的產(chǎn)生基礎(chǔ)及中國的實踐[J].社會保障評論，2017，1（3）：148-159.

[3] 賴家聚，賴燕梅，劉焱鑫.省、市醫(yī)保接口統(tǒng)一基礎(chǔ)與交換數(shù)據(jù)平臺實現(xiàn)[J].醫(yī)學(xué)信息，2019，32（12）：13-16.

【通聯(lián)編輯：王力】