ORRDI1 ;SLC/JMH - RDI ROUTINES FOR API SUPPORTING CDS DATA ;Nov 16, 2022@13:03:49
Source file <ORRDI1.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | UNWIND^%ZTER ($$FMADD,$$FMDIFF,$$FMTHL7,$$NOW)^XLFDT F4^XUAF4 |
| Master Patient Index VistA | 1 | $$GETICN^MPIF001 |
| Order Entry Results Reporting | 1 | ($$DOWNXVAL,$$FAILPVAL,$$FAILXVAL,SPAWN)^ORRDI2 |
| Registration | 1 | $$SITE^VASITE |
| Toolkit | 1 | $$GET^XPAR |
| Web Services Client | 1 | ($$GET,$$GETREST,$$STATCHK)^XOBWLIB |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GET(DFN,DOMAIN) | ;API for packages to call in order to get data from HDR for
|
|
| RETRIEVE(DFN,DOMAIN) | ;GET DATA
|
|
| PS(DFN) | ;expects ^TMP($J,"ORRDI")
|
|
| AL(DFN) | ;expects ^TMP($J,"ORRDI")
|
|
| HAVEHDR() | ;call to check if this system has an HDR to perform order checks
; against |
|
| DTCONV(DATE) | ;convert date in hl7 format to mm/dd/yy
|
|
| PARSE(STREAM) | ;
|
|
| SPUSH(S,X) | ;places X on the stack S and returns the current level of the stack
|
|
| SPOP(S,X) | ;removes the top item from the stack S and put it into the variable X and returns the level that X was at
|
|
| SPEEK(S,X) | ;same as SPOP except the top item is not removed
|
|
| SPUT(S,X) | ;implementation specific, uses the stack to form a global node
|
|
| MSGERR() | ;check errors from XML return
|
|
| ERRHNDL(DFN) | ;handle any errors that may get thrown in call to GET^ORRDI1
|
| Name | Field # of Occurrence |
|---|---|
| UNWIND^%ZTER | ERRHNDL+2 |
| $$GETICN^MPIF001 | RETRIEVE+8 |
| $$DOWNXVAL^ORRDI2 | GET+3 |
| $$FAILPVAL^ORRDI2 | GET+23 |
| $$FAILXVAL^ORRDI2 | GET+22, GET+23 |
| SPAWN^ORRDI2 | GET+25 |
| $$SITE^VASITE | RETRIEVE+13 |
| $$FMADD^XLFDT | RETRIEVE+10, RETRIEVE+50 |
| $$FMDIFF^XLFDT | GET+11, GET+13, GET+14 |
| $$FMTHL7^XLFDT | RETRIEVE+11 |
| $$NOW^XLFDT | GET+11, GET+13, GET+14, RETRIEVE+10, RETRIEVE+35, RETRIEVE+48, RETRIEVE+49, RETRIEVE+50, RETRIEVE+55, RETRIEVE+57 |
| $$GET^XOBWLIB | RETRIEVE+38 |
| $$GETREST^XOBWLIB | RETRIEVE+37 |
| $$STATCHK^XOBWLIB | PARSE+6 |
| $$GET^XPAR | GET+10, HAVEHDR+3 |
| F4^XUAF4 | AL+9, AL+59 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | RETRIEVE+4!, RETRIEVE+56!, PS+4, AL+4, AL+55, PARSE+2, MSGERR+5, MSGERR+7, MSGERR+8, ERRHNDL+1! |
| ^XTMP("ORRDI" | GET+4!, GET+5*, GET+9, GET+11, GET+13, GET+14, GET+18*, GET+22*, GET+24*, GET+26* , RETRIEVE+48*, RETRIEVE+49*, RETRIEVE+50*, RETRIEVE+53*, RETRIEVE+55*, RETRIEVE+57*, RETRIEVE+58*, RETRIEVE+59*, PS+1!, PS+7* , PS+8*, PS+9*, PS+10*, PS+11*, PS+12*, PS+13*, PS+14*, PS+17*, PS+18*, PS+19* , PS+20*, PS+21*, PS+22*, PS+23*, AL+1!, AL+11*, AL+13*, AL+15*, AL+17*, AL+21* , AL+23*, AL+25*, AL+28*, AL+31*, AL+33*, AL+35*, AL+38*, AL+41*, AL+43*, AL+44* , AL+45*, AL+49*, AL+53*, AL+54*, AL+57*, AL+61*, AL+63*, ERRHNDL+1! |
| Name | Line Occurrences |
|---|---|
| $$AL | RETRIEVE+46 |
| $$DTCONV | PS+13, PS+14, PS+17, PS+18 |
| $$MSGERR | PS+2, AL+2 |
| $$PS | RETRIEVE+47 |
| $$RETRIEVE | GET+17 |
| PARSE | RETRIEVE+43 |
| SPOP | PARSE+11 |
| SPUSH | PARSE+10 |
| SPUT | PARSE+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %XML | PARSE+1~ |
| BREAK | PARSE+7~, PARSE+8* |
| CNT | PS+3~, PS+4*, PS+6*, PS+25, AL+3~, AL+4*, AL+6*, AL+64 |
| DATE | DTCONV~, DTCONV+1, DTCONV+2 |
| DFN | GET~, GET+4, GET+5, GET+9, GET+11, GET+13, GET+14, GET+17, GET+26, RETRIEVE~ , RETRIEVE+8, RETRIEVE+46, RETRIEVE+47, RETRIEVE+48, RETRIEVE+49, RETRIEVE+55, RETRIEVE+57, RETRIEVE+58, RETRIEVE+59, PS~ , PS+1, PS+7, PS+8, PS+9, PS+10, PS+11, PS+12, PS+13, PS+14, PS+17 , PS+18, PS+19, PS+20, PS+21, PS+22, PS+23, AL~, AL+1, AL+11, AL+13 , AL+15, AL+17, AL+21, AL+23, AL+25, AL+28, AL+31, AL+33, AL+35, AL+38 , AL+41, AL+43, AL+44, AL+45, AL+49, AL+53, AL+54, AL+57, AL+61, AL+63 , ERRHNDL~, ERRHNDL+1 |
| DOMAIN | GET~, GET+1*, GET+4, GET+5, GET+9, GET+11, GET+17, GET+26, RETRIEVE~, RETRIEVE+6* , RETRIEVE+51, RETRIEVE+52 |
| FACIL | RETRIEVE+3~, RETRIEVE+13*, RETRIEVE+22, RETRIEVE+35 |
| GL | PS+3~, PS+4*, PS+5, PS+7, PS+8, PS+9, PS+10, PS+11, PS+12, PS+13 , PS+14, PS+15, PS+16, PS+17, PS+18, PS+19, PS+20, PS+21, PS+22, AL+3~ , AL+4*, AL+5, AL+7, AL+9, AL+13, AL+14, AL+15, AL+16, AL+17, AL+18 , AL+19, AL+20, AL+21, AL+22, AL+23, AL+24, AL+25, AL+26, AL+27, AL+28 , AL+29, AL+30, AL+31, AL+32, AL+33, AL+34, AL+35, AL+36, AL+37, AL+38 , AL+39, AL+41, AL+42, AL+43, AL+44, AL+45, AL+46, AL+47, AL+48, AL+49 , AL+50, AL+51, AL+52, AL+53, AL+54, AL+55*, AL+56, AL+57, AL+59, AL+63 , PARSE+1~, PARSE+2*, PARSE+3, SPUT+2 |
| I | GET+7~, PS+3~, PS+5*, PS+7, PS+8, PS+9, PS+10, PS+11, PS+12, PS+13 , PS+14, PS+15, PS+16, PS+17, PS+18, PS+19, PS+20, PS+21, PS+22, PS+23 , AL+3~, AL+5*, AL+7, AL+9, AL+11, AL+13, AL+14, AL+15, AL+16, AL+17 , AL+18, AL+19, AL+20, AL+21, AL+22, AL+23, AL+24, AL+25, AL+26, AL+27 , AL+28, AL+29, AL+30, AL+31, AL+32, AL+33, AL+34, AL+35, AL+36, AL+37 , AL+38, AL+39, AL+41, AL+42, AL+43, AL+44, AL+45, AL+46, AL+47, AL+48 , AL+49, AL+50, AL+51, AL+52, AL+53, AL+54, AL+56*, AL+57, AL+59, AL+61 , AL+63, SPUSH+1~*, SPUSH+2, SPOP+1~*, SPOP+2, SPOP+3, SPOP+4, SPEEK+1~*, SPEEK+2, SPEEK+3 , SPUT+1~, SPUT+3*, SPUT+4, SPUT+6, MSGERR+6~*, MSGERR+7, MSGERR+8 |
| ICN | RETRIEVE+3~, RETRIEVE+8*, RETRIEVE+9, RETRIEVE+20 |
| J | AL+19~*, AL+20, AL+21, AL+22, AL+23, AL+24, AL+25, AL+47~*, AL+48, AL+49 , AL+51~*, AL+53, AL+54, SPOP+3~*, MSGERR+7~*, MSGERR+8 |
| K | PS+15~*, PS+16, PS+17 |
| L | PS+22~* |
| NUM | SPUT+5~*, SPUT+6*, SPUT+7 |
| ORALNUM | RETRIEVE+3~, RETRIEVE+46*, RETRIEVE+48, RETRIEVE+51, RETRIEVE+55 |
| ORCACHE | GET+7~, GET+10*, GET+11 |
| ORCDIF | RETRIEVE+3~, RETRIEVE+39*, RETRIEVE+44, RETRIEVE+55 |
| ORCSTART | RETRIEVE+3~, RETRIEVE+34*, RETRIEVE+35, RETRIEVE+39, RETRIEVE+44, RETRIEVE+55, RETRIEVE+57 |
| ORERR | RETRIEVE+3~, RETRIEVE+38, RETRIEVE+57, RETRIEVE+58, RETRIEVE+59 |
| ORPDIF | RETRIEVE+3~, RETRIEVE+44*, RETRIEVE+55 |
| ORPSNUM | RETRIEVE+3~, RETRIEVE+47*, RETRIEVE+49, RETRIEVE+52, RETRIEVE+55 |
| ORPSTART | RETRIEVE+3~, RETRIEVE+42* |
| ORQ | PS+2~*, AL+2~* |
| ORRECDT | GET+7~, GET+9*, GET+11 |
| ORREQ | RETRIEVE+3~, RETRIEVE+15*, RETRIEVE+16*, RETRIEVE+17*, RETRIEVE+18*, RETRIEVE+19*, RETRIEVE+20*, RETRIEVE+21*, RETRIEVE+22*, RETRIEVE+23* , RETRIEVE+24*, RETRIEVE+25*, RETRIEVE+26*, RETRIEVE+27*, RETRIEVE+28*, RETRIEVE+29*, RETRIEVE+30*, RETRIEVE+31*, RETRIEVE+32*, RETRIEVE+33* , RETRIEVE+35*, RETRIEVE+38, RETRIEVE+53 |
| ORRET | GET+7~, GET+11*, GET+13*, GET+14*, GET+16, GET+17*, GET+18, GET+19, GET+20, GET+21* , GET+26, GET+27, RETRIEVE+3~, RETRIEVE+38*, RETRIEVE+40, RETRIEVE+57, MSGERR+4~*, MSGERR+9*, MSGERR+10 |
| ORSTR | MSGERR+8~*, MSGERR+9 |
| ORXML | RETRIEVE+3~, RETRIEVE+37*, RETRIEVE+38 |
| ORY | RETRIEVE+3~, RETRIEVE+5*, RETRIEVE+40, RETRIEVE+51*, RETRIEVE+52*, RETRIEVE+53 |
| READER | PARSE+4~, PARSE+5 |
| RETURN | AL+8~, AL+9, AL+10, AL+11, AL+12, AL+58~, AL+59, AL+60, AL+61, AL+62 |
| RETURN("NAME" | AL+11, AL+61 |
| RETURN("STATI | ON NUMBER" , AL+11, AL+61 |
| RETURN("VA NA | ME" , AL+11, AL+61 |
| S | PARSE+4~, PARSE+10, PARSE+11, PARSE+12, SPUSH~, SPOP~, SPEEK~, SPUT~ |
| S( | SPUSH+1*, SPOP+2!, SPOP+3*, SPEEK+2, SPUT+3, SPUT+4, SPUT+6 |
| S("" | SPUSH+1, SPOP+1, SPEEK+1 |
| START | RETRIEVE+3~, RETRIEVE+10*, RETRIEVE+11*, RETRIEVE+12*, RETRIEVE+30 |
| STATUS | PARSE+4~, PARSE+5*, PARSE+6 |
| STR | SPUT+1~, SPUT+2*, SPUT+4*, SPUT+7*, SPUT+8*, SPUT+9, SPUT+10, SPUT+11 |
| STREAM | PARSE~, PARSE+5 |
| U | GET+9, GET+11, GET+13, GET+14, GET+20, GET+26, RETRIEVE+13, RETRIEVE+48, RETRIEVE+49, RETRIEVE+50 , RETRIEVE+55, RETRIEVE+57, RETRIEVE+58, RETRIEVE+59, PS+2, AL+2, AL+11, AL+13, AL+15, AL+21 , AL+23, AL+28, AL+31, AL+33, AL+38, AL+43, AL+44, AL+49, AL+53, AL+54 , AL+57, AL+61, AL+63 |
| X | PARSE+9~, PARSE+11, SPUSH~, SPUSH+1, SPOP~, SPOP+2*, SPOP+3, SPEEK~, SPEEK+2*, SPUT~ , SPUT+9, SPUT+10 |
| XOBERR | PARSE+4~, PARSE+6 |
| Y | RETRIEVE+3~ |