©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
XWB2HL7B ;ISF/AC - Remote RPCs via HL7. ;03/27/2003 17:46
Source file <XWB2HL7B.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 1 | GENACK^HLMA1 |
| RPC Broker | 1 | REMOTE^XWB2HL7 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INPUTPRM(X1,L1) | ;Process Input Parameters
|
|
| RPCRECV | ;Called from the XWB RPC CLIENT protocol
|
|
| COMPRES(XWB2P) | ;DXLATE AND COMPRESS ARRAY.
|
|
| SUBCMPNT(X4,L4) | ;Loop through sub-components.
|
|
| BLDRDT | ;Build RDT segments.
|
|
| NEXTNODE(%) | ;Get next node from $NA reference.
|
|
| DXLATE(X,OVFL) | ;TRANSLATE encoded characters back to there Formating codes.
|
|
| REPEATLP(X2,L2) | ;Loop through repeatable components.
|
|
| COMPONT(X3,L3) | ;Loop through the two components.
|
|
| RECVXIT | ;Cleanup of receiver processing sub-routine
|
|
| GENACK | ;Generate ack/nak
|
|
| PARSSPR | ;Parse SPR segment for paramaeters.
|
| HL7 Protocol Name | Call Tags |
|---|---|
| XWB RPC SUBSCRIBER | RPCRECV |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("HLA" | GENACK+1!, GENACK+2*, GENACK+3*, GENACK+4*, RECVXIT+1!, BLDRDT+7*, BLDRDT+8*, BLDRDT+9* |
| Name | Line Occurrences |
|---|---|
| $$DXLATE | COMPRES+5, COMPRES+11, COMPRES+17 |
| $$NEXTNODE | COMPRES+7, COMPRES+24, COMPRES+26, COMPRES+34 |
| BLDRDT | GENACK+5 |
| COMPONT | REPEATLP+7, REPEATLP+8 |
| COMPRES | RPCRECV+14 |
| GENACK | RPCRECV+8 |
| INPUTPRM | PARSSPR+17, PARSSPR+20 |
| PARSSPR | RPCRECV+8 |
| REPEATLP | INPUTPRM+7, INPUTPRM+8 |
| SUBCMPNT | COMPONT+17, COMPONT+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | PARSSPR+1~, PARSSPR+17*, PARSSPR+19*, PARSSPR+20*, NEXTNODE~, NEXTNODE+2, NEXTNODE+3, NEXTNODE+5 |
| %1 | PARSSPR+1~, PARSSPR+20* |
| CL | COMPONT+3~, COMPONT+4*, COMPONT+5, COMPONT+6, COMPONT+20 |
| CMPNTREM | RPCRECV+2~, COMPONT+19*, COMPONT+22 |
| CNODE | COMPRES+1~, COMPRES+4*, COMPRES+5, COMPRES+6, COMPRES+13, COMPRES+15, COMPRES+16*, COMPRES+17, COMPRES+18, COMPRES+21* , COMPRES+22, COMPRES+23, COMPRES+25*, COMPRES+26, COMPRES+29*, COMPRES+31, COMPRES+33 |
| D | DXLATE+2~, DXLATE+3*, DXLATE+5 |
| E | COMPRES+1~, COMPRES+2* |
| >> HL("ECH" | RPCRECV+6, GENACK+4, REPEATLP+4, REPEATLP+6, COMPONT+4, COMPONT+7, COMPONT+16, COMPONT+21, SUBCMPNT+5, SUBCMPNT+7 , DXLATE+3, COMPRES+2 |
| >> HL("EID" | GENACK+6 |
| >> HL("EIDS" | GENACK+6 |
| >> HL("FS" | RPCRECV+6, GENACK+2, GENACK+3, GENACK+4, PARSSPR+4, PARSSPR+6, PARSSPR+8, PARSSPR+12, PARSSPR+17, PARSSPR+19 , INPUTPRM+5, INPUTPRM+6, BLDRDT+7, BLDRDT+8 |
| >> HL("MID" | GENACK+2 |
| >> HLERR | RPCRECV+8, GENACK+2, GENACK+3, GENACK+5, INPUTPRM+7, INPUTPRM+9, REPEATLP+5, COMPONT+5*, COMPONT+9, COMPONT+10* , COMPONT+24* |
| >> HLMTIENS | GENACK+6 |
| >> HLNEXT | RPCRECV+3 |
| >> HLNODE | RPCRECV+3 |
| >> HLNODE( | RPCRECV+3 |
| >> HLQUIT | RPCRECV+3 |
| I | RPCRECV+2~, RPCRECV+3*, RPCRECV+6*, PARSSPR+2*, PARSSPR+4, PARSSPR+6, PARSSPR+8, PARSSPR+12, PARSSPR+17, PARSSPR+19 , PARSSPR+20, INPUTPRM+4~, REPEATLP+3~, REPEATLP+5*, REPEATLP+6, REPEATLP+7, COMPONT+3~, COMPONT+9*, COMPONT+10, COMPONT+11 , COMPONT+12, COMPONT+13*, COMPONT+14, COMPONT+23*, COMPONT+24, COMPONT+25, COMPONT+26, SUBCMPNT+4~, SUBCMPNT+6*, SUBCMPNT+7 , SUBCMPNT+8, BLDRDT+1~, BLDRDT+5*, BLDRDT+7, BLDRDT+8, BLDRDT+9, DXLATE+2~, COMPRES+1~, COMPRES+3*, COMPRES+4 , COMPRES+20*, COMPRES+21 |
| I1 | RPCRECV+2~, RPCRECV+11*, RPCRECV+12, SUBCMPNT+4~, SUBCMPNT+10*, SUBCMPNT+11, SUBCMPNT+13*, SUBCMPNT+14, SUBCMPNT+17, SUBCMPNT+19 , SUBCMPNT+23, SUBCMPNT+26, SUBCMPNT+29, SUBCMPNT+32*, SUBCMPNT+33, SUBCMPNT+34, SUBCMPNT+37, SUBCMPNT+40, SUBCMPNT+42, SUBCMPNT+43 , SUBCMPNT+45*, SUBCMPNT+46, DXLATE+2~ |
| I2 | SUBCMPNT+4~, SUBCMPNT+17*, SUBCMPNT+19, SUBCMPNT+22, SUBCMPNT+26, SUBCMPNT+29, SUBCMPNT+33*, SUBCMPNT+34, SUBCMPNT+36, SUBCMPNT+40 , SUBCMPNT+42 |
| IL | INPUTPRM+4~, INPUTPRM+5*, INPUTPRM+7, INPUTPRM+9 |
| J | RPCRECV+2~, RPCRECV+3*, COMPRES+1~ |
| L | DXLATE+2~, DXLATE+3*, DXLATE+4, DXLATE+5*, DXLATE+6, DXLATE+8, DXLATE+9, DXLATE+11*, COMPRES+1~, COMPRES+6* , COMPRES+22*, COMPRES+25*, COMPRES+26, COMPRES+29, COMPRES+30, COMPRES+31* |
| L1 | INPUTPRM~, INPUTPRM+7, DXLATE+2~, DXLATE+6*, DXLATE+7, DXLATE+8, DXLATE+10, COMPRES+1~, COMPRES+9*, COMPRES+10 , COMPRES+14, COMPRES+27*, COMPRES+28 |
| L2 | REPEATLP~, REPEATLP+7 |
| L3 | COMPONT~, COMPONT+17, COMPONT+19, COMPONT+22 |
| L4 | SUBCMPNT~, SUBCMPNT+8 |
| NNODE | COMPRES+1~, COMPRES+6*, COMPRES+7*, COMPRES+10, COMPRES+14, COMPRES+16, COMPRES+23*, COMPRES+24*, COMPRES+25, COMPRES+26* , COMPRES+27, COMPRES+29, COMPRES+30, COMPRES+33*, COMPRES+34*, COMPRES+35 |
| NODELEN | BLDRDT+1~, BLDRDT+6*, BLDRDT+7 |
| NODERDT | BLDRDT+1~, BLDRDT+2*, BLDRDT+3, BLDRDT+5 |
| OVFL | DXLATE~, DXLATE+3*, DXLATE+8*, DXLATE+9* |
| QL | NEXTNODE+1~, NEXTNODE+2*, NEXTNODE+3, NEXTNODE+4 |
| QS | NEXTNODE+1~ |
| RDTNODE | BLDRDT+1~, BLDRDT+2*, BLDRDT+3, BLDRDT+4*, BLDRDT+5*, BLDRDT+6, BLDRDT+7, BLDRDT+8, BLDRDT+9 |
| RL | REPEATLP+3~, REPEATLP+4*, REPEATLP+5, REPEATLP+7 |
| RMNDRLEN | SUBCMPNT+4~, SUBCMPNT+19*, SUBCMPNT+21, SUBCMPNT+23, SUBCMPNT+24, SUBCMPNT+26, SUBCMPNT+27, SUBCMPNT+34*, SUBCMPNT+35, SUBCMPNT+37 , SUBCMPNT+38, SUBCMPNT+40, SUBCMPNT+41 |
| SL | SUBCMPNT+4~, SUBCMPNT+5*, SUBCMPNT+6, SUBCMPNT+8 |
| X | DXLATE~, DXLATE+3, DXLATE+4, DXLATE+5, DXLATE+6, DXLATE+8*, DXLATE+9*, DXLATE+11*, DXLATE+12 |
| X1 | INPUTPRM~, INPUTPRM+5, INPUTPRM+6, DXLATE+2~, NEXTNODE+1~, NEXTNODE+3*, NEXTNODE+5* |
| X2 | REPEATLP~, REPEATLP+4, REPEATLP+6, DXLATE+2~, DXLATE+10*, DXLATE+11 |
| X3 | COMPONT~, COMPONT+4, COMPONT+7, COMPONT+16, COMPONT+21 |
| X4 | SUBCMPNT~, SUBCMPNT+5, SUBCMPNT+7 |
| XWB2EMAP | RPCRECV+2~, RPCRECV+7*, DXLATE+10 |
| XWB2IPRM | RPCRECV+2~, PARSSPR+8* |
| XWB2LPRM | RPCRECV+2~, PARSSPR+12*, PARSSPR+17 |
| XWB2MAP2 | RPCRECV+2~, RPCRECV+7*, DXLATE+6 |
| XWB2P | COMPRES~ |
| XWB2P( | COMPRES+3, COMPRES+4, COMPRES+20, COMPRES+21 |
| XWB2PEND | RPCRECV+2~, PARSSPR+20, INPUTPRM+7*, INPUTPRM+9* |
| XWB2QTAG | RPCRECV+2~, RPCRECV+16, GENACK+3, PARSSPR+4* |
| XWB2RFLD | RPCRECV+2~ |
| XWB2RFLD( | COMPONT+11*, COMPONT+14*, COMPONT+25* |
| XWB2RFLD("@" | COMPONT+13 |
| XWB2RFLD("R" | COMPONT+9, COMPONT+10, COMPONT+11, COMPONT+12!, COMPONT+23, COMPONT+24, COMPONT+25, COMPONT+26! |
| XWB2RNAM | RPCRECV+2~, RPCRECV+16, BLDRDT+2 |
| XWB2RPCP | RPCRECV+2~, RPCRECV+14, RPCRECV+16 |
| XWB2RPCP( | RPCRECV+12*, SUBCMPNT+43*, SUBCMPNT+46* |
| XWB2RPCP("@" | SUBCMPNT+13, SUBCMPNT+45 |
| XWB2RPCP("R" | RPCRECV+11, RPCRECV+12, RPCRECV+13!, SUBCMPNT+10, SUBCMPNT+14*, SUBCMPNT+17, SUBCMPNT+19, SUBCMPNT+23*, SUBCMPNT+26*, SUBCMPNT+29* , SUBCMPNT+32, SUBCMPNT+33, SUBCMPNT+34, SUBCMPNT+37*, SUBCMPNT+40*, SUBCMPNT+42*, SUBCMPNT+43, SUBCMPNT+44! |
| XWB2RSLT | RPCRECV+2~, GENACK+6 |
| XWB2SPN | RPCRECV+2~, RPCRECV+16, PARSSPR+6* |
| XWB2X1 | COMPRES+1~, COMPRES+5, COMPRES+8, COMPRES+9, COMPRES+11, COMPRES+15, COMPRES+17!, COMPRES+18 |
| XWB2X2 | COMPRES+1~, COMPRES+10*, COMPRES+11 |
| XWB2Y | RPCRECV+2~ |
| XWB2Y( | RPCRECV+3*, PARSSPR+4, PARSSPR+6, PARSSPR+8, PARSSPR+12, PARSSPR+17, PARSSPR+19, PARSSPR+20 |
| Y | RPCRECV+2~, RPCRECV+5*, RPCRECV+6*, RPCRECV+7, DXLATE+2~, COMPRES+11*, COMPRES+12, COMPRES+13, NEXTNODE+1~, NEXTNODE+3* , NEXTNODE+4, NEXTNODE+5* |
| Y1 | INPUTPRM+4~, INPUTPRM+6*, INPUTPRM+7, INPUTPRM+8 |
| Y2 | REPEATLP+3~, REPEATLP+6*, REPEATLP+7, REPEATLP+8 |
| Y3 | COMPONT+3~, COMPONT+7*, COMPONT+10, COMPONT+11, COMPONT+14, COMPONT+16*, COMPONT+17, COMPONT+21*, COMPONT+22, COMPONT+24 , COMPONT+25 |
| Y4 | SUBCMPNT+4~, SUBCMPNT+7*, SUBCMPNT+14, SUBCMPNT+23, SUBCMPNT+24*, SUBCMPNT+26, SUBCMPNT+27*, SUBCMPNT+29, SUBCMPNT+37, SUBCMPNT+38* , SUBCMPNT+40, SUBCMPNT+41*, SUBCMPNT+42, SUBCMPNT+46 |