©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
ORRDI1 ;SLC/JMH - RDI routines for API supporting CDS data; 3/24/05 2:31 [8/11/05 6:25am] ; 1/11/07 8:33am
Source file <ORRDI1.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | ($$FMADD,$$FMDIFF,$$NOW)^XLFDT ($$REPLACE,$$UP)^XLFSTR $$BASE^XLFUTL |
| Order Entry Results Reporting | 2 | ($$DOWNXVAL,$$FAILPVAL,$$FAILXVAL,PIECEOUT,SPAWN)^ORRDI2 SELECT^ORWPT |
| Health Level Seven | 1 | DIRECT^HLMA |
| Registration | 1 | $$SITE^VASITE |
| Toolkit | 1 | $$GET^XPAR |
| Package | Total | Caller Graph |
|---|---|---|
| Outpatient Pharmacy | 11 | PSOCPDUP PSODGDGI PSOORDRG PSOORRDI PSOORUT2 PSOQ0595 PSOQRART PSOQUAP2 PSORMRX PSORX1 PSOVER1 |
| Inpatient Medications | 3 | PSGSICHK PSJDPT PSJMUTL |
| Adverse Reaction Tracking | 1 | GMRAOR |
| Order Entry Results Reporting | 1 | ORKCHK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALPARSE(DFN,DATA) | ;parse an individual ART record that comes from CDS
|
|
| RETRIEVE(DFN,DOMAIN) | ;actually go get the data from CDS
|
|
| PSPARSE(DFN,DATA) | ;parse an individual PSOO record from CDS
|
|
| 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
|
|
| REMESC(ORSTR) | ;
; Remove Escape Characters from HL7 Message Text ; Escape Sequence codes: ; F = field separator (ORFS) ; S = component separator (ORCS) ; R = repetition separator (ORRS) ; E = escape character (ORES) ; T = subcomponent separator (ORSS) |
|
| GET(DFN,DOMAIN) | ;API for packages to call in order to get data from HDR for
; check if in OUTAGE state and quit if so |
| Name | Field # of Occurrence |
|---|---|
| DIRECT^HLMA | RETRIEVE+22 |
| $$DOWNXVAL^ORRDI2 | GET+2 |
| $$FAILPVAL^ORRDI2 | GET+21 |
| $$FAILXVAL^ORRDI2 | GET+20, GET+21 |
| PIECEOUT^ORRDI2 | ALPARSE+4, PSPARSE+3 |
| SPAWN^ORRDI2 | GET+23 |
| SELECT^ORWPT | RETRIEVE+10 |
| $$SITE^VASITE | RETRIEVE+20 |
| $$FMADD^XLFDT | RETRIEVE+8, RETRIEVE+34 |
| $$FMDIFF^XLFDT | GET+10, GET+12, GET+13 |
| $$NOW^XLFDT | GET+10, GET+12, GET+13, RETRIEVE+8, RETRIEVE+24, RETRIEVE+34 |
| $$REPLACE^XLFSTR | REMESC+10 |
| $$UP^XLFSTR | REMESC+15 |
| $$BASE^XLFUTL | REMESC+15 |
| $$GET^XPAR | GET+9, HAVEHDR+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XTMP("ORRDI" | GET+3!, GET+4*, GET+8, GET+10, GET+12, GET+13, GET+17*, GET+20*, GET+22*, GET+24* , GET+26, GET+27!, GET+28*, RETRIEVE+1!, RETRIEVE+24*, RETRIEVE+34*, RETRIEVE+38, ALPARSE+3, ALPARSE+8*, ALPARSE+12* , ALPARSE+21*, ALPARSE+29*, ALPARSE+30*, ALPARSE+31*, ALPARSE+32*, PSPARSE+4, PSPARSE+6*, PSPARSE+7*, PSPARSE+8*, PSPARSE+9* , PSPARSE+10*, PSPARSE+11*, PSPARSE+12*, PSPARSE+13*, PSPARSE+14*, PSPARSE+15*, PSPARSE+16* |
| Name | Line Occurrences |
|---|---|
| $$DTCONV | PSPARSE+13, PSPARSE+14, PSPARSE+15 |
| $$REMESC | ALPARSE+30, ALPARSE+31, ALPARSE+32, PSPARSE+16 |
| $$RETRIEVE | GET+16 |
| ALPARSE | RETRIEVE+35 |
| PSPARSE | RETRIEVE+36 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CODING | ALPARSE+11~*, ALPARSE+12, ALPARSE+18~*, ALPARSE+27~* |
| COUNT | PSPARSE+2~, PSPARSE+5*, PSPARSE+6* |
| DATA | ALPARSE~, ALPARSE+1, ALPARSE+4, PSPARSE~, PSPARSE+1, PSPARSE+3 |
| DATA(0 | ALPARSE+1*, PSPARSE+1* |
| DATE | DTCONV~, DTCONV+1 |
| DCCOUNT | ALPARSE+2~, ALPARSE+14*, ALPARSE+19*, ALPARSE+21 |
| DFN | GET~, GET+3, GET+4, GET+8, GET+10, GET+12, GET+13, GET+16, GET+24, GET+26 , GET+27, GET+28, RETRIEVE~, RETRIEVE+1, RETRIEVE+10, RETRIEVE+24, RETRIEVE+35, RETRIEVE+36, RETRIEVE+38, ALPARSE~ , ALPARSE+3, ALPARSE+8, ALPARSE+12, ALPARSE+21, ALPARSE+29, ALPARSE+30, ALPARSE+31, ALPARSE+32, PSPARSE~, PSPARSE+4 , PSPARSE+6, PSPARSE+7, PSPARSE+8, PSPARSE+9, PSPARSE+10, PSPARSE+11, PSPARSE+12, PSPARSE+13, PSPARSE+14, PSPARSE+15 , PSPARSE+16 |
| DICOUNT | ALPARSE+2~, ALPARSE+23*, ALPARSE+28*, ALPARSE+29 |
| DOMAIN | GET~, GET+3, GET+4, GET+8, GET+10, GET+16, GET+24, GET+26, GET+27, GET+28 , RETRIEVE~, RETRIEVE+1, RETRIEVE+7, RETRIEVE+8, RETRIEVE+24, RETRIEVE+35, RETRIEVE+36, RETRIEVE+38 |
| END | RETRIEVE+2~, RETRIEVE+15 |
| HL | RETRIEVE+3~ |
| HL("ECH" | RETRIEVE+28 |
| HL("FS" | RETRIEVE+28 |
| HLA | RETRIEVE+2~ |
| HLA("HLS" | RETRIEVE+14*, RETRIEVE+15*, RETRIEVE+16* |
| HLDOM | RETRIEVE+3~ |
| HLDONE1 | RETRIEVE+3~ |
| HLECH | RETRIEVE+3~ |
| HLFS | RETRIEVE+3~ |
| HLINSTN | RETRIEVE+3~ |
| HLL | RETRIEVE+2~ |
| HLL("LINKS" | RETRIEVE+18* |
| HLMTIEN | RETRIEVE+3~ |
| HLNEXT | RETRIEVE+3~, RETRIEVE+30 |
| HLNODE | RETRIEVE+3~, RETRIEVE+31, RETRIEVE+32, RETRIEVE+33, RETRIEVE+35, RETRIEVE+36 |
| HLPARAM | RETRIEVE+3~ |
| HLQ | RETRIEVE+3~ |
| HLQUIT | RETRIEVE+3~, RETRIEVE+30 |
| I | GET+6~, ALPARSE+2~, ALPARSE+14*, ALPARSE+16, ALPARSE+23*, ALPARSE+25, ALPARSE+30*, ALPARSE+31*, ALPARSE+32*, PSPARSE+2~ , PSPARSE+5*, PSPARSE+6*, PSPARSE+16* |
| I1 | REMESC+8~, REMESC+11*, REMESC+17 |
| I2 | REMESC+8~, REMESC+12*, REMESC+13, REMESC+14 |
| ICN | RETRIEVE+3~, RETRIEVE+11*, RETRIEVE+12, RETRIEVE+15 |
| J1 | REMESC+8~, REMESC+13*, REMESC+15 |
| J2 | REMESC+8~, REMESC+14*, REMESC+17 |
| K | REMESC+8~, REMESC+16*, REMESC+17 |
| MAP | PSPARSE+2~, PSPARSE+5*, PSPARSE+6 |
| ORCACHE | GET+6~, GET+9*, GET+10 |
| ORCHR | REMESC+8~, REMESC+9* |
| ORCS | RETRIEVE+2~, RETRIEVE+4*, RETRIEVE+28*, ALPARSE+10, ALPARSE+16, ALPARSE+25, PSPARSE+7, PSPARSE+10, PSPARSE+11, PSPARSE+12 , REMESC+9 |
| ORES | RETRIEVE+2~, RETRIEVE+4*, RETRIEVE+28*, REMESC+9, REMESC+11, REMESC+12, REMESC+13, REMESC+14 |
| ORFS | RETRIEVE+2~, RETRIEVE+4*, RETRIEVE+28*, RETRIEVE+31, RETRIEVE+32, RETRIEVE+33, ALPARSE+4, ALPARSE+10, ALPARSE+11, ALPARSE+12 , ALPARSE+16, ALPARSE+18, ALPARSE+20, ALPARSE+21, ALPARSE+25, ALPARSE+27, ALPARSE+29, PSPARSE+3, REMESC+9 |
| ORHLP | RETRIEVE+3~, RETRIEVE+22 |
| ORHLP("OPEN T | IMEOUT" , RETRIEVE+19* |
| ORHLP("SUBSCRIBER" | RETRIEVE+20* |
| ORQUIT | RETRIEVE+29~*, RETRIEVE+30, RETRIEVE+31*, RETRIEVE+32*, RETRIEVE+37 |
| ORRECDT | GET+6~, GET+8*, GET+10 |
| ORREP | REMESC+8~, REMESC+10 |
| ORREP( | REMESC+9* |
| ORRET | GET+6~, GET+10*, GET+12*, GET+13*, GET+15, GET+16*, GET+17, GET+18, GET+19, GET+24 , GET+25, GET+29 |
| ORRS | RETRIEVE+2~, RETRIEVE+4*, RETRIEVE+28*, ALPARSE+14, ALPARSE+16, ALPARSE+23, ALPARSE+25, REMESC+9 |
| ORRSLT | RETRIEVE+3~, RETRIEVE+22, RETRIEVE+24, RETRIEVE+26 |
| ORSS | RETRIEVE+2~, RETRIEVE+4*, RETRIEVE+28*, REMESC+9 |
| ORSTR | REMESC~, REMESC+10*, REMESC+11, REMESC+12, REMESC+17*, REMESC+18 |
| PIECE | PSPARSE+2~ |
| PIECE( | PSPARSE+6* |
| PRE | RETRIEVE+3~ |
| RET | RETRIEVE+3~, RETRIEVE+38*, RETRIEVE+39 |
| SEQ | ALPARSE+2~, ALPARSE+3*, ALPARSE+8, ALPARSE+12, ALPARSE+21, ALPARSE+29, ALPARSE+30, ALPARSE+31, ALPARSE+32, PSPARSE+2~ , PSPARSE+4*, PSPARSE+6, PSPARSE+7, PSPARSE+8, PSPARSE+9, PSPARSE+10, PSPARSE+11, PSPARSE+12, PSPARSE+13, PSPARSE+14 , PSPARSE+15, PSPARSE+16 |
| START | RETRIEVE+2~, RETRIEVE+8*, RETRIEVE+15 |
| STATUS | RETRIEVE+3~ |
| TEMP | GET+26~*, GET+28 |
| TMP | ALPARSE+15~, ALPARSE+16*, ALPARSE+18, ALPARSE+20*, ALPARSE+21, ALPARSE+24~, ALPARSE+25*, ALPARSE+27, ALPARSE+29 |
| TMPREACT | ALPARSE+2~, ALPARSE+10*, ALPARSE+11, ALPARSE+12 |
| U | GET+8, GET+10, GET+12, GET+13, GET+19, GET+24, RETRIEVE+11, RETRIEVE+20, RETRIEVE+26, RETRIEVE+34 , RETRIEVE+37, ALPARSE+21 |
| VALUE | REMESC+8~, REMESC+15*, REMESC+16 |
| WHATOUT | RETRIEVE+3~, RETRIEVE+7*, RETRIEVE+8*, RETRIEVE+15 |
| Y | RETRIEVE+3~, RETRIEVE+10, RETRIEVE+11, ALPARSE+2~, ALPARSE+4, PSPARSE+2~, PSPARSE+3 |
| Y( | PSPARSE+6 |
| Y(10 | ALPARSE+23, ALPARSE+25 |
| Y(17 | PSPARSE+8 |
| Y(3 | ALPARSE+8, PSPARSE+8 |
| Y(4 | ALPARSE+5 |
| Y(6 | ALPARSE+10 |
| Y(9 | ALPARSE+14, ALPARSE+16, PSPARSE+9 |