




已阅读5页,还剩18页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
武汉蓝星软件技术有限公司 机密第 1 页2019-3-31 蓝星软件农村合作医疗转诊接口 参 考 手 册 Ver 1.0.0 武汉蓝星软件技术有限公司 2008 年 11 月 第 2 页 共 23 页 变更说明变更说明 时间修改人员函数修改说明 注意:示例部分未做调动,请参照函数说明的参数注意:示例部分未做调动,请参照函数说明的参数 第 3 页 共 23 页 目录目录 1. 目的目的.2 2. 方案介绍方案介绍.3 2.1.方案图解.3 2.2.医院系统需要做的改造工作.3 2.3.医院开发商需要提供的小应用.3 3. 医院管理信息系统改造实施详细说明医院管理信息系统改造实施详细说明.4 住院部分.4 4. 新农合接口函数说明新农合接口函数说明.4 4.1.函数说明.5 4.1.1.动态链接库初始化函数5 4.1.2.获取病人信息5 4.1.3.入院登记6 4.1.4.费用明细录入7 4.1.5.新农合病人结算、预结算8 4.1.6.取消住院结算9 4.1.7.读取住院结算信息和审批表10 4.1.8.获取已审批通过的药品和诊疗项目列表10 4.1.9.读取疾病信息表和报销公式11 4.2.函数示例.12 4.2.1.DELPHI引用及示例.12 4.2.2.POWERBUILDER引用及示例.13 第 4 页 共 23 页 1. 目的目的 为了更好的加快城市新型农村合作医疗建设,对于新农合报销算法的准确性、可控性、可维护性和安全性等多方 面的考虑,在对医院原有系统的改造的过程中,我们准备采用开发新农合报销算法的动态链接库的办法来解决。 2. 方案介绍方案介绍 2.1. 方案图解 2.2. 医院系统需要做的改造工作 首先医院需要根据新农合政策的需要,按照我们所提供的新农合的接口改造医院的 HIS 系统,使其 HIS 系 统能够适应新农合报销的需要。 医院需要根据合管办提供的三个基本目录,包括病种信息、药品信息、诊疗项目信息建立与医院内码对应 的对照信息。 对于那些无法找到对应关系的收费项目信息,医院按照新农合中心费用分类编码,维护收费项目信息。 此动态链接库的方式只适合于 Windows98 以上平台的 HIS 系统。 报销计算 办法 DLL 新农合 前置机 数据库 医院收费 终端计算 请求发起 报销计算结果写 入 HIS 系统中 HIS 系 统数据 库 传送 计算结果 第 5 页 共 23 页 2.3. 医院开发商需要提供的小应用 维护一个对照表,每个都是一对多的关系.也就是在原表基础上加新农合对应编码。 病种信息对照表 药品信息对照表 诊疗项目对照表 没有对应关系的收费项目信息,按照合管办的费用分类办法修改收费项目信息 蓝星新农合客户端提供相应的对应工作程序,对应完成后上报后提交合管办进行对应审核。 2.4.新农合转诊服务器一台 操作系统:WIN2K/2K SERVER/XP/2003 硬件要求:PIIII 1.7G/512M/40G 数据库要求:WIN SQL SERVER 2000 网络要求:内网通(能访问 HIS)并且外网通(能访问新农合) ,最好是单独能上网的专线(1。5M 以上) 。 网络安全:软件防火墙/硬件防火墙/网闸 3. 医院管理信息系统改造实施详细说明医院管理信息系统改造实施详细说明 3.1. 住院部分 1、获取病人信息 根据病人提供的合作医疗证号进行查询,选择病人后返回该病人的个人编号、姓名、性别、出生日期等相关信息。 2、入院登记(入院信息修改) 提交合作医疗证及个人编号和获取的就诊号进行住院病人的就诊登记。如因退合或者被列入黑名单,则可采用自 费方法处理。 3、药品、诊疗明细录入 调用接口函数“费用明细录入”把划价信息写入新农合前置机中。 4、出院结算(0:预结算;1:结算) 进行入院登记收费前必须保证已经进行了新合入院就诊登记。写入费用结束后调用“新农合病人结算、预结算” , 生成新农合结算信息。 5、取消费用结算 将已出院的病人取消费用结算,重新值为新合在院病人 6、取病人新合结算信息和审批表 取已经结算病人的报销结算单和新合报销审批表信息。 第 6 页 共 23 页 4. 新农合接口函数说明新农合接口函数说明 调用调用 DLL 基本流程:基本流程: 1、调用调用 InitDLL 初始化初始化 DLL; 2、调用调用 GetParmItem 获取基本信息;(基本信息要定期更新)获取基本信息;(基本信息要定期更新) 3、调用调用 UpdateHosOffice 上传医院科室信息;(可选)上传医院科室信息;(可选) 4、进行进行 项目项目 对应;对应; 5、调用调用 UpdateInterItem 上传上传 对应项目;对应项目; 6、进行进行 住院登记。住院登记。 7、 动态链接库名称动态链接库名称:QJ_NH_InterFace.DLL 配置文件配置文件 LxHzInterface.ini AppServer /中心服务器 UpServerConnect=25*la,jwxfal,uuu;capsmQ-_r_B9JWXFRQ;emj_r_A-j_grglG9ctjqgf;BG-pcqS9cspR;mdlG-wrgpsacQ-rqg qpcN9 uqn2.0.70qgf;bpmuqq_N9/,BCJMJOQ;pcbgtmpN AcountYear=2010 /帐套 年度(HIS 提供一个设置给用户选择农合帐套,保存用户帐套的年度在这里) Remaks: 参数参数 DataBuffer 说明说明: DataBuffer 为函数返回参数,Char* 类型,如果函数执行成功,返回值多个参数,使用|分割;如果执行失败,那 么 DataBuffer 中含有错误详细信息。 日期类型格式日期类型格式:yyyy-mm-dd hh:mm:ss,如果没有时间,则后 6 位均为 0。 返回值返回值: 成功 =0 失败 05107902-医院项目编号 2.00-数量 18.5000-单价 37.0000-费用 2125-处方号 1-单复方 标识 内科-用药科室 2010-6-10 8:55:10 -用药时间 2010-6-10 9:25:10-录入时间 05109401-医院项目编号 2.00-数量 18.5000-单价 37.0000-费用 2125-处方号 1-单复方 标识 内科-用药科室 2010-6-10 8:55:10 -用药时间 2010-6-10 9:25:10-录入时间 Remarks: Return :成功 0 ;失败 0 4.1.7.新农合病人结算新农合病人结算、预结算、预结算住院住院 Syntax: function PreClearing(AsOrganID, aOrgCode, AsCoopMedCode: pchar; AiIDNo, AiDiagNo, APreClearFlag: Integer; ADayCount: Integer; AOutDate, AJsDate, AOutStatus: pchar; DataBuffer: pchar): Integer; stdcall; 参数: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1 AsOrganIDIN转诊区划VARCHAR 12 N 2 aOrgCodeIN机构码机构码VARCHAR12N 3 AsCoopMedCodeIN合作医疗证号VARCHAR 20 N 4 AiIDNoIN户个人序号IntegerN 5 AiDiagNoIN就医序号IntegerN 6 APreClearFlagIN预/结算标致(0- 预结算,1-结算) IntegerN 7 ADayCountIN住院天数IntegerN 第 12 页 共 23 页 8 AOutDateIN出院时间(YYYY-MM- DD HH:MM:SS) N 9 AJsDateIN结算时间(YYYY-MM- DD HH:MM:SS) N 10 AOutStatusIN出院状态(1治 愈;2好转;3 未愈;4死亡; 9其他) VARCHAR 1 N 11 DataBufferOUTY 结算输出结算输出(DataBuffer)(DataBuffer): 0 医疗费总额|1 可报销费用|2 报销费用 |3 医院优惠|4 民政补助|5 保险金额|6 医院承担金额|7 起付线|8 保留|9 年 度报销总费用(包含本次)|10 保留|11 保留|12 保留 注意:医院发票上要反映医院减免,医院承担费用 Return :成功 0 ;失败 0 Remarks:Remarks: 病人支付费用=医疗费总额医院减免-医院承担报销费用 4.1.8.取消住院结算取消住院结算住院住院 Syntax: function CanceCalcFee(AsOrganID, aOrgCode, AsCoopMedCode: pchar; AiIDNo, AiDiagNo: integer; DataBuffer: pchar): Integer; stdcall; 参数:参数: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1 AsOrganIDIN转诊区划VARCHAR 12 N 2 aOrgCodeIN机构码机构码VARCHAR12N 3 AsCoopMedCodeIN合作医疗证号VARCHAR 20 N 4 AiIDNoIN户个人序号IntegerN 5 AiDiagNoIN就医序号IntegerN 6 DataBufferOUTY Return :成功 0 ;失败 0 4.1.9.读取住院结算信息和审批表读取住院结算信息和审批表住院住院 此函数在正式结算后调用。此函数在正式结算后调用。 Syntax: function GetCalcFee(AsOrganID, aOrgCode, AsCoopMedCode: pchar; AiIDNo, AiDiagNo: integer; DataBuffer: pchar): Integer; stdcall; 参数:参数: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1 AsOrganIDIN行政区划VARCHAR 12 N 2 aOrgCodeIN机构码机构码VARCHAR12N 3 AsCoopMedCodeIN合作医疗证号VARCHAR 20 N 第 13 页 共 23 页 4 AiIDNoIN户个人序号IntegerN 5 AiDiagNoIN就医序号IntegerN 6 DataBufferOUTY Return :成功 0 ;失败 0 Remarks: 第一段-基本信息 0 医疗证号|1 户主姓名|2 患者姓名|3 性别|4 出生年月|5 与户主关系|6 住址|7 经治医院|8 入院时间|9 出院时间|10 住 院天数|11 住院号|12 疾病名称|13 年度入院次数|14 总费用|15 可报销费用|16 报销费用|17 起付线|18 医院优惠|19 住院 科室|20 保留|21 保留|22 保留 第二段-住院医疗费用 费用编码|费用名称|费用金额|纳入补偿费用|报销费用 第三段报销公式及分段线核算 分段线可报销费用报销比例报销费用 4.1.10. 读取读取转诊基本信息转诊基本信息 Syntax: function GetParmItem(StrArea, aOrgCode, strkind, StrFileName: pchar; DataBuffer: pchar): integer; stdcall; 参数:参数: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备备 注注 1 AsOrganIDIN转诊区划VARCHAR(12 ) 12 N 2 aOrgCodeIN机构码机构码VARCHAR(12 ) 12N 3 AskindIN类型 0:帐套信息 1:疾病代码表; 2:报销公式目录; 3:项目目录; 4:已审核项目; 5:转诊区域; 6:单病种信息表; 7:统计科室 VARCHAR(1) 1 N 4 StrFileNameIN文件名(不含路径)Varchar(20) 20 N 5 DataBufferOUT错误返回信息 Return :成功 0 ;失败 0 Remarks: 该函数运行后在当前目录的DOWNLOAD 目录中生成指定文件名的文本。 文本中字符之间用软换行符#10分隔 文本文件字段顺序说明: 0:帐套信息:字段顺序:(帐套名,帐套描述,帐套年度) 1:疾病代码表:字段顺序:(IllCode 疾病编号,IllName 疾病名称,Spell 拼音码,FiveStrokes 五笔码, If_Modified 修改标志) 2:报销公式目录:字段顺序:(ExpressionsId 公式编号,ExpressionsName 公式名称,grade 等级,kind 补偿 类别【0 不限,1 限额,2 定额】,typefee 限定金额) 3 项目目录 的字段顺序:( ItemCode 项目编号,ItemName 项目名称,Unit 单位,WipeOut 报销标志(1 报销,2 不报销) ,Gg 规格, Cd 产地,Jx 剂型,Remark 备注,SpName 别名,Price1 单价 1,LimitPrice1 限价 1,Price2 单价 2, 第 14 页 共 23 页 LimitPrice2 限价 2,Price3 单价 3,LimitPrice3 限价 3,Valid 可用标志(1 可用,2 停用) ,Spell 拼音码, FiveStrokes 五笔码,GradeToPrice 等级限价,Grade 等级,WjCode ,FeeTypeCode 类型编号, FeeTypeName 类型名称) 4 已审核项目字段顺序(OrganId 区划编号, hoscode 医院项目号, hositem 医院项目名称, hosspec 医院项目规格, manufacturer 项目产地, hoskind 类别, hostype 剂型, incode 对应项目号, inkind 对应类别, orgcode 医疗机构编号, orgflag , itemname 对应项目名称, feetypecode 类型编号, feetypename 类型名称, wipeout 是否报销, grade 药品等级, LimitPrice1 限价 1, LimitPrice2 限价 2, LimitPrice3 限价 3, HosGrade 医院登等级) 5 转诊区域 字段顺序(OrganID 区划编号, OrganName 区划名称, orgCode 医院机构码,OrgName 医院名称) 6 单病种信息表:字段顺序(病种编号,病种名称,标准金额,补偿金额) 7 统计科室:字段顺序(科室编号,科室名称) 4.1.11. 取消入院登记(包括费用明细一起删除)取消入院登记(包括费用明细一起删除) Syntax: function DeleteHosInfo(AsOrganID, aOrgCode, AsCoopMedCode: pchar; AiIDNo, AiDiagNo: integer; DataBuffer: pchar): Integer; stdcall; 参数:参数: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1 AsOrganIDIN转诊区划VARCHAR 12 N 2 aOrgCodeIN机构码机构码VARCHAR12N 3 AsCoopMedCodeIN合作医疗证号VARCHAR 20 N 4 AiIDNoIN户个人序号IntegerN 5 AiDiagNoIN就医序号IntegerN 6 DataBufferOUT错误信息Y Return :成功 0 ;失败 0 Remarks: 取消已入院登记的病人信息,如存在费用明细,也会自动清除明细 4.1.12. 上传或取消医院项目对应编码上传或取消医院项目对应编码 Syntax: function UpdateInterItem(AsOrganID, aOrgCode, AsFlag, AsHosCode, AsHosName, AsHosSpec, AsHosUnit, AsHosCd, AsHosType, AsHosKind, AsHosPym, AsHosWbx, AsItemCode, AsDetail: pchar; Databuffer: pchar): Integer; stdcall; 参数:参数: 第 15 页 共 23 页 Return :成功 0 ;失败 0 Remarks: ASFLAG=0 时上传或修改已上传的医院项目对应信息. ASFLAG=1 申请撤消合管已审核的项目对应信息. 4.1.13. 删除删除 已经上传而未审核的项目已经上传而未审核的项目 Syntax: function DelunCheckItem(aOrganID, aOrgCode, aHosCode: PChar; DataBuffer: pchar): Integer; stdcall; 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1AsOrganID In 行政区划Varchar12N 2 aOrgCodeIN机构码机构码VARCHA R 12 N 3aHosCode In 医院项目编号Varchar20N 4DataBuffer Out 返回信息Varchar100Y DataBuffer 说明:成功返回空,否则返回错误信息。 Return :成功 0 ;失败 0 4.1.14. 删除已上传费用明细(全部)删除已上传费用明细(全部) 功能描述:功能描述:在新农合系统中删除住院费用明细。 调用说明:调用说明:HIS 系统在处理费用明细时,删除费用明细(当前病人所有的费用明细) 。 function DeleteFeeList(AsOrganID, aOrgCode, AsCoopMedCode: pchar; AiIDNo, AiDiagNo: integer; DataBuffer: pchar): Integer; stdcall; 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1 AsOrganIDIN转诊区划VARCHAR 12N 2 aOrgCodeIN机构码机构码VARCHAR12 N 3 AsFlagIN0-增加或修改,1- 撤消审核 CHAR 1N 4 AsHosCodeIN医院项目编码 (唯一) VARCHAR 20N 5 AsHosNameIN医院项目名称VARCHAR 80N 6 AsHosSpecIN规格VARCHAR 40Y 7 AsHosUnitIN包装单位VARCHAR 10Y 8 AsHosCdIN产地VARCHAR 20Y 9 AsHosTypeIN剂型VARCHAR 20Y 10 AsHosKindIN类型(1-诊疗项 目 2 手术项目 3 西药 4 中草 药) CHAR 1N 11 AsHosPymIN拼音码VARCHAR 10N 12 AsHosWbxIN五笔码VARCHAR 10Y 13 AsItemCodeIN对应的新合编 码 VARCHAR 20Y 14 AsDetailIN撤消说明VARCHAR 100Y 15 DataBufferOUT错误信息 第 16 页 共 23 页 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1AsOrganID In 行政区划Varchar12N 2 aOrgCodeIN机构码机构码VARCHA R 12 N 3AsCoopMedCode In 农合证号Varchar12N 4AiIDNo In 个人序号intN 5AiDiagNo In 就医序号IntN 6DataBuffer Out 返回信息Varchar100Y DataBuffer 说明:成功返回空,否则返回错误信息。 Return :成功 0 ;失败 0 4.1.15. 上传医院科室信息上传医院科室信息 功能描述:功能描述:上传医院科室基本信息 调用说明:调用说明:HIS 系统在录入科室信息时调用或 一次性上传科室信息调用。 function UpdateHosOffice(aOrganID, aOrgCode, aOfficeNo, aOfficeName, aStatCode: pchar; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1aOrganID In 行政区划Varchar12N 2 aOrgCodeIN机构码机构码VARCHA R 12 N 3aOfficeNo In 科室编号Varchar8N 4aOfficeName In 科室名称Varchar50N 5aStatCode In 统计科室Varchar8N 6DataBuffer Out 返回信息Varchar100Y DataBuffer 说明:成功返回空,否则返回错误信息。 Return :成功 0 ;失败 0 4.1.16. 删除医院科室信息删除医院科室信息 功能描述:功能描述:删除医院科室基本信息 调用说明:调用说明:HIS 系统在录入科室信息时调用。 function DelHosOffice(aOrganID, aOrgCode, aOfficeNo: pchar; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1aOrganID In 行政区划Varchar12N 2 aOrgCodeIN机构码机构码VARCHA R 12 N 3aOfficeNo In 科室编号Varchar8N 4DataBuffer Out 返回信息Varchar100Y 第 17 页 共 23 页 DataBuffer 说明:成功返回空,否则返回错误信息。 Return :成功 0 ;失败 0 4.1.17. 门诊登记门诊登记 功能描述:功能描述:在新农合系统中记载参合患者的门诊费用信息。 调用说明:调用说明:HIS 系统在办理门诊项目就医时调用。 function mz_SaveInfo(aXZQH, aOrgCode, aCoopMedCode: pchar; aIDNO: Integer; aInDate, aIllCode, aIllName, aExpenseKind, aDoctorName: pchar; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类数据类 型型 最多最多 长度长度 是否是否 为空为空 备注备注 1aXZQH In 行政区划Varchar12N 2aOrgCode In 服务单位Varchar12N 3aCoopMedCode In 新农合证号Varchar18N 4aIDNO In 个人序号IntN 5aInDate In 就诊时间varchar10Nyyyy-MM-dd 6aIllCode In 疾病编号Varchar10Y 7aIllName In 疾病名称Varchar40Y 8aExpenseKind In 补偿类别Varchar2N 11普通门诊 13预防接种 19门诊特殊疾病 90其他 9aDoctorName In 医生姓名Varchar20Y 10DataBuffer Out 返回信息Varchar100Y DataBuffer 说明:返回就诊序号。 Return :成功 0 ;失败 0 4.1.18. 门诊登记明细门诊登记明细 功能描述:功能描述:在新农合系统中记载参合患者的门诊费用信息明细。 调用说明:调用说明:HIS 系统在办理门诊项目就医时调用。 function mz_SaveInfoList(aXZQH, aOrgCode, aCoopMedCode: pchar; aIDNO, aDiagNo: Integer; aItemCode, aUnit: pchar; aPrice, aNum: double; aOfficeName, aRecipeNo, aYyDate, aGrade: pchar; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1aXZQH In 行政区划Varchar12N 2aOrgCode In 服务单位Varchar12N 3aCoopMedCode In 新农合证号Varchar10N 4aIDNO In 个人序号IntN 5aDiagNo In 就诊序号IntN 6aHosCode In 项目编号Varchar8N医院项目编号 7aUnit In 单位Varchar10Y 8aPrice In 单价Numeric(10,4)N 9aNum In 数量Numeric (6,2)N 10aOfficeName In 用药科室Varchar40Y 第 18 页 共 23 页 11aRecipeNo In 处方号Varchar12Y 12aYyDate In 用药时间DateY 13aGrade In 价格级别Varchar1N 0 无限价 1 一级 2 二级 3 三级 14DataBuffer Out 返回信息Varchar100Y DataBuffer 说明:费用序号。 Return :成功 0 ;失败 0 4.1.19. 删除门诊登记删除门诊登记 功能描述:功能描述:在新农合系统中删除参合患者的门诊费用信息及明细。 调用说明:调用说明:HIS 系统在办理门诊项目就医时调用。 function mz_DelInfo(aXZQH, aOrgCode, aCoopMedCode: Pchar; aIDNO, aDiagNo: Integer; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1aXZQH In 行政区划Varchar12N 2aOrgCode In 医疗服务单位Varchar12N 3aCoopMedCode In 新农合证号Varchar10N 4aIDNO In 个人序号IntN 5aDiagNo In 就诊序号IntN 6DataBufferOut返回信息Varchar100Y Return :成功 0 ;失败 0 4.1.20. 获取门诊结算报销费用信息获取门诊结算报销费用信息 功能描述:功能描述:获取患者门诊报销费用信息。 调用说明:调用说明:HIS 在门诊结算时调用。 function mz_GetCalcFee(aXZqh, aOrgCode, aCoopMedCode: pchar; aIDNO, aDiagNo: Integer; aRecFile: pchar; DataBuffer: pchar): integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1aXZQH In 行政区划Varchar12N 2aOrgCode In 医疗服务单位Varchar12N 3aCoopMedCode In 新农合证号Varchar10N 4aIDNO In 个人序号IntN 5aDiagNo In 就诊序号IntN 6aRecFile IN文件名(不含 路径) Varchar20N 7DataBufferOut返回信息Varchar1000Y DataBuffer 说明:0 总费用 | 1 可报销费用 | 2 报销费用 | 预留 | 预留 | 预留 | 预留 | 结算明细输出到文件,文件结构(字段顺序):(医院名称;农合号;病人姓名;性别;年龄;就诊日期;疾病 名称;医生姓名;项目名称;是否可报;单位;单价;数量;金额;可报金额。 )其中字段间以软换行符(10)分 隔。 Return :成功 0 ;失败 0 第 19 页 共 23 页 4.1.21. 门诊结算门诊结算 功能描述:功能描述:计算患者门诊报销费用。 调用说明:调用说明:HIS 在门诊结算时调用。 function mz_CalcOK(aXZqh, aOrgCode, aCoopMedCode: pchar; aIDNO, aDiagNo: Integer; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1aXZQH In 行政区划Varchar12N 2aOrgCode In 医疗服务单位Varchar12N 3aCoopMedCode In 新农合证号Varchar10N 4aIDNO In 个人序号IntN 5aDiagNo In 就诊序号IntN 6DataBufferOut返回信息Varchar1000Y DataBuffer 说明:0 总费用 | 1 可报销费用 | 2 报销费用 | 预留 | 预留 | 预留 | 预留 | Return :成功 0 ;失败 0 4.1.22. 取消门诊结算取消门诊结算 功能描述:功能描述:取消计算患者门诊报销费用。 调用说明:调用说明:HIS 在门诊结算时调用。 function mz_CalcCancel(aXZqh, aOrgCode, aCoopMedCode: pchar; aIDNO, aDiagNo: Integer; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 1aXZQH In 行政区划Varchar12N 2aOrgCode In 医疗服务单位Varchar12N 3aCoopMedCode In 新农合证号Varchar10N 4aIDNO In 个人序号IntN 5aDiagNo In 就诊序号IntN 6DataBufferOut返回信息Varchar100Y DataBuffer 说明:失败时返回错误信息,否则为空。 Return :成功 0 ;失败 0 4.1.23. 删除门诊明细(单条)删除门诊明细(单条) 功能描述:功能描述:单条删除患者门诊费用明细。 调用说明:调用说明:HIS 在登记门诊费用时调用。 function mz_DelList(aXZqh, aOrgCode, aCoopMedCode: pchar; aIDNO, aDiagNo, aFeeNo: Integer; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序序 号号 参数名称参数名称输入输入 / 输出输出 参数说明参数说明数据类型数据类型最多最多 长度长度 是否是否 为空为空 备注备注 第 20 页 共 23 页 1aXZQH In 行政区划Varchar12N 2aOrgCode In 医疗服务单位Varchar12N 3aCoopMedCode In 新农合证号Varchar10N 4aIDNO In 个人序号IntN 5aDiagNo In 就诊序号IntN 6aFeeNo In 费用序号IntN 7DataBufferOut返回信息Varchar100Y DataBuffer 说明:失败时返回错误信息,否则为被删除的费用序号。 Return :成功 0 ;失败 0 4.1.24. 用读卡器读卡用读卡器读卡 功能描述:读取刷卡信息并解密获得卡号(使用本公司提供的读卡器和卡)功能描述:读取刷卡信息并解密获得卡号(使用本公司提供的读卡器和卡) 调用说明:调用说明:HIS 在录入病人信息,病人刷农合卡时调用。 function User_ReadCard(COMi: integer; rData: PChar): integer; stdcall; 参数定义:参数定义: 序号序号 参数参数输入输入/输出输出参数名参数名是否可空是否可空类型类型 1 COMiIN串口号 N INT 2 rDataOut卡号 Y VARCHAR(300) COMi ( 1,2,3,4, , , , ) rData:返回卡号,需要预设一定长度。出错时返回错误提示信息。 Return :成功 0 ;失败 0 4.1.25. 根据读取的卡信息获得卡号根据读取的卡信息获得卡号 功能描述:解密卡信息获得卡号(适用本公司提供的卡)功能描述:解密卡信息获得卡号(适用本公司提供的卡) 调用说明:调用说明:HIS 在录入病人信息,病人刷农合卡时调用。 function GetCardIDByCode(Code: PChar; CardID: PChar): integer; 参数定义:参数定义: 序号序号 参数参数输入输入/输出输出参数名参数名是否可空是否可空类型类型 1 CodeIN卡信息 N VARCHAR(300) 2 CardIDOut卡号 Y VARCHAR(300) rData:返回卡号,需要预设一定长度。出错时返回错误提示信息。 Return :成功 0 ;失败 0 4.1.26. 根据卡号获得农合证号根据卡号获得农合证号 功能描述:根据卡号获得农合证号功能描述:根据卡号获得农合证号 调用说明:调用说明:HIS 在录入病人信息,病人刷农合卡时调用。 function GetCoopMedCodeByCardID(aOrganID, aOrgCode, aCardID: pchar; DataBuffer: pchar): Integer; stdcall; 参数定义:参数定义: 序号序号 参数参数输入输入/输出输出参数名参数名是否可空是否可空类型类型 1 aOrganIDIN行政区划 N VARCHAR(12) 2 aOrgCodeIN机构码机构码NVARCHAR(12) 3aCardIDIN卡号 N VARCHAR(300) 4DataBufferOUTVARCHAR(300) DataBuffer:返回农合证号,失败返回错误信息。 第 21 页 共 23 页 Return :成功 0 ;失败 0 4.1.27. 测试串口连接测试串口连接 功能描述:安装读卡器时,测试连接串口(使用本公司提供的读卡器)功能描述:安装读卡器时,测试连接串口(使用本公司提供的读卡器) 调用说明:测试读卡器是否连接正确时调用调用说明:测试读卡器是否连接正确时调用 function TestComConn (COMi: integer): integer; stdcall; 参数定义:参数定义: 序号序号 参数参数输入输入/输出输出参数名参数名是否可空是否可空类型类型 1 COMiIN串口号 N INT COMi ( 1,2,3,4, , , , ) Return :成功 0 ;失败 0 刷卡 函数 调用 说明: 1、 本公司提供的读卡器 和 卡:(TestComConn;User_ReadCard;GetCoopMedCodeByCardID) 。 2、 本公司提供的卡:(读卡;GetCardIDByCode; GetCoopMedCodeByCardID) 。 3、 否则:(读卡;GetCoopMedCodeByCardID) 。 4.1.28. 村卫生室同步乡镇卫生院的审核项目村卫生室同步乡镇卫生院的审核项目 功能描述:让村卫生室和乡镇卫生院的项目功能描述:让村卫生室和乡镇卫生院的项目 保持同步。保持同步。 调用说明:有新的项目产生时调用调用说明:有新的项目产生时调用 function QJ_UpdateCheckItem(aOrganID, aOrgCode: PChar; DataBuffer: PChar): Integer; stdcall; 参数定义:参数定义: 序号序号 参数参数输入输入/输出输出参数名参数名是否可空是否可空类型类型 1 aOrganIDIN行政区划 N Varchar(12) 2 aOrgCodeIN(村)机构码 N Varchar(12) 3 aPOrgCodeIN(乡镇)机构码 N Varchar(12) 3 DataBufferOut Y Varchar(100) DataBuffer:失败返回错误信息。 Return :成功 0 ;失败 0 4.2. 示例 4.2.1.DELPHI 引用及引用及 function InitDLL(StrError:pchar):integer;stdcall;external LxClient.dll; function GetHzPersonInfo(AsOrganID,AsCoopMedCode,DataBuffer:pchar):integer; stdcall;external LxClient.dll; function GetParmItem(AsOrganID,AsKind,DataBuffer:pchar):integer; stdcall; external LxClient.dll; / function SaveInHosInfo(AsOrganID, AsCoopMedCode, AsExpressionsID, AsPatientName: pchar; AiIDNo
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2025年度专业农产品集市摊位租赁经营合同
- 2025年度汽车抵押融资平台服务协议
- 2025版国际贸易保险合同范本下载
- 分布式光伏与建筑一体化2025年市场推广挑战与技术突破创新路径研究报告
- 2025版教育培训机构信息服务合同范本
- 2025碧桂园物业用房施工与物业服务质量保证合同
- 2025年农业循环经济菜园大棚承包与资源利用合同
- 2025年度婚纱摄影作品居间代理服务合同
- 2025年度租赁合同样本(含特殊条款定制服务)
- 2025电梯品牌代理商授权与区域市场管理合同范本
- 2024云南师范大学辅导员招聘笔试真题
- 2025年广省中考作文《走到田野去》写作指导及范文
- 2025年山东省中考数学试卷(含答案逐题解析)
- 慢阻肺非肺部手术麻醉管理策略
- 一例ICD置入患者的护理查房
- 2025至2030年中国露点传感器行业市场研究分析及投资前景规划报告
- 护理术中配合操作规范
- 孩子改姓改名协议书
- 膜结构车棚安装合同协议
- 建筑垃圾清运服务方案投标文件(技术方案)
- 2025河南航空港发展投资集团有限公司社会招聘11人笔试参考题库附带答案详解
评论
0/150
提交评论