蓝星新型农村合作医疗DLL接口规范

PAGE2第3页共20页武汉蓝星软件技术有限公司机密 第4页 DATE\@"yyyy-M-d"2024-3-14蓝星软件农村合作医疗转诊接口参考手册Ver1.0.0武汉蓝星软件技术有限公司2008年11月

变更说明时间修改人员函数修改说明2009-02-12LLMCWSaveInHosInfo增加AsExpenseKind参数21--普通住院22--单病种住院23—正常分娩住院29—其他住院90—其他2009-0ProcessFeeList整理直接写前置数据库明细后的处理事务2009-05-08更新本结算程序LxHzInterface.ini的[DataBaseInfo]增加DEBUG=YES（本地结算要配置本地连的各区空数据库，否则不能进行本地结算）2009-10-26更新单病种结算入院登记SaveInHosInfo增加参数AsLimitIllCode单病种编码当AsExpenseKind=22时不能为空GetParmItem函数增加参加参数为66单病种信息表新农合病人结算、预结算PreClearing返回值第7值为医院承担费用注意：示例部分未做调动，请参照函数说明的参数

诊疗项目对照表没有对应关系的收费项目信息，按照合管办的费用分类办法修改收费项目信息蓝星新农合客户端提供相应的对应工作程序，对应完成后上报后提交合管办进行对应审核。2.4.新农合转诊服务器一台操作系统:WIN2K/2KSERVER/XP/2003硬件要求：PIIII1.7G/512M/40G数据库要求：WINSQLSERVER2000网络要求：内网通（能访问HIS）并且外网通（能访问新农合），最好是单独能上网的专线（1。5M以上）。网络安全：软件防火墙/硬件防火墙/网闸医院管理信息系统改造实施详细说明住院部分1、获取病人信息根据病人提供的合作医疗证号进行查询，选择病人后返回该病人的个人编号、姓名、性别、出生日期等相关信息。2、入院登记（入院信息修改）提交合作医疗证及个人编号和获取的就诊号进行住院病人的就诊登记。如因退合或者被列入黑名单，则可采用自费方法处理。3、药品、诊疗明细录入调用接口函数“费用明细录入”把划价信息写入新农合前置机中。4、出院结算(0：预结算；1:结算)进行入院登记收费前必须保证已经进行了新合入院就诊登记。写入费用结束后调用“新农合病人结算、预结算”，生成新农合结算信息。5、取消费用结算将已出院的病人取消费用结算，重新值为新合在院病人6、取病人新合结算信息和审批表取已经结算病人的报销结算单和新合报销审批表信息。离线结算1．在LxHzInterface.ini的[DataBaseInfo]增加DEBUG=YES（本地结算要配置本地连的各区空数据库，否则不能进行本地结算）2．打开前置机表P_hiOrgSetIPDataBaseNameUserNamePassWord指向本地结算的各区数据库表新农合接口函数说明动态链接库名称：LXSETUP.INI[Synch]Host=192.168.50.117[前置服务器的IP地址]Port=1899[前置服务器开放的端口号，可自定义]Remaks:注意服务端防火墙对端口号的开放状态，前置机和客户端的端口号必须保持一致LxClient.dllDataBuffer说明：DataBuffer为函数返回参数，Char*类型，如果函数执行成功，返回值多个参数，使用‘|’分割；如果执行失败，那么DataBuffer中含有错误详细信息。日期类型格式：yyyy-mm-ddhh:mm:ss，如果没有时间，则后6位均为0。返回值：成功=0失败<0输出是以“$$、|、##、@@”分割的字符串以“|”分隔，详见每个交易的参数表,分项之间使用管道分割符‘|’分割，最后必须要以管道分割符号‘|’结尾，不以‘|’开始。如果入参为多条记录，记录之间以‘$$’分割，不同数据项之间以‘|’分割函数说明函数列表序号函数名代码1通讯测试函数（与前置机）可不用InitDLL2获取病人信息GetHzPersonInfo3就诊登记(住院、住院修改)SaveInHosInfo4费用明细录入SaveFreeList5费用预结算/结算(住院)PreClearing6取消住院结算CanceCalcFee7读取住院结算信息和审批表GetCalcFee8获取已审批通过的药品和诊疗项目列表GetCheckItem9读取基本信息（疾病信息表和报销公式）GetParmItem10取消入院登记信息（包括费用明细）DeleteHosInfo11上传或取消医院项目对应编码UpdateInterItem12上传明细后的处理ProcessFeeList13门诊登记mz_SaveInfo14门诊登记明细mz_SaveInfoList15删除门诊登记mz_DelInfo16获取结算报销费用信息mz_GetCalcFee17读卡（新农合医疗卡）User_ReadCard18测试串口连接TestComConn19转诊入院登记zzSaveInHosInfo20获取转诊区划信息GetXZQHinfo_zz21获取区划内转诊病人信息GetZzinfo_zz22Remarks:红色部分为必选函数在所有函数中不存在唯一的住院号，唯一值是CoopMedCode+IDNo+DiagNo，即农户新合医疗证号+个人序号+就诊序号动态链接库初始化函数syntax:intInitDLL(Char*DataBuffer)Parameter:参数参数输入/输出参数名是否可空类型DataBufferOUT返回信息Return(s):0-SUCCESS-1-FAILURERemarks：此函数主要是测试前置机是否启动，非编程必用函数。获取病人信息Syntax：intGetHzPersonInfo(char*AsOrganID,char*AsCoopMedCode,Char*DataBuffer);Parameter参数参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)DataBufferOUT返回信息Return(s):0–Succuss-1－FailureDataBuffer说明： 0户编号|1人员序号|2\l"Attr23814"区划代码

|3人员姓名|4\l"Attr526"拼音码

|5\l"Attr527"五笔码

|6性别|7出生日期|8\l"Attr29626"家庭住址

|9\l"Attr29"亲属关系代码

|10\l"Attr30"亲属关系名称

|11身份证号|12\l"Attr33"承办人代码

|13\l"Attr34"承办人姓名

|14\l"Attr9168"户属性[1－一般农户；2－五保户；3－贫困户；4－特困户；5－烈军属；9－其他；24表示既是五保户又是特困户]

|15\l"Attr396"是否户主[1－是；2－否]

|16\l"Attr10166"是否参合[1－是；2－否]

|17\l"Attr10167"人员状态[1－正常；2－迁入；4－迁出；4－死亡]

|18\l"Attr10168"异动日期

|19\l"Attr29632"参合年份

|20保留|21保留|22保留|23保留|24保留|25保留|26保留入院登记[住院]Syntax:IntSaveInHosInfo(char*AsOrganID,char*aAreaCode,char*AsCoopMedCode,char*AsExpressionsID;IntAiIDNo;char*AsIllCode,char*AsIllName,char*AInDate,char*Adke,char*AdLimitDef,char*AsDoctorName,char*AsPatientId,char*AsFlag,char*AiDiagNo,char*AsExpenseKind,AsLimitIllCode,char*DataBuffer)Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)aAreaCodeIN病人所属区划NVARCHAR(12)AsCoopMedCodeIN户编号NVARCHAR(18)AsExpressionsIDIN报销公式IDNVARCHAR(4)AiIDNoIN个人序号NIntegerAsIllCodeIN入院诊断(合管办提供的疾病代码)NVARCHAR(10)AsIllNameIN入院诊断(合管办提供的疾病名称)NVARCHAR(40)AInDateIN入院日期N(YYYY-MM-DDHH:MM:SS)AdkeIN\l"Attr9321"扣额

–报销公式没有调整时：扣额＝‘’只调整起付线:扣额＝调整后起付金额+$只调整报销比率：扣额＝$+调整后报销比率两个都调整：扣额＝调整后起付金额+$+调整后报销比率YVARCHAR(12)AdLimitDefIN\l"Attr9320"限额定义(0－不限；1－限额；2－定额

第一位为上面的三个字符（0、1、2），从第二位开始为金额，金额不为空，为空时补0)NVARCHAR(10)AsDoctorNameIN主治医生YVARCHAR(12)AsPatientIdIN住院号YVARCHAR(12)AsFlagIN是入院还是修改住院信息（0-入院登记，DATABUFFER返回就诊次数；1-住院信息修改，DATABUFFER为输入就诊次数）NVARCHAR(1)AiDiagNoIN就诊次数Y当ASFLAG＝1，不能为空VARCHAR(1)AsExpenseKindIN21--普通住院22--单病种住院23—正常分娩住院29—其他住院90—其他YVARCHAR(2)AsLimitIllCodeIN单病种疾病编码YVARCHAR(4)当AsExpenseKind=22时不能为空DataBufferOUT返回值VARCHAR(100)Returns:0–SUCCESS-1–FAILUREReMarks:当ASFLAG=0增加状态时，DataBuffer返回就诊次数，当ASFLAG=1时返回错误信息。费用明细录入[住院]Syntax:IntSaveFreeList(char*AsOrganID,char*AsCoopMedCode,IntAiIDNo,IntAiDiagNo,char*AsItemCode,char*AsHosCode,char*ADInputDate,doubleAfPrice,doubleAfNum,doubleAfFee,char*AsOfficeName,char*AsDoctor,char*AsCompound,char*DataBuffer)Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)AsCoopMedCodeIN\l"Attr24703"合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NIntegerAiDiagNoIN\l"Attr26797"就医序号NIntegerAsItemCodeIN新合项目编码YVARCHAR(20)AsHosCodeIN医院项目编码NVARCHAR(20)ADInputDateIN录入时间N(YYYY-MM-DDHH:MM:SS)AfPriceIN单价NDoubleAfNumIN数量NDoubleAfFeeIN金额NDoubleAsUnitIN单位量YVARCHAR(10)AsOfficeNameIN科室名称NVARCHAR(20)AsDoctorIN医生YVARCHAR(20)AsCompoundIN单/复方处方标致NVARCHAR(1)DataBufferOUTYRemarks:Compound参数是在FeeType＝2时才生效。如果是草药，则需要判断该草药是复方还是单味，如果是单味，则Compound传1；如果是复方，则Compound传0；

Returns:0–SUCCESS-1–FAILURE新农合病人结算、预结算[住院]Syntax：IntPreClearing(char*AsOrganID,char*AsCoopMedCode,intAiIDNo,intAiDiagNo,intAPreClearFlag,intADayCount,char*AOutDate,char*AJsDate,char*AOutStatus,char*DataBuffer);参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NIntegerAiDiagNoIN就医序号NIntegerAPreClearFlagIN预/结算标致（0-预结算，1-结算）NIntegerADayCountIN住院天数NIntegerAOutDateIN出院时间N(YYYY-MM-DDHH:MM:SS)AJsDateIN结算时间N(YYYY-MM-DDHH:MM:SS)AOutStatusIN出院状态（1－治愈；2－好转；3－未愈；4－死亡；9－其他)NVARCHAR(1)DataBufferOUTYParameter:结算输出(DataBuffer)：0医疗费总额|1可报销费用

|2报销费用

|3医院减免|4民政补助|5保险金额|6医院承担金额|7保留|8保留|年度报销总费用（包涵本次）注意：医院发票上要反映医院减免，医院承担费用Remarks:病人支付费用=医疗费总额－医院减免-医院承担－报销费用取消住院结算[住院]Syntax:intCanceCalcFee(char*AsOrganID,char*AsCoopMedCode,intAiIDNo,intAiDiagNo,char*DataBuffer)Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NIntegerAiDiagNoIN就医序号NIntegerDataBufferOUTYReturn(s):0–SUCCESS -1—FAILURE读取住院结算信息和审批表[住院]Syntax:intGetCalcFee(char*AsOrganID,char*AsCoopMedCode,intAiIDNo,intAiDiagNo,char*DataBuffer);Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN行政区划NVARCHAR(6)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NIntegerAiDiagNoIN就医序号NIntegerDataBufferOUTYReturn(s):0–SUCCESS -1—FAILURERemarks:第一段--基本信息0医疗证号|1户主姓名|2患者姓名|3性别|4出生年月|5与户主关系|6住址|7经治医院|8入院时间|9出院时间|10住院天数|11住院号|12疾病名称|13年度入院次数|14总费用|15可报销费用|16报销费用|17保留|18保留|19保留|20保留|21保留|22保留第二段--住院医疗费用费用编码|费用名称|费用金额|纳入补偿费用|报销费用第三段—报销公式及分段线核算分段线@@可报销费用@@报销比例@@报销费用获取已审批通过的药品和诊疗项目列表Syntax:intGetCheckItem(char*AsOrganID);Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)Return(s):0–SUCCESS -1—FAILURERemarks:当医院有新项目增加后，在新合软件中进行对应经审批后，请及时运行此函数，否则在‘新合费用明细录入’中返回错误值。注意此函数不要频繁使用。读取转诊基本信息Syntax:intGetParmItem(char*AsOrganID,char*Askind,char*DataBuffer);Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)AskindIN类型1：疾病代码表2：报销公式目录3项目目录4已审核项目5转诊区域6单病种信息表NVARCHAR(1)DataBufferOUT错误返回信息Return(s):0–SUCCESS-1—FAILURERemarks:该函数运行后在当前目录的\DOWNLOAD目录中生成以ILL+年月日时分秒,BXGS+年月日时分秒，ITEM+年月日时分秒,BXITEM+年月日时分秒和AREA+年月日时分秒为开头的TXT文本文本中字符之间‘用软换行符#10’分隔文本文件字段顺序说明：1：疾病代码表：字段顺序：（IllCode疾病编号,IllName疾病名称,Spell拼音码,FiveStrokes五笔码）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，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区划名称,year年度）6单病种信息表：字段顺序（病种编号，病种名称，标准金额，补偿金额）取消入院登记（包括费用明细）Syntax:intDeleteHosInfo(char*AsOrganID,char*AsCoopMedCode,intAiIDNo,intAiDiagNo,char*DataBuffer);Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)AsCoopMedCodeIN合作医疗证号NVARCHAR(20)AiIDNoIN户个人序号NIntegerAiDiagNoIN就医序号NIntegerDataBufferOUT错误信息YReturn(s):0–SUCCESS -1—FAILURERemarks:取消已入院登记的病人信息，如存在费用明细，也会自动清除明细上传或取消医院项目对应编码Syntax:intUpdateInterItem(char*AsOrganID,char*AsFlag,char*AsHosCode,char*AsHosName,char*AsHosSpec,char*AsHosUnit,char*AsHosCd,char*AsHosType,char*AsHosKind,char*AsHosPym,char*AsHosWbx,char*AsItemCode,char*AsDetail,char*DataBuffer);Parameter:参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)AsFlagIN0-增加或修改,1-撤消审核NCHAR(1)AsHosCodeIN医院项目编码(唯一)NVARCHAR(20)AsHosNameIN医院项目名称VARCHAR(80)AsHosSpecIN规格VARCHAR(40)AsHosUnitIN包装单位VARCHAR(10)AsHosCdIN产地VARCHAR(20)AsHosTypeIN剂型VARCHAR(20)AsHosKindIN类型(1-诊疗项目2手术项目3西药4中草药)CHAR(1)AsHosPymIN拼音码VARCHAR(10)AsHosWbxIN五笔码VARCHAR(10)AsItemCodeIN对应的新合编码VARCHAR(20)AsDetailIN撤消说明VARCHAR(100)DataBufferOUT错误信息YReturn(s):0–SUCCESS -1—FAILURERemarks:ASFLAG=0时上传或修改已上传的医院项目对应信息.ASFLAG=1申请撤消合管审核的项目对应信息.上传明细后的处理（仅针对直接写前置机记帐明细表后的处理工作）[住院]Syntax:ProcessFeeList(AsOrganID,AsCoopMedCode:pchar;AiIDNo,AiDiagNo:integer;DataBuffer:pchar):Integer;stdcall;说明：如果存在大量数据，就可以对前置机中直接写表o_CbZyBxDjZbOrganID转诊区划CoopMedCode卡号OrgCode'1'IDNo人员序号DiagNo就诊次数FeeNo费用序号[顺序数据1,2,3...]ItemCode'1'itemname医院项目名称PRICE单价NUM数量FEE金额OfficeName记帐科室RecipeNo处方号YyDate记帐时间Grade0InputDate记帐时间HosCode医院项目编码Compound单复方(0,1)GG医院规格feetypecode'0'feetypename'0'每次写完数据提交后再调用ProcessFeeListProcessFeeList(AsOrganID,AsCoopMedCode:pchar;AiIDNo,AiDiagNo:integer;DataBuffer:pchar):Integer;stdcall;注意：如果直接写前置机明细，就不再使用SaveFreeList函数门诊登记功能描述：在新农合系统中记载参合患者的门诊费用信息。调用说明：HIS系统在办理门诊项目就医时调用。functionmz_SaveInfo(aXZQH,aOrgCode,aCoopMedCode:pchar;aIDNO:Integer;aInDate,aIllCode,aIllName,aExpenseKind,aDoctorName:pchar;DataBuffer:pchar):Integer;stdcall;参数定义：序号参数名称输入/输出参数说明数据类型最多长度是否为空备注1aXZQHIn行政区划Varchar6N2aOrgCodeIn服务单位Varchar12N3aCoopMedCodeIn新农合证号Varchar10N4aIDNOIn个人序号IntN5aInDateIn就诊时间varcharNyyyy-MM-ddhh:mm:ss6aIllCodeIn疾病编号Varchar10Y7aIllNameIn疾病名称Varchar40Y8aExpenseKindIn补偿类别Varchar2N11普通门诊13预防接种19门诊特殊疾病90其他9aDoctorNameIn医生姓名Varchar20Y10DataBufferOut返回信息Varchar1000YDataBuffer说明：返回就诊序号。Return：成功0；失败<0门诊登记明细功能描述：在新农合系统中记载参合患者的门诊费用信息明细。调用说明：HIS系统在办理门诊项目就医时调用。functionmz_SaveInfoList(aXZQH,aOrgCode,aCoopMedCode:pchar;aIDNO,aDiagNo:Integer;aItemCode,aUnit:pchar;aPrice,aNum:double;aOfficeName,aRecipeNo,aYyDate,aGrade:pchar;DataBuffer:pchar):Integer;stdcall;参数定义：序号参数名称输入/输出参数说明数据类型最多长度是否为空备注1aXZQHIn行政区划Varchar6N2aOrgCodeIn服务单位Varchar12N3aCoopMedCodeIn新农合证号Varchar10N4aIDNOIn个人序号IntN5aDiagNoIn就诊序号IntN6aHosCodeIn项目编号Varchar8N医院项目编号7aUnitIn单位Varchar10Y8aPriceIn单价Numeric(10,4)N9aNumIn数量Numeric(6,2)N10aOfficeNameIn用药科室Varchar40Y11aRecipeNoIn处方号Varchar12Y12aYyDateIn用药时间DateY13aGradeIn价格级别Varchar1N0无限价1一级2二级3三级14DataBufferOut返回信息Varchar1000YDataBuffer说明：费用序号。Return：成功0；失败<0删除门诊登记功能描述：在新农合系统中删除参合患者的门诊费用信息及明细。调用说明：HIS系统在办理门诊项目就医时调用。functionmz_DelInfo(aXZQH,aOrgCode,aCoopMedCode:Pchar;aIDNO,aDiagNo:Integer;DataBuffer:pchar):Integer;stdcall;参数定义：序号参数名称输入/输出参数说明数据类型最多长度是否为空备注1aXZQHIn行政区划Varchar6N2aOrgCodeIn医疗服务单位Varchar12N3aCoopMedCodeIn新农合证号Varchar10N4aIDNOIn个人序号IntN5aDiagNoIn就诊序号IntN6DataBufferOut返回信息Varchar1000YReturn：成功0；失败<0获取结算报销费用信息功能描述：计算患者门诊报销费用。调用说明：HIS在门诊结算时调用。functionmz_GetCalcFee(aXZQH,aOrgCode,aCoopMedCode:pchar;aIDNO,aDiagNo:Integer;DataBuffer:pchar):Integer;stdcall;参数定义：序号参数名称输入/输出参数说明数据类型最多长度是否为空备注1aXZQHIn行政区划Varchar6N2aOrgCodeIn医疗服务单位Varchar12N3aCoopMedCodeIn新农合证号Varchar10N4aIDNOIn个人序号IntN5aDiagNoIn就诊序号IntN6DataBufferOut返回信息Varchar1000YDataBuffer说明：0总费用|1可报销费用|2报销费用|预留|预留|预留|预留|结算明细输出到文件：..\download\MZcalc[日期时间].TxtReturn：成功0；失败<0用读卡器读卡功能描述：读取刷卡信息并解密获得卡号（使用本公司提供的读卡器和卡）调用说明：HIS在录入病人信息，病人刷农合卡时调用。functionUser_ReadCard(COMi:integer;rData:PChar):integer;stdcall;参数定义：参数输入/输出参数名是否可空类型COMiIN串口号NINTrDataOut卡号YVARCHAR(300)ErrorOut错误信息YVARCHAR(100)COMi＝（1，2，3，4，，，，）rData：返回卡信息，需要预设一定长度。出错时返回错误提示信息。Return：成功0；失败<0根据读取的卡信息获得卡号功能描述：解密卡信息获得卡号（适用本公司提供的卡）调用说明：HIS在录入病人信息，病人刷农合卡时调用。functionGetCardIDByCode(Code:PChar;CardID:PChar):integer;参数定义：参数输入/输出参数名是否可空类型CodeIN卡信息NVARCHAR(300)CardIDOut卡号YVARCHAR(300)rData：返回卡号，需要预设一定长度。出错时返回错误提示信息。Return：成功0；失败<0根据卡号获得农合证号功能描述：根据卡号获得农合证号调用说明：HIS在录入病人信息，病人刷农合卡时调用。functionGetCoopMedCodeByCardID(aOrganID,aCardID:PChar;varDataBuffer:PChar):Integer;参数定义：参数输入/输出参数名是否可空类型aOrganIDIN行政区划NVARCHAR(6)aCardIDIN卡号NVARCHAR(300)DataBufferOUTVARCHAR(300)DataBuffer：返回农合证号，失败返回错误信息。Return：成功0；失败<0测试串口连接功能描述：安装读卡器时，测试连接串口（使用本公司提供的读卡器）调用说明：测试读卡器是否连接正确时调用functionTestComConn(COMi:integer):integer;stdcall;参数定义：参数输入/输出参数名是否可空类型COMiIN串口号NINTCOMi＝（1，2，3，4，，，，）Return：成功0；失败<0转诊住院登记功能描述：记录新农合病人转诊住院信息调用说明：病人转诊住院登记时调用functionzzSaveInHosInfo(AsOrganID,aOrgCode,aAreaCode,AsCoopMedCode,AsExpressionsID:pchar;AiIDNo,aTurnID:Integer;AsIllCode,AsIllName,AInDate,Adke,AdLimitDef,AsDoctor,AsPatientId,AsExpenseKind,AsLimitIllCode,DataBuffer:Pchar):Integer;stdcall;参数定义：参数输入/输出参数名是否可空类型AsOrganIDIN转诊区划NVARCHAR(6)aOrgCodeIN转诊医疗机构编号NVARCHAR(12)aAreaCodeIN病人所属区划NVARCHAR(12)AsCoopMedCodeIN新合证号NVARCHAR(18)AsExpressionsIDIN报销公式IDNVARCHAR(4)AiIDNoIN个人序号NIntegeraTurnIDIN转诊序号NIntegerAsIllCodeIN入院诊断(合管办提供的疾病代码)NVARCHAR(10)AsIllNameIN入院诊断(合管办提供的疾病名称)NVARCHAR(40)AInDateIN入院日期N(YYYY-MM-DDHH:MM:SS)AdkeIN\l"Attr9321"扣额

-起付线调整为+'$'+报销比率调整为的某个比率（在某个比率上×某个比率）YVARCHAR(12)AdLimitDefIN\l"Attr9320"限额定义(0－不限；1－限额；2－定额

第一位为上面的三个字符（0、1、2），第二位为金额)YVARCHAR(10)AsDoctorIN主治医生YVARCHAR(12)AsPatientIdIN住院号YVARCHAR(12)AsExpenseKindIN21--普通住院22--单病种住院23—正常分娩住院29—其他住院90—其他YVARCHAR(2)AsLimitIllCodeIN单病种疾病编码YVARCHAR(4)当AsExpenseKind=22时不能为空DataBufferOut返回值VARCHAR(100)DataBuffer：就医序号Return:成功0；失败<0获取区划信息功能描述：获取参与转诊的区划信息调用说明：functionGetXZQHinfo_zz(aAreaCode,DataBuffer:pchar):Integer;stdcall;参数定义：参数输入/输出参数名是否可空类型aAreaCodeIN转诊区划NVarchar(6)DataBufferOut返回值Return：成功0；失败<0DataBuffer说明：0上级区划号|1区划号|2区划名称|3预留|4预留|5预留|6预留|7预留|$$获取转诊区划内病人信息功能描述：获取转诊病人信息调用说明：functionGetZzinfo_zz(aGrade,aAreaCode,DataBuffer:pchar):Integer;stdcall;参数定义：参数输入/输出参数名是否可空类型aGradeIN转诊区划等级‘1’‘2’‘3’NVarcahr(1)aAreaCodeIN转诊区划NVarchar(6)DataBufferOut返回值Return：成功0；失败<0DataBuffer说明：0新合号|1病人姓名|2个人序号|3病人所属区划|4转诊序号|5疾病名称|6转前医院|7转诊原因|8审批意见|9审批单位|10审批日期|11预留|12预留|13预留|14预留|15预留|$$DELPHI引用及示例functionInitDLL(StrError:pchar):integer;stdcall;external'LxClient.dll';functionGetHzPersonInfo(AsOrganID,AsCoopMedCode,DataBuffer:pchar):integer;stdcall;external'LxClient.dll';functionGetParmItem(AsOrganID,AsKind,DataBuffer:pchar):integer;stdcall;external'LxClient.dll';//functionSaveInHosInfo(AsOrganID,AsCoopMedCode,AsExpressionsID,AsPatientName:pchar;AiIDNo:Integer;AsIllCode,AsIllName,AInDate,Adke,AdLimitDef,AsDoctorName,AsPatientNo,Asflag:pchar;AiDiagNo,AsExpenseKind,DataBuffer:Pchar):Integer;stdcall;external'LxClient.dll';//functionGetCheckItem(AsOrganID:pchar):Integer;stdcall;external'LxClient.dll';//functionSaveFreeList(AsOrganID,AsCoopMedCode:PChar;AiIDNo,AiDiagNo:Integer;AsItemCode,AsHosCode,ADInputDate:pchar;AfPrice,AfNum,AfFee:Double;AsUnit，AsOfficeName,AsDoctor,AsCompound:pchar;DataBuffer:Pchar):Integer;stdcall;external'LxClient.dll';functionPreClearing(AsOrganID,AsCoopMedCode:pchar;AiIDNo,AiDiagNo,APreClearFlag:Integer;ADayCount:Integer;AOutDate,AJsDate,AOutStatus,DataBuffer:Pchar):Integer;stdcall;external'LxClient.dll';//functionCanceCalcFee(AsOrganID,AsCoopMedCode:pchar;AiIDNo,AiDiagNo:integer;DataBuffer:pchar):Integer;stdcall;external'LxClient.dll';functionGetCalcFee(AsOrganID,AsCoopMedCode:pchar;AiIDNo,AiDiagNo:integer;DataBuffer:pchar):Integer;stdcall;external'LxClient.dll';代码:varStrAreaid,strCardID,strDataBuffer:pchar;li_return:integer;beginStrAreaid:='420105';strCardID:='0101010001';GetMem(strDataBuffer,10240);li_return:=GetHzPersonInfo(StrAreaid,strCardID,strDataBuffer);ShowMessage('ss='+IntToStr(li_retur