省市级转诊实时接口

1、目录1. 目的32. 方案介绍3方案图解3医院系统需要做的改造工作3医院开发商需要提供的小应用4新农合转诊服务器一台43. 医院管理信息系统改造实施详细说明43.1. 住院部分44. 新农合接口函数说明54.1.1.4.1.2.4.1.3.4.1.4.4.1.5.4.1.6.4.1.7.4.1.8.4.1.9.4.1.10.4.1.11.4.1.12.4.1.13.4.1.14.4.1.15.4.1.16.4.1.17.4.1.18.4.1.19.4.1.20.4.1.21.4.1.22.4.1.23.4.1.24.4.1.25.4.1.26.4.1.27.4.1.28.动态库初始化函数6获取

2、已通过的项目到前置机（停用）6转诊基本信息（可参考函数 4. 1. 24）（停用）6省（市）级转诊 获取区划信息7上传或取消医院项目对应编码8上传医院科室信息8删除医院科室信息9省（市）级转诊读卡9市市读卡读卡函数 (提供的) .9) .10函数 ( 明华澳汉 提供的省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊省（市）级转诊根据获取农合号和个人序号10获取转诊区划内信息10住院登记11住院信息 修改12费用明细录入13删除已上传费用明细（含本地和） .14新农合结算、预结算14住院结算

3、信息和表15数据回写当地合管办 服务器16已经回写当地的数据16取消住院结算16取消住院登记（农合转自费）17住院 上传明细后的处理（仅针对直接写前置机记帐明细表后的处理工作）17获取基础信息到 前置机 数据库中18获取特殊信息19读 居民健康卡 返回号19根据号 获取 农合证号 和 个人序号19信息201.目的为了更好的加快城市新型农村合作医疗建设，对于新农合报销算法的准确性、可控性、可性和安全性等多方面的考虑，在对医院原有系统的改造的过程中，准备采用开发新农合报销算法的动态库的办法来解决。2.方案介绍省中心服 务器2.1. 方案图解报销计算 办法 DLLHIS系统数据 库新农合 前置机当地

4、农合 服务器医院 终端计算 请求发起农合服务 器2.2. 医院系统需要做的改造工作首先医院需要根据新农合政策的需要，按照所提供的新农合的接口改造医院的 HIS 系统，使其 HIS 系统能够适应新农合报销的需要。医院需要根据合管办提供的三个基本目录，包括病种信息、药品信息、诊疗项目信息建立与医院内码对应的对照信息。对于那些无法找到对应关系的项目信息，医院按照新农合中心费用分类编码，项目信息。此动态库的方式只适合于Windows98 以上的 HIS 系统。报销计算结果写入 HIS 系统中计算结果传送2.3. 医院开发商需要提供的小应用一个对照表，每个都是一对多的关系.也就是在原表基础上加新农合对应

5、编码。病种信息对照表药品信息对照表诊疗项目对照表没有对应关系的项目信息，按照合管办的费用分类办法修改项目信息新农合客户端提供相应的对应工作程序，对应完成后上报后提管办进行对应审核。2.4.新农合转诊服务器一台操作系统:WIN2K/2K SERVER/XP/2003硬件要求：PIIII 1.7G/512M/40G数据库要求：WIN SQL SERVER 2000网络要求：内网通（能HIS）并且通（能新农合），最好是单独能上网的专线（1。5M 以上）。/硬件/网闸：3.医院管理信息系统改造实施详细说明3.1. 住院部分1、获取根据信息提供的合作医疗证号进行查询，选择后返回该的个人、出生日期等相关信

6、息。2、入院登记（入院信息修改）提作医疗证及个人和获取的就诊号进行住院的就诊登记。如因退合或者被列入，则可采用自费方法处理。3、药品、诊疗明细录入调用接口函数“费用明细录入”把划价信息写入新农合前置机中。4、出院结算(0：预结算；1:结算)进行入院登记前必须保证已经进行了新合入院就诊登记。写入费用结束后调用“新农合结算、预结算”，生成新农合结算信息。5、取消费用结算将已出院的取消费用结算，重新值为新合在院6、取新合结算信息和表取已经结算的报销结算单和新合报销表信息。4.新农合接口函数说明4.0 调用 DLL 基本流程：【省（市）级转诊医院 流程】1、调用 InitDLL 初始化 DLL；（不需

7、要经常调用）2、调用 GetParmItem 获取基本信息；（基本信息要定期更新，或参考 GetParmItemToDB）3、调用 UpdateHosOffice 上传医院科室信息；（可选）4、进行 项目 对应；（可选）5、调用 UpdateerItem 上传 对应项目；（可选）6、调用 GetCheckItem 获取 已审核项目；（不定期更新已审核项目）7、调用 GetXZQHinfo_zz 8、调用 zzUser_ReadCard获取区划信息，刷卡获取，所属区划；市医院用 User_WHReadCard；（可选）获取农合证号和个人序号；（可选）9、调用 zzGetCoopMedCodeBy

8、CardID 根据10、 调用 GetZzinfo_zz 获取转诊信息；11、 调用 zzSaveInHosInfo 入院登记，修改已登记信息用 SaveInHosInfo ；12、 上传费用：方法 1：费用直接写入前置机表（o_CbZyBxDjZb），则写入完成后调用 Pro用失败，则清除写入的数据；具体写入办法见 4.1.12；方法 2：调用 SaveFreeList 。（一般费用较大的医院 建议用 方法 1 ）13、 调用 PreClearing 进行 预结算，结算；sFeeList ，如果调14、 调用 GetCalcFee 获取结算信息和15、 调用 zzGetDataBack 结算

9、信息回写表（可选），必须结算完成才能调用。所属地服务器16、 如果需要回归：则先调用 zzBack_ClearData算；已回写数据；再调用 CanceCalcFee取消结17、 用 DeleteFeeList 删除已上传费用（未结算才能操作）；18、 用 zzDeleteHosInfo 删除入院登记（未结算才能操作）。动态库名称：LxCLXSETUP.INISynch Host=192.168.50.117Port=1899Remaks:注意服务端nt.dll前置服务器的 IP 地址前置服务器开放的端，可自定义对端的开放状态，前置机和客户端的端必须保持一致LxCnt.dllDataBuffe

10、r 说明：DataBuffer 为函数返回参数，PChar类型，如果函数执行成功，返回值多个参数，使用|分割；如果执行失败，那么 DataBuffer 中含有错误详细信息。日期类型格式：yyyy-mm-dd hh:mm:ss，如果没有时间，则后 6为 0。返回值： 成功 =0失败 0输出是以“$、|、#、”分割的字符串以“|”分隔，详见每个交易的参数表, 分项之间使用管道分割符|分割，最后必须要以管道分割符号|结尾，不以|开始。如果入参为多条，之间以$分割，不同数据项之间以|分割Remarks:在所有函数中不存在唯一的住院号，唯一值是医疗证号+个人序号+就诊序号Code + CoopMedCo

11、de + IDNo + DiagNo，即机构码+农户新合4.1.1.动态库初始化函数syntax:function InitDLL(DataBuffer: Pchar):eger; stdcall;Parameter:参数Return ：成功 0 ；失败 0Remarks：此函数主要是测试前置机是否启动，非编程必用函数。4.1.2.获取已通过的项目到前置机（停用）Syntax:function GetCheckItem(AsParameter:anID: pchar):eger; stdcall;Return ：成功 0 ；失败 0Remarks:当医院有新项目增加后，在新合中进行对应经后，请

12、及时运行此函数，否则在新合费用明细录入中返回错误值。注意此函数不要频繁使用。4.1.3.转诊基本信息（可参考函数 4. 1. 24）（停用）Syntax:function GetParmItem(AsParameter:anID, AsKind, DataBuffer: pchar):eger;stdcall;参数输入/输出参数名是否可空类型AsanIDIN行政区划+ $ + 帐套年度NVARCHAR(20)AskindIN类型1：疾病代码表；NVARCHAR(1)参数输入/输出参数名是否可空类型AsanIDIN行政区划+ $ + 帐套年度NVARCHAR(20)参数输入/输出参数名是否可空类

13、型DataBufferOUT返回信息VARCHAR(100)注：当 Askind5 时，AsanID 可以为空。Return ：成功 0 ；失败 0 Remarks:该函数运行后在当前目录的DOWNLOAD 目录中生成以（ILL+年月日时分秒：疾病代码表）,（BXGS+年月日时分秒：报销公式），（ITEM+年月日时分秒：项目目录）, （BXITEM+年月日时分秒：已审核项目）和（AREA+年月日时分秒：转诊区划），（LIMI+年月日时分秒：单病种），（Office+年月日时分秒：统计科室）为开头的 TXT 文本文本中字符之间用软换行符#10分隔文本文件字段顺序说明：1：疾病代码表：字段顺序：（

14、 IllCode 疾病If_Modified 修改标志）,IllName 疾病名称,Spell 拼音码,FiveStrokes 五笔码，2：报销公式目录：字段顺序：（years 公式年度，ExpressId 公式,ExpressName 公式名称,grade 等级,kind 补偿类别【0 不限，1 限额，2】,typefee 限定金额）3 报销项目目录 的字段顺序：（ItemCode 项目，ItemName 项目名称，Unit，WipeOut 报销标志（1 报销，2 不报销），Gg 规格，Cd 产地，Jx 剂型，Remark 备注，SpName 别名，Price1 单价 1，LimitPric

15、e1 限价 1，Price2 单价 2，LimitPrice2 限价 2，Price3 单价 3，LimitPrice3 限价 3，Valid 可用标志（1 可用，2 停用），Spell 拼音码，FiveStrokes 五笔码，GradeToPrice 等级限价，Grade 等级，WjCode ，FeeTypeCode 类型FeeTypeName 类型名称），4 医院对应审核项目字段顺序（anId 区划, hoscode 医院项目号, hositem 医院项目名称,hosspec 医院项目规格, manufacturer 项目产地, hoskind 类别, hostype 剂型, incode

16、 对应项目号,inkind 对应类别,code 医疗机构,flag, itemname 对应项目名称, feetypecode 类型,feetypename 类型名称,wipeout 是否报销, grade 药品等级, LimitPrice1 限价 1, LimitPrice2 限价 2,LimitPrice3 限价 3, HosGrade 医院登等级）5 行政区划 字段顺序（anID 区划,anName 区划名称, year 年度）6 单病种信息表：字段顺序（病种，病种名称，标准金额，补偿金额，拼音码）7 统计科室：字段顺序（科室，科室名称）4.1.4.省（市）级转诊 获取区划信息功能描述：

17、获取参与转诊的区划信息调用说明：function GetXZQHinfo_zz(aAreaCode, DataBuffer: pchar):参数定义：eger; stdcall;参数输入/输出参数名是否可空类型2：报销公式目录；3：报销项目目录；4：医院对应审核项目；5：行政区划，帐套年度；（AsanID=NULL）6：单病种信息表；7：统计科室DataBufferOUT返回信息Return：成功 0；失败 0DataBuffer 说明：0区划号|1 区划号|2 区划名称|3 预留|4 预留|5 预留|6 预留|7 预留|$这里是所属区划 的来源4.1.5.上传或取消医院项目对应编码Synta

18、x:function UpdateerItem (AsanID, AsFlag, AsHosCode, AsHosName, AsHosSpec, AsHosUnit,AsHosCd,AsHosType,AsHosKind, AsHosPym, AsHosWbx, AsItemCode, AsDetail, Databuffer: PChar):Parameter:eger; stdcall;Return ：成功 0特别说明：；失败 0ASFLAG=0 时上传或修改已上传的医院项目对应信息.ASFLAG=1 申请撤消合管审核的项目对应信息.AsDetail ：在省（市）级，新增时 是 项目价格

19、。4.1.6. 上传医院科室信息功能描述：上传医院科室基本信息调用说明：HIS 系统在录入科室信息时调用或上传科室信息调用。function UpdateHosOffice(a参数定义：anID, aOfficeNo, aOfficeName, aSCode: PChar; DataBuffer: PChar):eger; stdcall;序号参数名称输入 /输出参数说明数据类型最多长度是否为空备注参数输入/输出参数名是 否可空类型AsanIDIN行政区划 + $ + 帐套年度NVARCHAR(20)AsFlagIN0-增加或修改,1-撤消审核NCHAR(1)AsHosCodeIN医院项目编码

20、(唯一)NVARCHAR(20)AsHosNameIN医院项目名称VARCHAR(80)AsHosSpecIN规格VARCHAR(40)AsHosUnitIN包装VARCHAR(10)AsHosCdIN产地VARCHAR(20)AsHosTypeIN剂型VARCHAR(20)AsHosKindIN类型(1-诊疗项目 2 手术项目3 西药 4 中草药 5 中成药 6医用材料)CHAR(1)AsHosPymIN拼音码VARCHAR(10)AsHosWbxIN五笔码VARCHAR(10)AsItemCodeIN对应的新合编码VARCHAR(20)AsDetailIN撤消说明 (注意 新增时 是项目价

21、格)VARCHAR(100)DataBufferOUT错误信息YaAreaCodeIN行政区划 + $ + 帐套年度NVarchar(20)DataBufferOut返回值Varchar(5000)DataBuffer 说明：成功返回空，否则返回错误信息。Return ：成功 0 ；失败 04.1.7. 删除医院科室信息功能描述：删除医院科室基本信息调用说明：HIS 系统在录入科室信息时调用。function DelHosOffice(a参数定义：anID, aOfficeNo: PChar; DataBuffer: PChar):eger; stdcall;DataBuffer 说明：成功返

22、回空，否则返回错误信息。Return ：成功 0 ；失败 04.1.8.省（市）级转诊 读卡功能描述：刷卡信息并获得（使用本公司提供的和卡）调用说明：HIS 在录入信息，刷农合卡时调用。eger; rData: PChar):eger; stdcall;function zzUser_ReadCard(COMi:参数定义：COMi （ 1，2，3，4，）rData：返回错误提示信息。（如果长度大于 10 时 则前 6 位 为所属区划号，从第七位开始为）。出错时返回Return：成功 0 ；失败 04.1.9.读卡 函数 ()市提供的功能描述：获取调用说明：function User_WHRea

23、dCard(CardKind:eger;MyCardID: PChar):eger;参数定义：参数输入/输出参数名是否可空类型CardKindIN卡类型：1；0。N参数输入/输出参数名是否可空类型COMiIN串NrDataOutYVARCHAR(300)序号参数名称输入 /输出参数说明数据类型最多长度是否为空备注1aanIDIn行政区划+ $ + 帐套年度Varchar12N2aOfficeNoIn科室Varchar8N3DataBufferOut返回信息Varchar100Y1aanIDIn行政区划+ $ + 帐套年度Varchar20N2aOfficeNoIn科室Varchar8N3aOf

24、ficeNameIn科室名称Varchar50N4aSCodeIn统计科室Varchar8N5DataBufferOut返回信息Varchar100YReturn：成功 0；失败 0； MyCardID：返回（如果则返回错误信息。长度大于 10 时 则前 6 位 为所属区划号，从第七位开始为），出错4.1.10.市读卡 函数 ( 明华澳汉 提供的)功能描述：获取调用说明：function mh_WH_ReadCard (CardKind:eger;MyCardID: PChar):参数定义：eger;Return：成功 0；失败 0；MyCardID：返回则返回错误信息。长度大于 10 时 则

25、前 6 位 为（如果所属区划号，从第七位开始为），出错4.1.11. 省（市）级转诊根据获取农合号和个人序号功能描述：获取转诊调用说明：农合号和个人序号function zzGetCoopMedCodeByCardI参数定义：rganID, aAreaCode, aCardID: PChar; DataBuffer: PChar):eger;Return：成功 0；失败 0DataBuffer 说明： 0 新合号 | 1 个人序号注：（个人序号：如果是一人一卡 则 为本人；否则为户主）特别说明荆州市、黄冈市、随州市、荆门市：DataBuffer 说明：一户一卡返回： 0 新合号 | 1 个人序

26、号| 2一人一卡返回：0 新合号 | 1 个人序号$4.1.12. 省（市）级转诊 获取转诊区划内信息功能描述：获取转诊调用说明：信息function GetZzinfo_zz(aGrade, aAreaCode: pchar; DataBuffer: pchar):参数定义：eger;stdcall;参数输入/输出参数名是否可空类型aanIDIN行政区划+ $ + 帐套年度NVarchar(20)aAreaCodeIN所属区划NVarchar(6)aCardIDInNVarchar(20)DataBufferOut返回值Varchar(100)参数输入/输出参数名是否可空类型CardKind

27、IN卡类型：1；0。NMyCardIDOutVarchar(100)MyCardIDOutVarchar(100)Return：成功 0；失败 0DataBuffer 说明： 0 新合号|1|2 个人序号|3所属区划|4 转诊序号|5 疾病|6 疾病名称|7 转前医院|8 转诊原因| 9预留|$如果意见|10|11日期| 12号|13 出生日期|14|15 住址 |16 预留|17 预留|18 预留|19存入前置机表：p_CbNhGrXxPhoto 中。有，则4.1.13. 省（市）级转诊 住院登记功能描述：调用说明：新农合转诊住院信息转诊 住院登记时调用function zzSaveInHo

28、sInfo(AsanID, aAreaCode, AsCoopMedCode, AsExpressID: pchar;AiIDNo, aTurnID:eger; AsIllCode, AsIllName, AInDate, Adke, AdLimitDef, AsDoctor, AsPatientId, AsExpenseKind,AsLimitIllCode,DataBuffer: Pchar):参数定义：eger; stdcall;参数输入/输出参数名是否可空类型AsanIDIN行政区划+ $ + 帐套年度NVARCHAR(20)aAreaCodeIN所属区划NVARCHAR(12)AsC

29、oopMedCodeIN新合证号NVARCHAR(18)AsExpressIDIN报销公式 IDNVARCHAR(4)AiIDNoIN个人序号NegeraTurnIDIN转诊序号NegerAsIllCodeIN入院(合管办提供的疾病代码)YVARCHAR(10)，只能一个编码AsIllNameIN入院(合管办提供的疾病名称)YVARCHAR(40),可以多个名称AInDateIN入院日期N(YYYY-MM-D D HH:MM:SS)AdkeIN扣额说明：报销公式没有调整时：扣额只调整起付线：扣额调整后起 额 + $只调整报销比率：扣额$ + 调整比率两个都调整 ：扣额调整后起额 + $ + 调

30、整比率（其中调整比例为不带百分号的小YVARCHAR(12)参数输入/输出参数名是否可空类型aGradeIN区划等级 + $ + 帐套年度（1 省级2 地(市)级）NVarcahr(10)aAreaCodeIN行政区划+$+所属区划+$+农合证号+$+个人序号注：行政区划，所属区划,农合证号 不能为空， 个人序号可以为空。其中 荆州、黄冈、随州、荆门市级转诊： 个人序号也不能为空。NVarchar(50)DataBufferOut返回值Varchar(500 0)DataBuffer ： 就医序号Return : 成功 0； 失败 0注意：修改住院登记信息 可以 用函数 4.1.3SaveIn

31、HosInfo 进行。4.1.14. 省（市）级转诊 住院信息 修改Syntax:function SaveInHosInfo(AsanID, AsCoopMedCode, AsExpressID, AsPatientName: pchar; AiIDNo:eger;AsIllCode, AsIllName, AInDate, Adke, AdLimitDef, AsDoctor, AsPatientId, AsFlag, AiDiagNo, AsExpenseKind,AsLimitIllCode, DataBuffer: Pchar):Parameter:eger; stdcall;参数输

32、入/输出参数名是否可空类型AsanIDIN行政区划 + $ + 帐套年度NVARCHAR(20)AsCoopMedCodeIN农合证号NVARCHAR(18)AsExpressIDIN报销公式 IDNVARCHAR(4)AsPatientNameIN入院NVARCHAR(10)AiIDNoIN个人序号NegerAsIllCodeIN入院(合管办提供的疾病代码)NVARCHAR(10)AsIllNameIN入院(合管办提供的疾病名称)NVARCHAR(40)AInDateIN入院日期N(YYYY-MM-DD HH:MM:SS)AdkeIN扣额 报销公式没有调整时：扣额YVARCHAR(12)数，

33、例 1： 原来起伏线 200，报销比例 80；起伏线调整为 50，报销比例增加 5，则扣额50$0.05； 报销比例减少 5，则扣额50$ 0.05；例 2：起伏线调整为 50，报销比例为原来报销比例的 60，则扣额 50$*0.6）AdLimitDefIN限额定义(0不限；1限额；2)第一位为上面的三个字符（0、1、2），从第二位开始为金额，金额不为空，为空时补 0YVARCHAR (10)AsDoctorIN主治医生YVARCHAR (12)AsPatientIdIN住院号+科室号+号+备注Y住院号 12 位科室 8 位号 20 位AsExpenseKindIN21-普通住院22-单病种住

34、院23正常分娩住院29其他住院90其他YVARCHAR (2)AsLimitIllCodeIN单病种疾病编码YVARCHAR(4)当AsExpenseKind=22 时不能为空DataBufferOut返回值VARCHAR (100)Return ：成功 0 ；失败 0DataBuffer: 当ASFLAG=1 修改时，DataBuffer 返回错误信息或空。4.1.15. 省（市）级转诊 费用明细录入Syntax:function SaveFreeList(AsanID, AsCoopMedCode: PChar; AiIDNo, AiDiagNo:eger; AsItemCode, AsH

35、osCode,ADInputDate: pchar; AfPrice, AfNum, AfFee: Double; AsUnit, AsOfficeName, AsDoctor,pound: pchar; DataBuffer:Pchar):eger; stdcall;Parameter:序号参数名称输入 /输出参数说明数据类型是否为空1AsanIDIN行政区划+ $ + 帐套年度VARCHAR(20)N2AsCoopMedCodeIN合作医疗证号VARCHAR(20)N3AiIDNoIN户个人序号egerN4AiDiagNoIN就医序号egerN5AsItemCodeIN新合项目编码VARC

36、HAR(20)Y6AsHosCodeIN医院项目编码VARCHAR(20)N7ADInputDateIN用药时间(YYYY-MM-DD HH:MM:SS)N8AfPriceIN单价DoubleN9AfNumIN数量DoubleN10AfFeeIN金额DoubleN只调整起付线:扣额调整后起额 + $只调整报销比率：扣额$ + 调整后报销比率两个都调整 ：扣额调整后起额 + $ +调整后报销比率AdLimitDefIN限额定义(0不限；1限额；2；第一位为上面的三个字符（0、1、2），从第二位开始为金额，金额不为空，为空时补 0)NVARCHAR (10)AsDoctorNameIN主治医生YV

37、ARCHAR (12)AsPatientIdIN住院号+科室号+号Y住院号 12 位科室 8 位号 20 位AsFlagINAsFlag 1NVARCHAR (1)AiDiagNoIN就医序号NVARCHAR (2)AsExpenseKindIN21-普通住院22-单病种住院23-正常分娩住院29-其他住院90-其他YVARCHAR (2)AsLimitIllCodeIN单病种疾病编码（当 AsExpenseKind=22时不能为空）YVARCHAR (4)DataBufferOUT返回值VARCHAR (100)Remarks:pound 参数是在项目为 药品 时才生效。如果是草药，则需要判

38、断该草药是复方还是单味，如果是单味，则pound 传 2；如果是复方，则pound 传 1；DataBuffer 返回费用；Return ：成功 0 ；失败 0住院费用明细上传（松滋人民医院、省中医院、洪湖人民医院试用）：AsItemCode, pound: pchar;function sz_SaveFreeList(AsanID, AsCoopMedCode: PChar; AiIDNo, AiDiagNo:eger;AsHosCode, ADInputDate: pchar; AfPrice, AfNum, AfFee: Double; AsUnit, AsOfficeName, AsD

39、octor,DataBuffer: Pchar):eger; stdcall;参数说明同上表。4.1.16. 省（市）级转诊 删除已上传费用明细（含本地和）功能描述：在新农合系统中删除住院费用明细。调用说明：HIS 系统在处理费用明细时，删除费用明细（当前所有的费用明细）。function DeleteFeeList(As stdcall;参数定义：anID, AsCoopMedCode: pchar; AiIDNo, AiDiagNo:eger; DataBuffer: pchar):eger;DataBuffer 说明：成功返回空，否则返回错误信息。Return ：成功 0 ；失败 04.

40、1.17. 省（市）级转诊 新农合结算、预结算Syntax：function PreClearing(AsanID, AsCoopMedCode: pchar;AiIDNo, AiDiagNo, APreClearFlag:eger; ADayCount:eger;AOutDate, AJsDate, AOutSus, DataBuffer : Pchar):eger; stdcall;序号参数名称输入 /输出参数说明数据类型最多长度是否为空备注1AsanIDIn行政区划+ $ + 帐套年度Varchar20N2AsCoopMedCodeIn农合证号Varchar12N3AiIDNoIn个人序

41、号N4AiDiagNoIn就医序号N5DataBufferOut返回信息Varchar100Y11AsUnitIN量VARCHAR(10)Y12AsOfficeNameIN科室名称VARCHAR(20)N13AsDoctorIN医生VARCHAR(20)Y14poundIN处方标致：2单 / 1复方VARCHAR(1)N15DataBufferOUT返回值VARCHAR(100)YParameter:结算输出(DataBuffer)：1 医疗费总额|2 可报销费用|3 报销费用 |4 医院减免|5 民政|6 保险金额|7 医院承担|8 起付线|9 保留|10单病重医院承担金额|11 保留|12

42、 年封顶线（省级为最大报销额）|13 年度报销总费用（包含本次）注意：医院上要反映医院减免，医院承担费用Return ：成功 0 ；失败 0Remarks:支用=医疗费总额医院减免-医院承担报销费用4.1.18. 省（市）级转诊住院结算信息和表此函数在正式结算后调用。Syntax:function GetCalcFee(AsanID, AsCoopMedCode: pchar; AiIDNo, AiDiagNo:stdcall;Parameter:eger; DataBuffer: pchar):eger;Return ：成功 0 ；失败 0DataBuffer 返回信息结构：（分段符： $）

43、第一段-基本信息0 医疗证号|1 户主|2 患者|3|4 出生年月|5 与户主关系|6 住址|7 经治医院|8 入院时间|9 出院时间|10 住院天数|11 住院号|12 疾病名称|13 年度入院次数|14 总费用|15 可报销费用|16 报销费用|17 起付线|18 医院|19 住院参数输入/输出参数名是 否可空类型AsanIDIN行政区划 + $ + 帐套年度NVARCHAR(20)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NegerAiDiagNoIN就医序号NegerDataBufferOUT返回值YVARCHAR(2000)参数输入/

44、输出参数名是 否可空类型AsanIDIN行政区划 + $ + 帐套年度NVARCHAR(20)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NegerAiDiagNoIN就医序号NegerAPreClearFlagIN预/结算标致（0-预结算，1-结算）NegerADayCountIN住院天数NegerAOutDateIN出院时间N(YYYY-MM-DD HH:MM:SS)AJsDateIN结算时间N(YYYY-MM-DD HH:MM:SS)AOutSusIN出院状态（1治愈；2好转；3未愈；4；9其他)NVARCHAR(1)DataBufferO

45、UT返回值YVARCHAR(500)科室|20 民政|21 医院承担金额|22 保留|24 保留|25 保留|26 保留第二段-住院医疗费用(#分割)0 费用编码| 1 费用名称| 2 费用金额| 3 纳入补偿费用| 4 报销费用第三段报销公式及分段核算分段线可报销费用报销比例报销费用4.1.19. 省（市）级转诊 数据回写当地合管办 服务器功能描述： 回写调用说明：信息 到 当地合管办 服务器function zzGetDataBack(AanID, aAreaCode, aCoopMedCode: PChar; aIDNo, aDiagNo:eger; aExpressId:PChar;

46、DataBuffer: PChar):eger; stdcall;参数定义：Return：成功 0；失败 0DataBuffer：返回错误信息。4.1.20. 省（市）级转诊已经回写当地的数据功能描述：调用说明：当地合管办服务器的回写数据function zzBack_ClearData(A eger; stdcall;参数定义：anID, aAreaCode, aCoopMedCode, aIDNo, aDiagNo: PChar; DataBuffer: PChar):Return：成功 0；失败 0DataBuffer：返回错误信息。4.1.21. 省（市）级转诊 取消住院结算Synta

47、x:function CanceCalcFee(As eger; stdcall;Parameter:anID, AsCoopMedCode: pchar; AiIDNo, AiDiagNo:eger; DataBuffer: pchar):参数输入/输出参数名是否可空类型AanIDIN行政区划$年度NVarcahr(100)aAreaCodeIN所属区划NVarchar(10)aCoopMedCodeIN农合证号NVarchar(20)aIDNoIN个人序号NVarchar(5)aDiagNoIN就医序号NVarchar(5)DataBufferOut返回值Varchar(500)参数输入/

48、输出参数名是否可空类型AanIDIN行政区划$年度NVarcahr(100)aAreaCodeIN所属区划NVarchar(10)aCoopMedCodeIN农合证号NVarchar(20)aIDNoIN个人序号NegeraDiagNoIN就医序号NegeraExpressIdIN报销公式NVarchar(10)DataBufferOut返回值Varchar(500)Return ：成功 0 ；失败 04.1.22. 省（市）级转诊 取消住院登记（农合转自费）功能描述：取消住院登记 信息（含明细）调用说明：住院登记时调用。function zzDeleteHosInfo(AsanID, aAr

49、eaCode, aCoopMedCode:PChar; aIDNo,aDiagNo:eger; DataBuffer:pchar):eger; stdcall;参数定义：Return：成功 0；失败 0DataBuffer 说明：错误信息 或 空。4.1.23. 住院 上传明细后的处理（仅针对直接写前置机记帐明细表后的处理工作）Syntax:sFeeList(AsProanID, AsCoopMedCode: pchar; AiIDNo, AiDiagNo:eger;DataBuffchar):eger; stdcall;说明：如果存在大量数据，就可以对前置机中直接写表o_CbZyBxDjZb

50、，表说明如下：anID CoopMedCodeCode IDNoDiagNo FeeNo ItemCode itemname PRICE NUM FEEOfficeName RecipeNo YyDateGrade行政区划农合号 1个人序号就医序号【字符 12 位】【字符 10 位】【整数】【整数】费用序号顺序数据 1,2,3.0【整数】【字符 80 位】【Float4 位小数】【小于 10000 的小数，4 位小数】【Float4 位小数】【字符 40 位】【字符 12 位】【日期 yyyy-MM-ddHH:mm:ss】医院项目名称单价数量金额记帐科室处方号 用药时间 0参数输入/输出参数名

51、是否可空类型AsanIDIN行政区划+ $ + 帐套年度NVarchar(20)aAreaCodeIN所属区划NVarchar(12)aCoopMedCodeIN农和证号NVarchar(18)aIDNoIN个人序号NaDiagNoIN就医序号NDataBufferOut返回值Varchar(100)参数输入/输出参数名是 否可空类型AsanIDIN行政区划 + $ + 帐套年度NVARCHAR(20)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NegerAiDiagNoIN就医序号NegerDataBufferOUT返回值YInputDate

52、HosCode Compound GGFeetypecodefeetypename记帐时间医院项目编码 单复方(2 单方, 1医院项目规格 00【日期 yyyy-MM-ddHH:mm:ss】【字符 20 位】复方)【字符 40 位】每次写完数据提交后，需再调用 ProsFeeList 进行数据处理。ProsFeeList(AsanID, AsCoopMedCode: pchar; AiIDNo, AiDiagNo:eger;DataBuffchar):eger; stdcall;注意：如果直接写前置机明细，就不再使用 SaveFreeList 函数4.1.24. 获取基础信息到 前置机 数据库

53、中功能描述：调用说明：基础数据到 前置机 数据库中function GetParmItemToDB(As参数定义：anID, AsKind, DataBuffer: pchar):eger;stdcall;Return：成功 0；失败 0； DataBuffer： 出错返回提示信息。表名称及机构定义如下：行政区划、帐套年度（这个信息不用，可直接使用）；表名：P_hiSet；字段说明（Year 年度，anID 区划号，anName 区划名称）1：疾病代码表；表名：p_Illness ；字段说明 (音码，FiveStrokes 五笔码，If_Modified 修改标识)anID 区划号，IllCo

54、de 疾病，Illname 疾病名称，Spell 拼2：报销公式目录；表名：p_ZybxGs ；字段说明（anID 区划号，Year年度，ExpressID 公式，ExpressName 公式名称）3：报销项目目录；表名：p_bxxm；字段说明（SpName 别名，Spell 拼音码，FiveStrokes 五笔码，UnitanID 区划号，ItemCode 项目，ItemName 项目名称，Gg 规格，CD 产地，JX 剂型，WipeOut 是否可报（1 可报，2 不可报），Acs 使用范围（1 门诊，2 住院，3 慢病），grade 用药等级，Price1 一级单价，Price2二级单价，Price3 三级单价，LimitPrice1 一级限价，LimitPrice2 二级限价，LimitPrice3 三级限价， GradeToPrice 限价级别标识，Remark 备注，FeeTypeCode 类别WjCode 物价编码），FeeTypeName 类别名称，Valid 是否停用（1 使用，2 停用），4：医院对应项目；表名：p_hihositem；