荆州医保支付接口应用编程接口规范
ref string astr_jylsh, ref string astr_jyyzm, ref string astr_jysc_xml, ref long aint_appcode, ref string astr_appmsg)
参数名称 astr_jybh 参数含义 交易编号 参数类型 参数类别 String String String String 参数说明 入口参数 具体的交易代码见〖交易列表〗 入口参数 xml方式，组织方式见业务说明 入口参数 xml方式，组织方式见业务说明 出口参数 与签到交易中返回的值相同，用于标识签到与支付数据的相关性 astr_jykz_xml 交易控制 astr_jysr_xml 交易输入 astr_pcbh 批次编号 astr_jylsh astr_jyyzm 交易流水号 交易验证码 String String 出口参数 唯一标识一次交易，VARCHAR(20) 出口参数 处理类交易返回，确认交易时传入 VARCHAR(15) astr_jysc_xml 交易输出 aint_appcode 交易标志 String long 出口参数 xml方式，组织方式见业务说明 出口参数 小于0均为失败。此值数据类型是整数，范围为-2147483648 to +2147483647 astr_appmsg 交易信息 String 出口参数 错误信息描述。aint_appcode小于0时存放错误描述，其他aint_appcode不用关心该参数内容。 ? 函数说明：
交易主函数，完成所有医疗业务的实际处理。
由于交易调用远程方法，并且可能存在用户交互界面，因此建议所有交易不要纳入HIS系统事务管理。
在交易接口函数定义中，传递的参数都是字符串。但是在交易详细说明中，数据类型都是逻辑类型，常用类型有三种：string,number,datetime，下面的表格描述了交易接口进行类型转换的限制和说明。
第 6 页 共 76 页
荆州医保支付接口应用编程接口规范
数据类型 string number 空字符串 视同空串 视同0 格式不合法 无 返回错误 其它说明 无特别说明标注的长度为最大长度 无特别说明标注的长度为最大长度（小数尾数同） datetime 视同空值 返回错误 足19位长，格式如下： YYYY-MM-DD hh24:mm:ss date 视同空值 返回错误 足19位长，格式如下： YYYY-MM-DD astr_jykz_xml、astr_jysr_xml、astr_jysc_xml参数均按照交易详细说明里xml参数组合，顺序无关。接口调用示例：
VB调用
53. 54. 55. 56. 57. 58. 59. 60. 61. 62. 63. 64. 65. 66. 67. 68. 69.
Dim yinhaiobject As Object '定义存放引用对象的变量。 Set yinhaiobject = CreateObject(\YinHai.HBJZInterface\'检查连接是否建立
If yinhaiobject Is Nothing Then MsgBox \对象为空!\End If
Dim BusinessID As String Dim Ctrlxml As String Dim Dataxml As String Dim Pcbh As String
Dim Businesssequence As String Dim Businessvalidate As String Dim Outputxml As String Dim Appcode as Long Dim Appmsg As String
BusinessID=\
第 7 页 共 76 页
荆州医保支付接口应用编程接口规范
70. 71.
Ctrlxml =\ '组织参数 Dataxml =\ '组织参数
yinhaiobject.yh_interface_call
BusinessID,Ctrlxml,Dataxml,Pcbh,Businesssequence,Businessvalidate,Outputxml,Appcode,Appmsg '判断返回信息 72. 73.
'HIS业务处理
Set yinhaiobject = Nothing '关闭对象
delphi调用
74. 75. 76. 77. 78. 79. 80. 81. 82. 83. 84. 85. 86. 87. 88. 89. 90.
注意：delphi调用时先要 uses ComObj;否则不能引用oleobject。 Var
yinhaiobject: Variant; //定义存放引用对象的变量。 BusinessID : String Ctrlxml : String Dataxml : String Pcbh : String
Businesssequence : String Businessvalidate : String Outputxml : String Appcode : integer Appmsg:String; Begin try
yinhaiobject := CreateOleObject('YinHai.HBJZInterface'); BusinessID:= '01';
yinhaiobject.yh_interface_call(BusinessID,Ctrlxml,Dataxml,Pcbh,Busin
esssequence,Businessvalidate,Outputxml,Appcode,Appmsg) 91.
//返回结果判断，HIS内部处理
第 8 页 共 76 页
荆州医保支付接口应用编程接口规范
92. 93. 94. 95.
finally
yinhaiobject:=Unassigned;// 关闭对象 end; End;
pb调用
oleobject yinhaiobject long result, Appcode
String BusinessID,Ctrlxml,Dataxml,Pcbh,Businesssequence String Businessvalidate,Outputxml, Appmsg yinhaiobject=create oleobject
result=yinhaiobject.ConnectToNewObject(\YinHai.HBJZInterface\if result<>0 then
messagebox(\，\return
end if
BusinessID=”01” 96.
yinhaiobject.yh_interface_call(BusinessID,Ctrlxml,Dataxml,Pcbh,Busin
esssequence,Businessvalidate,Outputxml,Appcode,Appmsg) 97. 98. 99. 100.
? 原型定义：
yh_interface_confirm(
string astr_jylsh,
string astr_jyyzm,
// 返回结果判断，HIS内部处理 // 关闭对象
yinhaiobject.DisconnectObject ( ) destroy yinhaiobject
yh_interface_confirm
第 9 页 共 76 页
荆州医保支付接口应用编程接口规范
ref long aint_appcode, ref string astr_appmsg)
参数名称 astr_jylsh astr_jyyzm aint_appcode astr_appmsg 参数含义 交易流水号 交易验证码 交易标志 交易信息 参数类型 参数类别 String String long String 参数说明 入口参数 唯一标识一次交易，VARCHAR(20) 入口参数 处理类交易返回，VARCHAR(64) 出口参数 确认交易HIS不用关心本次处理出口参数 返回结果，但是必须采用查询不确定交易的方式来确定是否所有数据正确处理。 ? 函数说明：
交易辅助函数，完成交易的确认处理。
对于处理类交易，HIS调用接口成功后完成HIS系统数据保存，则调用该交易进行中心确认处理。
? 接口调用示例：
参看yh_interface_call调用说明。
yh_interface_cancel
? 原型定义：
yh_interface_cancel (
string astr_jylsh, ref long aint_appcode, ref string astr_appmsg)
参数名称 astr_jylsh aint_appcode astr_appmsg 参数含义 参数类型 参数类别 入口参数 唯一标识一次交易，VARCHAR(20) 出口参数 确认交易HIS不用关心本次处理出口参数 返回结果，但是必须采用查询不确定交易的方式来确定是否所有数据正确处理。 ? 函数说明：
交易流水号 String 交易标志 交易信息 long String 第 10 页 共 76 页
百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库荆州市医保支付接口规范(2)在线全文阅读。
相关推荐：