藍星新型農(nóng)村合作醫(yī)療DLL接口規(guī)范

1、農(nóng)村合作醫(yī)療轉(zhuǎn)診接口實施方案荊州普愛康復(fù)醫(yī)院2014年 3 月變更說明時間修改人員函數(shù)修改說明2009-02-12LLMCWSavelnHosInfo增加 AsExpenseKind 參數(shù)21- -普通住院22- -單病種住院23- 正常分娩住院29其他住院90其他2009-02-25ProcessFeeList整理直接寫前置數(shù)據(jù)庫明細后的處理事 務(wù)2009-05-08更新本結(jié)算程序LxHz In terface.i ni的DataBaseI nfo增力口 DEBUG=YES（本地結(jié)算要配置本地連的各區(qū)空數(shù)據(jù) 庫，否則不能進行本地結(jié)算）2009-10-26更新單病種結(jié)算入院登記 SavelnH

2、osInfo 增加參數(shù) AsLimitlllCode單病種編碼當AsExpenseKind=22時不能為空GetParmItem函數(shù)增加參加參數(shù)為 66單病種信息表新農(nóng)合病人結(jié)算、預(yù)結(jié)算PreClearing返回值第7值為醫(yī)院承擔費用注意：示例部分未做調(diào)動，請參照函數(shù)說明的參數(shù)目錄1. 目的42. 方案介紹42.1. 方案圖解422醫(yī)院系統(tǒng)需要做的改造工作 423醫(yī)院開發(fā)商需要提供的小應(yīng)用 43. 醫(yī)院管理信息系統(tǒng)改造實施詳細說明 5住院部分54. 新農(nóng)合接口函數(shù)說明 64.1. 函數(shù)說明64.1.1. 動態(tài)鏈接庫初始化函數(shù) 74.1.2. 獲取病人信息 74.1.3. 入院登記84.1.4.

3、 費用明細錄入94.1.5. 新農(nóng)合病人結(jié)算、預(yù)結(jié)算 104.1.6. 取消住院結(jié)算104.1.7. 讀取住院結(jié)算信息和審批表 114.1.8. 獲取已審批通過的藥品和診療項目列表 114.1.9. 讀取疾病信息表和報銷公式 124.2. 函數(shù)示例 錯誤！未定義書簽。4.2.1. DELPHI引用及示例194.2.2. POWERBUILDER 弓I用及示例201.目的為了更好的加快城市新型農(nóng)村合作醫(yī)療建設(shè)，對于新農(nóng)合報銷算法的準確性、可控性、可維護性和安全性等多方面的考慮，在對醫(yī)院原有系統(tǒng)的改造的過程中，我們準備采用開發(fā)新農(nóng)合報銷算法的動態(tài)鏈接庫的辦法來解決。2. 方案介紹2.1.方案圖解報

4、銷計算結(jié)果寫 入HIS系統(tǒng)中22醫(yī)院系統(tǒng)需要做的改造工作首先醫(yī)院需要根據(jù)新農(nóng)合政策的需要，按照我們所提供的新農(nóng)合的接口改造醫(yī)院的HIS系統(tǒng)，使其HIS系統(tǒng)能夠適應(yīng)新農(nóng)合報銷的需要。醫(yī)院需要根據(jù)合管辦提供的三個基本目錄，包括病種信息、藥品信息、診療項目信息建立與醫(yī)院內(nèi)碼對應(yīng)的對照信息。對于那些無法找到對應(yīng)關(guān)系的收費項目信息，醫(yī)院按照新農(nóng)合中心費用分類編碼，維護收費項目信息。此動態(tài)鏈接庫的方式只適合于Windows98以上平臺的HIS系統(tǒng)。23醫(yī)院開發(fā)商需要提供的小應(yīng)用維護一個對照表，每個都是一對多的關(guān)系也就是在原表基礎(chǔ)上加新農(nóng)合對應(yīng)編碼。病種信息對照表 藥品信息對照表診療項目對照表沒有對應(yīng)關(guān)系的

5、收費項目信息，按照合管辦的費用分類辦法修改收費項目信息藍星新農(nóng)合客戶端提供相應(yīng)的對應(yīng)工作程序，對應(yīng)完成后上報后提交合管辦進行對應(yīng)審核。24新農(nóng)合轉(zhuǎn)診服務(wù)器一臺操作系統(tǒng)：WIN2K/2K SERVER/XP/2003硬件要求：PIIII 1.7G/512M/40G數(shù)據(jù)庫要求：WIN SQL SERVER 2000網(wǎng)絡(luò)要求：內(nèi)網(wǎng)通（能訪問 HIS）并且外網(wǎng)通（能訪問新農(nóng)合），最好是單獨能上網(wǎng)的專線（1。5M以上）。網(wǎng)絡(luò)安全：軟件防火墻/硬件防火墻/網(wǎng)閘3. 醫(yī)院管理信息系統(tǒng)改造實施詳細說明3.1.住院部分1、獲取病人信息根據(jù)病人提供的合作醫(yī)療證號進行查詢，選擇病人后返回該病人的個人編號、姓名、性別

6、、出生日期等相關(guān)信息。2、入院登記（入院信息修改）提交合作醫(yī)療證及個人編號和獲取的就診號進行住院病人的就診登記。如因退合或者被列入黑名單，則可采用自 費方法處理。3、藥品、診療明細錄入調(diào)用接口函數(shù)“費用明細錄入”把劃價信息寫入新農(nóng)合前置機中。4、出院結(jié)算（0 :預(yù)結(jié)算；1:結(jié)算）進行入院登記收費前必須保證已經(jīng)進行了新合入院就診登記。寫入費用結(jié)束后調(diào)用“新農(nóng)合病人結(jié)算、預(yù)結(jié)算”生成新農(nóng)合結(jié)算信息。5、取消費用結(jié)算將已出院的病人取消費用結(jié)算，重新值為新合在院病人6、取病人新合結(jié)算信息和審批表取已經(jīng)結(jié)算病人的報銷結(jié)算單和新合報銷審批表信息。3.2.離線結(jié)算1.在 LxHzInterface.ini的

7、DataBaselnfo增力口 DEBUG=YES（本地結(jié)算要配置本地連的各區(qū)空數(shù)據(jù)庫，否則不能進行本地結(jié)算）2 .打開前置機表 P_hiOrgSet IPDataBaseNameUserNamePassWord指向本地結(jié)算的各區(qū)數(shù)據(jù)庫表4. 新農(nóng)合接口函數(shù)說明動態(tài)鏈接庫名稱：LXSETUPNISy nch前置服務(wù)器的IP地址前置服務(wù)器開放的端口號，可自定義Host=192.168.50.117Port=1899Remaks:注意服務(wù)端防火墻對端口號的開放狀態(tài)，前置機和客戶端的端口號必須保持一致LxClient.dllDataBuffer 說明：|'分割；如果執(zhí)行失敗，那DataBuf

8、fer為函數(shù)返回參數(shù)，Char*類型，如果函數(shù)執(zhí)行成功，返回值多個參數(shù)，使用 么DataBuffer中含有錯誤詳細信息。日期類型格式：yyyy-mm-dd hh:mm:ss，如果沒有時間，則后6位均為0。返回值：成功=0 失敗0輸出是以“ $、|、#、”分割的字符串以“ 分隔，詳見每個交易的參數(shù)表 ，分項之間使用管道分割符 分割，最后必須要以管道分割符號結(jié)尾，不以'開始。如果入?yún)槎鄺l記錄，記錄之間以$'分割，不同數(shù)據(jù)項之間以|'分割4.1.函數(shù)說明函數(shù)列表序號函數(shù)名代碼1通訊測試函數(shù)（與前置機）可不用Ini tDLL2獲取病人信息GetHzPerso nlnfo3就診

9、登記（住院、住院修改）Save InHosInfo4費用明細錄入SaveFreeList5費用預(yù)結(jié)算/結(jié)算（住院）PreCleari ng6取消住院結(jié)算Can ceCalcFee7讀取住院結(jié)算信息和審批表GetCalcFee8獲取已審批通過的藥品和診療項目列表GetCheckItem9讀取基本信息（疾病信息表和報銷公式）GetParmItem10取消入院登記信息（包括費用明細）DeleteHosI nfo11上傳或取消醫(yī)院項目對應(yīng)編碼Update In terItem12上傳明細后的處理ProcessFeeList13門診登記mz Save Info14門診登記明細mz Save In foL

10、ist15刪除門診登記mz DelInfo16獲取結(jié)算報銷費用信息mz GetCalcFee17讀卡（新農(nóng)合醫(yī)療卡）User ReadCard18測試串口連接TestComC onn19轉(zhuǎn)診入院登記zzSaveI nH os Info20獲取轉(zhuǎn)診區(qū)劃信息GetXZQHi nfo zz21獲取區(qū)劃內(nèi)轉(zhuǎn)診病人信息GetZz in fo_zz22Remarks:紅色部分為必選函數(shù)在所有函數(shù)中不存在唯一的住院號，唯一值是CoopMedCode+ IDNo+ DiagNo，即農(nóng)戶新合醫(yī)療證號 +個人序就診序號4.1.1.動態(tài)鏈接庫初始化函數(shù)syntax:int initDLL( Char* DataBu

11、ffer )Parameter:參數(shù)參數(shù)輸入/ 輸出參數(shù)名是否 可空類型DataBufferOUT返回信息Return(s):0 -SUCCESS-1 - FAILURERemarks :此函數(shù)主要是測試前置機是否啟動，非編程必用函數(shù)。4.1.2.獲取病人信息Syntax:int GetHzPersonInfo (char *AsOrganlD,char *AsCoopMedCode, Char* DataBuffer );Parameter參數(shù)參數(shù)輸入/ 輸出參數(shù)名是否 可空類型AsOrga nIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)AsCoopMedCodeIN合作醫(yī)療證號NVARCHAR(

12、20)DataBufferOUT返回信息Return(s):0- Succuss-1 FailureDataBuffer 說明:0戶編號|1人員序號|2區(qū)劃代碼|3人員姓名| 4拼音碼| 5五筆碼|6性別|7出生日期|8家庭住址| 9親屬關(guān)系代碼| 10親屬關(guān)系名稱|11身份證號|12承辦人代碼| 13承辦人姓名|14戶屬性1 一般農(nóng)戶；2五保戶；3貧困戶；4 特困戶；5 烈軍屬；9 其他；24表示既是五保戶又是特困戶 |15是否戶主1 是；2否| 16是否參合1 是；2 否| 17人員狀態(tài)1 正常；2 遷入；4遷出；4 死亡| 18異動日期| 19參合年份| 20保留|21保留|22保留|2

13、3保 留|24保留|25保留|26保留4.1.3.入院登記住院Syntax:Int SavelnHosInfo (char * AsOrganID, char *aAreaCode, char * AsCoopMedCode, char * AsExpressionslD;lntAilDNo; char * AslllCode, char * AslllName, char * AlnDate, char * Adke, char * AdLimitDef, char * AsDoctorName ,char* AsPatientld, char * AsFlag, char * AiDiag

14、No , char * AsExpenseKind , AsLimitlllCode ,char * DataBuffer)Parameter:參數(shù)輸入/ 輸出參數(shù)名是否 可空類型AsOrga nIDlN轉(zhuǎn)診區(qū)劃NVARCHAR(6)aAreaCodein病人所屬區(qū)劃NVARCHAR(12)AsCoopMedCodein戶編號NVARCHAR(18)AsExpressi on slDIN報銷公式IDNVARCHAR(4)AilDNoIN個人序號:NIn tegerAslllCodeIN入院診斷（合管辦提供的疾病代碼）NVARCHAR(10)AslllNameINr入院診斷（合管辦提供的疾病名稱

15、）:NVARCHAR(40)Al nDateIN入院日期N(YYYY-MM-DD HH:MM:SS)AdkeIN扣額-報銷公式?jīng)]有調(diào)整時：扣額二 只調(diào)整起付線：扣額二調(diào)整后起付金額+ $只調(diào)整報銷比率：扣額二$ +調(diào)整后報銷比率兩個都調(diào)整：扣額二調(diào)整后起付金額+$ +調(diào)整后報銷比率YVARCHAR(12)AdLimitDefIN限額定義（0-不限；1-限額；2 定額NVARCHAR (10)第一位為上面的二個字符（0、1、2）,從第二位開始為金額，金額不為空， 為空時補0）AsDoctorNameIN主治醫(yī)生YVARCHAR (12)AsPatie ntldIN住院號:丫VARCHAR (12

16、)AsFlagIN是入院還是修改住院信息 （0-入院登 記，DATABUFFER返回就診次數(shù)；1-住院信息修改， DATABUFFER 為 輸入就診次數(shù)）NVARCHAR (1)AiDiagNoIN就診次數(shù)Y當 ASFL AG =1,不 能為空VARCHAR (1)AsExpe nseK indIN21- -普通住院22- -單病種住院23- 正常分娩住院29其他住院90其他YVARCHAR (2)AsLimitIllCodeIN單病種疾病編碼YVARCHAR(4)當AsExpe nseKi nd=22 時不能為空DataBufferOUT返回值VARCHAR (100)Returns:0-S

17、UCCESS-1 -FAILUREReMarks:當ASFLAG=O增加狀態(tài)時，DataBuffer返回就診次數(shù)，當 ASFLAG=1時返回錯誤信息。4.1.4.費用明細錄入住院Syntax:Int SaveFreeList (char * AsOrga nID, char * AsCoopMedCode, I nt AilDNo,l nt AiDiagNo, char * AsItemCode, char *AsHosCode, char * ADI nputDate,double AfPrice,double AfNum,double AfFee, char * AsOfficeName,

18、 char * AsDoctor, char * AsCompou nd, char *DataBuffer)Parameter:參數(shù)輸入/ 輸出參數(shù)名是否 可空類型AsOrga nIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)AsCoopMedCodeIN合作醫(yī)療證號NVARCHAR(20)AiIDNoIN戶個人序號NIn tegerAiDiagNoIN就醫(yī)序號NIn tegerAsItemCodeIN新合項目編碼YVARCHAR(20)AsHosCodeIN醫(yī)院項目編碼NVARCHAR(20)ADI nputDateIN錄入時間N(YYYY-MM-DD HH:MM:SS)AfPriceIN:單價N

19、DoubleAfNumIN數(shù)量NDoubleAfFeeIN:金額NDoubleAsUn itIN單位量YVARCHAR(10)AsOfficeNameIN科室名稱NVARCHAR(20)AsDoctorIN醫(yī)牛YVARCHAR(20)AsCompo undIN:單/復(fù)方處方標致NVARCHAR(1)DataBufferOUTYRemarks:Compound參數(shù)是在 FeeType 2時才生效。如果是草藥，則需要判斷該草藥是復(fù)方還是單味，如果是單味，則 Compound傳1;如果是復(fù)方，則 Compound傳0;Returns:0 -SUCCESS-1 -FAILURE4.1.5.新農(nóng)合病人結(jié)

20、算、預(yù)結(jié)算住院Syntax：Int PreCleari ng (char *AsOrga nID, char * AsCoopMedCode,i nt AilDNo,i nt AiDiagNo,i nt APreClearFlag,i nt ADayCou nt,char * AOutDate, char * AJsDate, char * AOutStatus, char * DataBuffer);Parameter:參數(shù)輸入/輸出參數(shù)名是否 可空類型AsOrga nIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)AsCoopMedCodeIN合作醫(yī)療證號NVARCHAR(20)AilDNoIN戶個

21、人序號NIn tegerAiDiagNoIN就醫(yī)序號NIn tegerAPreClearFlagIN預(yù)/結(jié)算標致（0-預(yù)結(jié)算，1- 結(jié)算）NIn tegerADayCou ntIN住院天數(shù)NIn tegerAOutDateIN出院時間N(YYYY-MM-DD HH:MM:SS)AJsDateIN結(jié)算時間N(YYYY-MM-DD HH:MM:SS)AOutStatusIN出院狀態(tài)（1 治愈；2 好轉(zhuǎn)；3 未愈；4 死亡；9其他）NVARCHAR(1)DataBufferOUTY(DataBuffer) 0醫(yī)療費總額|1可報銷費用|2報銷費用|3醫(yī)院減免|4民政補助|5保險金額|6醫(yī)院承擔金額|7

22、保留|8保留|年度報銷總費用（包涵本次）注意：醫(yī)院發(fā)票上要反映醫(yī)院減免，醫(yī)院承擔費用Remarks:病人支付費用=醫(yī)療費總額一醫(yī)院減免-醫(yī)院承擔一報銷費用4.1.6.取消住院結(jié)算住院Syntax:int CanceCalcFee(char * AsOrganlD, char * AsCoopMedCode, int AilDNo, int AiDiagNo, char * DataBuffer) Parameter:參數(shù)輸入/輸出參數(shù)名是否 可空類型AsOrga nIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)AsCoopMedCodeP IN合作醫(yī)療證號NVARCHAR(20)AiIDNoIN戶個人

23、序號NIn tegerAiDiagNoIN就醫(yī)序號NIn tegerDataBufferOUTYReturn(s):0 -SUCCESS-1 FAILURE4.1.7.讀取住院結(jié)算信息和審批表住院Syntax: int GetCalcFee( char * AsOrganlD, char * AsCoopMedCode, int AilDNo, int AiDiagNo, char * DataBuffer);Parameter:參數(shù)輸入/輸出參數(shù)名是否 可空類型AsOrga nIDIN行政區(qū)劃NVARCHAR(6)AsCoopMedCodeIN合作醫(yī)療證號NVARCHAR(20)AiIDNo

24、IN戶個人序號NIn tegerAiDiagNoIN就醫(yī)序號NIn tegerDataBufferOUTYReturn(s):0 -SUCCESS-1 FAILURERemarks:第一段-基本信息0醫(yī)療證號|1戶主姓名|2患者姓名|3性別|4出生年月|5與戶主關(guān)系|6住址|7經(jīng)治醫(yī)院|8入院時間|9出院時間|10住 院天數(shù)|11住院號|12疾病名稱|13年度入院次數(shù)|14總費用|15可報銷費用|16報銷費用|17保留|18保留|19保留|20保留|21保留|22保留第二段-住院醫(yī)療費用費用編碼|費用名稱|費用金額|納入補償費用|報銷費用第三段一報銷公式及分段線核算分段線可報銷費用報銷比例報銷

25、費用4.1.8.獲取已審批通過的藥品和診療項目列表Syntax:int GetCheckItem( char * AsOrganID);Parameter:參數(shù)輸入/ 輸出參數(shù)名是否可空類型AsOrganIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)Return(s):0 -SUCCESS-1 FAILURERemarks:當醫(yī)院有新項目增加后，在新合軟件中進行對應(yīng)經(jīng)審批后，請及時運行此函數(shù)，否則在新合費用明細錄入中 返回錯誤值。注意此函數(shù)不要頻繁使用。4.1.9.讀取轉(zhuǎn)診基本信息Syntax:int GetParmltem( char * AsOrganlD, char * Askind, char

26、 * DataBuffer);Parameter:參數(shù)輸入/ 輸出參數(shù)名是否 可空類型AsOrganIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)AskindIN類型1:疾病代碼表 2： 報銷公式目錄 3項目目 錄4已審核項目5轉(zhuǎn)診區(qū)域6單病種信息表NVARCHAR(1)DataBufferOUT錯誤返回信息Return（s）:0 -SUCCESS-1 FAILURERemarks:該函數(shù)運行后在當前目錄的 'DOWNLOAD目錄中生成以ILL+年月日時分秒，BXGS+年月日時分秒，ITEM+年月 日時分秒，BXITEM+年月日時分秒和 AREA+年月日時分秒為開頭的 TXT文本文本中字符之間

27、用軟換行符#10'分隔文本文件字段順序說明：1:疾病代碼表：字段順序：（IllCode 疾病編號,IllName 疾病名稱，Spell 拼音碼，F(xiàn)iveStrokes五筆碼）2：報銷公式目錄：字段順序：（Expressionsld公式編號,ExpressionsName 公式名稱，grade 等級,kind 補償類別【0不限，1限額，2定額】，typefee 限定金額）3項目目錄的字段順序：（ItemCode項目編號，ItemName項目名稱，Unit單位，WipeOut報銷標志（1報銷，2不報銷），Gg規(guī)格, Cd 產(chǎn)地，Jx 劑型，Remark 備注，SpName 別名，Price

28、1 單價 1, LimitPrice1 限價 1, Price2 單價 2, LimitPrice2 限價2, Price3單價3, LimitPrice3 限價3, Valid可用標志（1可用，2停用），Spell拼音碼, FiveStrokes 五筆碼，GradeToPrice 等級限價，Grade 等級，WjCode , FeeTypeCode 類型編號， FeeTypeName類型名稱）4已審核項目字段順序（Organld區(qū)劃編號，hoscode醫(yī)院項目號，hositem醫(yī)院項目名稱，hosspec醫(yī)院項目規(guī)格 manufacturer項目產(chǎn)地，hoskind類別，hostype劑型，

29、incode對應(yīng)項目號，inkind 對應(yīng)類別，orgcode醫(yī)療機構(gòu)編 號，orgflag ，ite mn ame對應(yīng)項目名稱，feetypecode類型編號，feetype name類型名稱，wipeout是否報銷，grade 藥品等級，LimitPrice1 限價 1, LimitPrice2 限價 2, LimitPrice3 限價 3, HosGrade 醫(yī)院登等級）5轉(zhuǎn)診區(qū)域 字段順序（OrganlD區(qū)劃編號，OrganName區(qū)劃名稱，year年度）6單病種信息表： 字段順序（病種編號，病種名稱，標準金額，補償金額）4.1.10.取消入院登記（包括費用明細）Syntax: int

30、 DeleteHosInfo (char * AsOrganlD, char * AsCoopMedCode, int AilDNo, int AiDiagNo, char * DataBuffer);Parameter:參數(shù)輸入/輸出參數(shù)名是否 可空類型AsOrga nIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)AsCoopMedCodeIN合作醫(yī)療證號NVARCHAR(20)AiIDNoIN戶個人序號NIn tegerAiDiagNoIN就醫(yī)序號NIn tegerDataBufferOUT錯誤信息YReturn（s）:0 -SUCCESS-1 FAILURERemarks:取消已入院登記的病人信

31、息，如存在費用明細，也會自動清除明細4.1.11.上傳或取消醫(yī)院項目對應(yīng)編碼Syntax:int UpdateInterItem (char * AsOrganID, char * AsFlag, char * AsHosCode,char * AsHosName, char * AsHosSpecchar * AsHosUnit,char * AsHosCd,char * AsHosType,char * AsHosKind ,char * AsHosPym,char * AsHosWbx ,char * AsItemCode ,char * AsDetail, char * DataBuf

32、fer);Parameter:參數(shù)輸入/ 輸出參數(shù)名是否 可空類型AsOrga nIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)AsFlagIN0-增加或修改,1-撤消審核NCHAR(1)AsHosCodeIN醫(yī)院項目編碼（唯一一）NVARCHAR(20)AsHosNameP IN醫(yī)院項目名稱VARCHAR(80)AsHosSpecIN規(guī)格VARCHAR(40)AsHosUnitin包裝單位VARCHAR(10)AsHosCdIN產(chǎn)地VARCHAR(20)AsHosTypeIN劑型VARCHAR(20) 丁AsHosKindIN類型（1-診療項目2手術(shù)項目 3西藥4中草藥）CHAR(1)AsHosPy

33、mIN拼音碼VARCHAR(10)AsHosWbxIN五筆碼VARCHAR(10)AsItemCodeIN對應(yīng)的新合編碼VARCHAR(20)AsDetailP IN撤消說明VARCHAR(100)DataBufferOUT錯誤信息YReturn(s):0 -SUCCESS-1 FAILURERemarks:ASFLAG=O時上傳或修改已上傳的醫(yī)院項目對應(yīng)信息ASFLAG=1申請撤消合管審核的項目對應(yīng)信息.4.1.12.上傳明細后的處理(僅針對直接寫前置機記帳明細表后的處理工作)住院Syntax:ProcessFeeList(AsOrga nID, AsCoopMedCode: pchar;

34、AilDNo, AiDiagNo:i nteger;DataBufer:pchar): In teger; stdcall; 說明：如果存在大量數(shù)據(jù)，就可以對前置機中直接寫表 0_CbZyBxDjZbOrga nID轉(zhuǎn)診區(qū)劃CoopMedCode 卡號OrgCode'1'IDNo人員序號DiagNo就診次數(shù)FeeNo費用序號順序數(shù)據(jù)1,2,3.ItemCode'1'ite mn ame醫(yī)院項目名稱PRICE單價NUM數(shù)量FEE金額OfficeName記帳科室RecipeNo處方號YyDate記帳時間Grade0In putDate記帳時間HosCode 醫(yī)院項目

35、編碼Compound單復(fù)方(0,1)GG醫(yī)院規(guī)格feetypecode 'O'feetype name '0'每次寫完數(shù)據(jù)提交后再調(diào)用ProcessFeeListProcessFeeList(AsOrga nID, AsCoopMedCode: pchar; AiIDNo, AiDiagNo:i nteger;DataBuffer:pchar): In teger; stdcall;注意：如果直接寫前置機明細，就不再使用SaveFreeList函數(shù)4.1.13. n診登記功能描述：在新農(nóng)合系統(tǒng)中記載參合患者的門診費用信息。調(diào)用說明：HIS系統(tǒng)在辦理門診項目就醫(yī)時

36、調(diào)用。fun ctio n mz_Savel nfo(aXZQH, aOrgCode, aCoopMedCode: pchar; aIDNO: In teger; aln Date, aIllCode, aIllName, aExpenseKind, aDoctorName: pchar; DataBuffer: pchar): Integer; stdcall;參數(shù)定義：序參數(shù)名稱輸入/參數(shù)說明數(shù)據(jù)類最多是否備注號輸出型長度為空1aXZQHIn行政區(qū)劃Varchar6N2aOrgCodeIn服務(wù)單位Varchar12N3aCoopMedCodeIn新農(nóng)合證號Varchar10N4aIDNOI

37、n:個人序號IntN5aI nDateIn就診時間varcharNyyyy-MM-dd hh:mm:ss6aIllCodeIn疾病編號Varchar10Y7aIllNameIn疾病名稱Varchar40Y8aExpe nseK indIn補償類別Varchar2N11普通門診13預(yù)防接種19門診特殊疾病90其他9aDoctorNameIn:醫(yī)生姓名Varchar20Y10DataBufferOut返回信息Varchar1000YDataBuffer說明：返回就診序號。Return :成功0 ;失敗 04.1.14門診登記明細功能描述：在新農(nóng)合系統(tǒng)中記載參合患者的門診費用信息明細。調(diào)用說明：HI

38、S系統(tǒng)在辦理門診項目就醫(yī)時調(diào)用。function mz_SavelnfoList(aXZQH, aOrgCode, aCoopMedCode: pchar; alDNO, aDiagNo: Integer; altemCode, aUnit: pchar; aPrice, aNum: double; aOfficeName, aRecipeNo, aYyDate, aGrade: pchar; DataBuffer: pchar): Integer; stdcall;參數(shù)定義：序號參數(shù)名稱輸入/輸出參數(shù)說明數(shù)據(jù)類型最多長度是否為空備注1aXZQHIn行政區(qū)劃Varchar6N2aOrgCode

39、In服務(wù)單位Varchar12N3aCoopMedCodeIn新農(nóng)合證號Varchar10N4aIDNOIn個人序號IntN5aDiagNoIn就診序號IntN6aHosCodeIn項目編號Varchar8N醫(yī)院項目編號7aU nitIn單位Varchar10Y8aPriceIn單價Numeric(10,4)N9aNumIn數(shù)量Numeric (6,2)N10aOfficeNameIn用藥科室Varchar40Y11aRecipeNoIn處方號Varchar12Y12aYyDateIn用藥時間DateY13aGradeIn價格級別Varchar1N0無限價1 一級2二級3三級14DataBuf

40、ferOut返回信息Varchar1000YDataBuffer說明：費用序號。Return :成功0 ;失敗 04.1.15.刪除門診登記功能描述：在新農(nóng)合系統(tǒng)中刪除參合患者的門診費用信息及明細。調(diào)用說明：HIS系統(tǒng)在辦理門診項目就醫(yī)時調(diào)用。function mz_Dellnfo(aXZQH, aOrgCode, aCoopMedCode: Pchar; aIDNO, aDiagNo: Integer; DataBuffer: pchar):In teger; stdcall; 參數(shù)定義:序號參數(shù)名稱輸入/輸出參數(shù)說明數(shù)據(jù)類型最多長度是否為空備注1aXZQHIn行政區(qū)劃Varchar6N2a

41、OrgCodeIn醫(yī)療服務(wù)單位Varchar12N3aCoopMedCodeIn新農(nóng)合證號Varchar10N4aIDNOIn個人序號IntN5aDiagNoIn就診序號IntN6DataBufferOut返回信息Varchar1000YReturn :成功0 ;失敗 04.1.16.獲取結(jié)算報銷費用信息功能描述：計算患者門診報銷費用。調(diào)用說明：HIS在門診結(jié)算時調(diào)用。function mz_GetCalcFee(aXZQH, aOrgCode, aCoopMedCode: pchar; alDNO, aDiagNo: Integer; DataBuffer: pchar):In teger;

42、 stdcall;參數(shù)定義：序號參數(shù)名稱輸入/輸出參數(shù)說明數(shù)據(jù)類型最多長度是否為空備注1aXZQHIn行政區(qū)劃Varchar6N2aOrgCodeIn醫(yī)療服務(wù)單位Varchar12N3aCoopMedCodeIn新農(nóng)合證號Varchar10N4aIDNOIn個人序號IntN5aDiagNoIn就診序號IntN6DataBufferOut返回信息Varchar1000YDataBuffer說明：0總費用| 1可報銷費用| 2報銷費用|預(yù)留|預(yù)留|預(yù)留|預(yù)留|結(jié)算明細輸出到文件：.downloadMZcalc日期時間.TxtReturn :成功0 ;失敗 0 4.1.17.用讀卡器讀卡功能描述：讀

43、取刷卡信息并解密獲得卡號(使用本公司提供的讀卡器和卡) 調(diào)用說明：HIS在錄入病人信息，病人刷農(nóng)合卡時調(diào)用。fun ctio n User_ReadCard(COMi: in teger; rData: PChar): in teger; stdcall; 參數(shù)定義：參數(shù)輸入/輸出參數(shù)名是否可空類型COMiIN串口號NINTrDataOut卡號：YVARCHAR(300)ErrorOut錯誤信息YVARCHAR(100)COMi =( 1, 2, 3, 4,)rData :返回卡信息，需要預(yù)設(shè)一定長度。出錯時返回錯誤提示信息。Return :成功0 ;失敗 04.1.18.根據(jù)讀取的卡信息獲得

44、卡號功能描述：解密卡信息獲得卡號(適用本公司提供的卡)調(diào)用說明：HIS在錄入病人信息，病人刷農(nóng)合卡時調(diào)用。fun ctio n GetCardlDByCode(Code: PChar; CardID: PChar): in teger; 參數(shù)定義：參數(shù)輸入/輸出參數(shù)名是否可空類型CodeIN卡信息NVARCHAR(300)CardIDOut卡號YVARCHAR(300)rData :返回卡號，需要預(yù)設(shè)一定長度。出錯時返回錯誤提示信息。Return :成功0 ;失敗 04.1.19.根據(jù)卡號獲得農(nóng)合證號功能描述：根據(jù)卡號獲得農(nóng)合證號調(diào)用說明：HIS在錄入病人信息，病人刷農(nóng)合卡時調(diào)用。fun ct

45、io n GetCoopMedCodeByCardlD(aOrga nID, aCardID: PChar; var DataBuffer: PChar): In teger; 參數(shù)定義：參數(shù)輸入/輸出參數(shù)名是否可空類型aOrga nIDIN行政區(qū)劃NVARCHAR(6)aCardIDIN卡號NVARCHAR(300)DataBufferOUTVARCHAR(300)DataBuffer :返回農(nóng)合證號，失敗返回錯誤信息。Return :成功0 ;失敗 04.1.20.測試串口連接功能描述：安裝讀卡器時，測試連接串口(使用本公司提供的讀卡器) 調(diào)用說明：測試讀卡器是否連接正確時調(diào)用fun ct

46、io n TestComC onn (COMi: in teger): in teger; stdcall;參數(shù)定義：參數(shù)輸入/輸出參數(shù)名是否可空類型COMiIN串口號NINTCOMi =( 1, 2, 3, 4,)Return :成功 0 ;失敗 <0 4.1.21.轉(zhuǎn)診 住院登記功能描述：記錄新農(nóng)合病人轉(zhuǎn)診住院信息調(diào)用說明：病人轉(zhuǎn)診住院登記時調(diào)用function zzSaveInHosInfo(AsOrganID, aOrgCode, aAreaCode, AsCoopMedCode, AsExpressionsID: pchar;AilDNo, aTurnID:In teger;

47、AsIllCode, AsIllName, AI nDate, Adke, AdLimitDef, AsDoctor, AsPatie ntld,AsExpe nseKi nd,AsLimitlllCode, DataBuffer: Pchar): In teger; stdcall;參數(shù)定義:參數(shù)輸入/輸出參數(shù)名是否可空類型AsOrga nIDIN轉(zhuǎn)診區(qū)劃NVARCHAR(6)aOrgCodeIN轉(zhuǎn)診醫(yī)療機構(gòu)編號NVARCHAR(12)aAreaCodeIN病人所屬區(qū)劃NVARCHAR(12)AsCoopMedCodeIN新合證號NVARCHAR(18)AsExpressi on sIDIN

48、報銷公式IDNVARCHAR(4)AiIDNoIN個人序號NIn tegeraTurnIDIN轉(zhuǎn)診序號NIn tegerAsIllCodeIN入院診斷（合管辦提供的 疾病代碼）NVARCHAR(10)AsIllNameIN入院診斷（合管辦提供的 疾病名稱）NVARCHAR(40)AI nDateIN入院日期N(YYYY-MM-DD HH:MM:SS)AdkeIN扣額-起付線調(diào)整為+'$'+報銷比率調(diào)整為的某個比率（在某個比率上漠個比率）YVARCHAR(12)AdLimitDefIN限額定義（0-不限；1限額；2 定額VARCHAR (10)第一位為上面的三個字 符（0、1、2

49、 ），第二位 為金額）YAsDoctorIN主治醫(yī)生YVARCHAR (12)AsPatie ntldIN住院號YVARCHAR (12)AsExpe nseK indIN21- -普通住院22- -單病種住院23- 正常分娩住院29其他住院90其他YVARCHAR (2)AsLimitIllCodeIN單病種疾病編碼YVARCHAR (4)當AsExpe nseKi nd=22 時不能為空DataBufferOut返回值VARCHAR (100)DataBuffer : 就醫(yī)序號Return :成功0; 失敗 < 0 4.1.22.獲取區(qū)劃信息功能描述：獲取參與轉(zhuǎn)診的區(qū)劃信息調(diào)用說明：

50、function GetXZQH in fo_zz（aAreaCode, DataBuffer: pchar）: In teger; stdcall;參數(shù)定義：參數(shù)輸入/輸出參數(shù)名是否可空類型aAreaCodeIN轉(zhuǎn)診區(qū)劃NVarchar(6)DataBufferOut返回值Return :成功 0;失敗 < 0DataBuffer說明：0上級區(qū)劃號|1區(qū)劃號|2區(qū)劃名稱|3預(yù)留|4預(yù)留|5預(yù)留|6預(yù)留|7預(yù)留|$4.1.23.獲取轉(zhuǎn)診區(qū)劃內(nèi)病人信息功能描述：獲取轉(zhuǎn)診病人信息 調(diào)用說明：function GetZz in fo_zz(aGrade, aAreaCode, DataBuffer: pchar): In teger;stdcall;參數(shù)定義：參數(shù)輸入/輸出參數(shù)名是否可空類型aGradeIN轉(zhuǎn)診區(qū)劃等級1'省級2'市級3'縣級NVarcahraAreaCodeIN轉(zhuǎn)診區(qū)劃NVarchar(6)DataBuffe