
介面檔案內容
2.2.1 技術架構
主體框架采用基于DLL+CICS訊息中間件的技術架構,由DLL提供開發商呼叫介面和彈出提示資訊,由CICS處理上傳資訊并回傳提示資訊。
主要由三部分組成:暴露給開發商的DLL介面、部署與前置機上的通訊中間件、醫保中心運行的中心端處理程式。
2.2.2 客戶端通信模塊
將要發送的訊息內容進行編碼,并呼叫ybpost.dll,該DLL是直接暴露給開發商的介面,采用異步呼叫技術,不影響醫院的正常業務運作。
ybpost.dll以函式引數的方式傳遞要發送的訊息。函式名:YBTS(string),只有一個引數,內容為發送的訊息,型別為字串,無回傳訊息。
傳入引數統一設定為XML格式的字串,字串結構見XML結構
除了ybpost.dll,還需要原實時結算介面中包含的其他dll檔案和相應的ini組態檔等,進行讀卡等操作
在內網中客戶機還有一個SendRcvA.ini和SendRcvB.ini
內容為:
SendRcvA.ini
[Host]
TCPIP=192.168.0.110
CommPort=10061
[System]
TimeOut=30000
CommSize=4096
------------------------------
SendRcvB.ini
[Host]
TCPIP=192.168.0.110
CommPort=10062
[System]
TimeOut=600000
客戶端加載以上SendRcvA.ini指向前置機,然后前置機把資料傳給醫保中心
我想用delphi 7 寫這樣的介面程式,該怎么寫?
醫保前置機上日志
發送代碼為
SSSS330399 G00233039900000009300 168 管理員 13330399D15600000508308301D15C4F99A85275136 ZZZZ
回傳代碼為:
RRRR33039920170819/081544/G00200000000000009300 20170800103392270013A85275136 張三 151032119810116005X198101160006951592 101長沙市本級 0001100 00 001634.04003090.670002000000000.0000000.000000045.600000000.000000000.000000000.000000000.000000000.000000000.000000000.000000000.00 13075720001 0000000.0000 ZZZZ
uj5u.com熱心網友回復:
再來頂上去
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/50798.html
標籤:VCL組件開發及應用
上一篇:IdFTP.List方法在有的網格下可以用,有的網路下報錯,是何原因?
下一篇:如何把表單做成像QQ那樣的有陰影
