PSJORRO ;BIR/MV-RETURN INPATIENT MEDS (CONDENSED) OLD SORT ;28 Jan 99 / 12:56 PM
Source file <PSJORRO.m>
| Package | Total | Call Graph | 
|---|---|---|
| Inpatient Medications | 4 | $$CODES^PSIVUTL $$LASTREN^PSJLMPRI ($$OIDF,DRGDISP)^PSJLMUT1 $$MR^PSJORRE1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| IVTMP | ;*** Set ^TMP for IV orders. | |
| UDTMP | ;*** Set ^TMP for Unit dose orders. | |
| TYPE | ;determine if this is an IMO order or not | |
| OCL(DFN,BDT,EDT,TFN) | ; Execute this section if MVIEW=1 | |
| STAT(Y,X) | ;* Return the full status instead of just the code for U/D. | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PS(50.7 - [#50.7] | UDTMP+24, IVTMP+17 | 
| ^PS(52.6 - [#52.6] | IVTMP+21 | 
| ^PS(52.7 - [#52.7] | IVTMP+23 | 
| ^PS(53.1 - [#53.1] | OCL+8, IVTMP+26, TYPE+1 | 
| ^PS(55 - [#55] | OCL+7, OCL+9, UDTMP+17, IVTMP+27, TYPE+2 | 
| ^SC - [#44] | UDTMP+5, UDTMP+20, IVTMP+5, IVTMP+15 | 
| ^TMP("PS" | OCL+13* | 
| ^TMP("PSJTMP" | OCL+10, OCL+11, OCL+13, OCL+14!, UDTMP+28*, UDTMP+29!*, UDTMP+31*, UDTMP+32*, UDTMP+33*, UDTMP+34* , UDTMP+35*, UDTMP+36*, IVTMP+21*, IVTMP+22*, IVTMP+23*, IVTMP+24*, IVTMP+31*, IVTMP+32!*, IVTMP+34*, IVTMP+37* , IVTMP+38*, IVTMP+39*, IVTMP+40*, IVTMP+41*, IVTMP+42* | 
| ^VA(200 - [#200] | UDTMP+31, IVTMP+34 | 
| Name | Line Occurrences | 
|---|---|
| @( | OCL+8 | 
| IVTMP | OCL+9 | 
| TYPE | UDTMP+5, IVTMP+5 | 
| UDTMP | OCL+7 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| A | OCL+1~, TYPE+1*, TYPE+2*, TYPE+3 | 
| ADM | OCL+1~, IVTMP+26*, IVTMP+27*, IVTMP+40 | 
| BDT | OCL~, OCL+4*, OCL+9 | 
| CNT | OCL+1~, IVTMP+6*, IVTMP+21*, IVTMP+22*, IVTMP+23*, IVTMP+24 | 
| DFN | OCL~, OCL+7, OCL+8, OCL+9, UDTMP+6, UDTMP+14, UDTMP+17, IVTMP+7, IVTMP+27, TYPE+2 | 
| DN | OCL+1~, UDTMP+14, IVTMP+21*, IVTMP+23*, IVTMP+28*, IVTMP+29*, IVTMP+31 | 
| DN(1 | UDTMP+28 | 
| DO | OCL+1~, UDTMP+13*, UDTMP+28, IVTMP+28*, IVTMP+31 | 
| DT | OCL+4 | 
| EDT | OCL~, OCL+5*, OCL+6*, UDTMP+8, UDTMP+9, IVTMP+4 | 
| EDTCMPLX | UDTMP+1~, UDTMP+2*, UDTMP+7*, UDTMP+8, UDTMP+9, IVTMP+1~, IVTMP+3*, IVTMP+4 | 
| F | OCL+1~, OCL+7*, OCL+8*, OCL+9*, UDTMP+3, UDTMP+7, UDTMP+8, UDTMP+9, UDTMP+11, UDTMP+12 , UDTMP+13, UDTMP+15, UDTMP+19, UDTMP+20, UDTMP+30, IVTMP+3, IVTMP+4, IVTMP+6, IVTMP+9, IVTMP+11 , IVTMP+12, IVTMP+21, IVTMP+23, IVTMP+26, IVTMP+27, IVTMP+28, IVTMP+30, IVTMP+33, IVTMP+35, TYPE+1 , TYPE+2 | 
| FON | OCL+1~, UDTMP+3*, UDTMP+6, UDTMP+10, UDTMP+13*, UDTMP+14, UDTMP+15, UDTMP+17, UDTMP+28, IVTMP+6* , IVTMP+7, IVTMP+26, IVTMP+27, IVTMP+31 | 
| >> GP | UDTMP+22*, UDTMP+23, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35, UDTMP+36 , IVTMP+13*, IVTMP+14, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+31, IVTMP+32, IVTMP+34, IVTMP+37 , IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42 | 
| INFUS | OCL+1~, IVTMP+25*, IVTMP+26*, IVTMP+27*, IVTMP+31 | 
| INST | OCL+1~, UDTMP+3*, UDTMP+11*, UDTMP+34, IVTMP+25*, IVTMP+30*, IVTMP+38 | 
| IVLIM | IVTMP+1~, IVTMP+35*, IVTMP+36*, IVTMP+42 | 
| >> LOC | UDTMP+19*, UDTMP+20*, IVTMP+15* | 
| MR | OCL+1~, UDTMP+3*, UDTMP+16*, UDTMP+32, IVTMP+25*, IVTMP+26*, IVTMP+27*, IVTMP+30*, IVTMP+37 | 
| ND | OCL+1~, IVTMP+21*, IVTMP+23* | 
| ND0 | OCL+1~, UDTMP+9*, UDTMP+10, UDTMP+16, UDTMP+21, UDTMP+28, IVTMP+4*, IVTMP+11, IVTMP+12, IVTMP+18 , IVTMP+25, IVTMP+26, IVTMP+27, IVTMP+31 | 
| ND2 | OCL+1~, UDTMP+8*, UDTMP+25, UDTMP+28, UDTMP+33, UDTMP+35, IVTMP+26* | 
| >> ND2P5 | IVTMP+35*, IVTMP+36 | 
| ND6 | OCL+1~, UDTMP+11*, UDTMP+36 | 
| >> ND8 | UDTMP+12*, UDTMP+20 | 
| NDDSS | UDTMP+1~, UDTMP+2*, UDTMP+19*, IVTMP+9*, IVTMP+15 | 
| NDP2 | UDTMP+1~, UDTMP+2*, UDTMP+7*, UDTMP+24, IVTMP+1~, IVTMP+3*, IVTMP+9*, IVTMP+10 | 
| NOTGIVEN | UDTMP+17~*, UDTMP+28 | 
| ON | OCL+1~, OCL+7*, OCL+8*, OCL+9*, UDTMP+3, UDTMP+4, UDTMP+7, UDTMP+8, UDTMP+9, UDTMP+11 , UDTMP+12, UDTMP+13, UDTMP+15, UDTMP+17, UDTMP+19, UDTMP+30, IVTMP+2, IVTMP+3, IVTMP+4, IVTMP+6 , IVTMP+9, IVTMP+21, IVTMP+23, IVTMP+26, IVTMP+27, IVTMP+28, IVTMP+30, IVTMP+33, IVTMP+35, TYPE+1 , TYPE+2 | 
| PON | OCL+1~, UDTMP+3* | 
| >> PRIO | UDTMP+23, IVTMP+14 | 
| PROVIDER | UDTMP+1~, UDTMP+2*, UDTMP+30*, UDTMP+31, IVTMP+1~, IVTMP+33*, IVTMP+34 | 
| PSJCLIN | OCL+1~, UDTMP+5, UDTMP+29, IVTMP+5, IVTMP+32, TYPE+1*, TYPE+3* | 
| PSJLOC | UDTMP+1~, UDTMP+2*, UDTMP+5*, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35 , UDTMP+36, IVTMP+1~, IVTMP+5*, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+31, IVTMP+32, IVTMP+34 , IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42 | 
| >> PSJOI | UDTMP+24*, IVTMP+10*, IVTMP+16, IVTMP+17 | 
| >> PSJOINM | UDTMP+24*, IVTMP+16*, IVTMP+17* | 
| PSJOTYP | OCL+1~, OCL+7*, OCL+8*, OCL+9*, UDTMP+4, IVTMP+2 | 
| >> PSJST | UDTMP+21*, UDTMP+22, UDTMP+23, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35 , UDTMP+36, IVTMP+11*, IVTMP+12*, IVTMP+13, IVTMP+14, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+31 , IVTMP+32, IVTMP+34, IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42 | 
| >> PSJST2 | UDTMP+23*, IVTMP+14* | 
| PSJSTP | UDTMP+1~, UDTMP+2*, UDTMP+25*, IVTMP+18* | 
| PST | OCL+1~, OCL+8* | 
| RNWDT | UDTMP+1~, UDTMP+2*, UDTMP+6*, UDTMP+28, IVTMP+7*, IVTMP+31 | 
| SCH | OCL+1~, UDTMP+3*, IVTMP+25*, IVTMP+26*, IVTMP+27*, IVTMP+39 | 
| SIO | OCL+1~, IVTMP+26*, IVTMP+27*, IVTMP+41 | 
| START | IVTMP+1~, IVTMP+26*, IVTMP+27*, IVTMP+31 | 
| STAT | OCL+1~, UDTMP+10*, UDTMP+28, IVTMP+26*, IVTMP+27*, IVTMP+31 | 
| STOP | IVTMP+1~, IVTMP+26*, IVTMP+27*, IVTMP+31 | 
| TFN | OCL~, OCL+2, OCL+13* | 
| TFN2 | OCL+1~, OCL+2*, UDTMP+27*, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35 , UDTMP+36, IVTMP+20*, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+31, IVTMP+32, IVTMP+34, IVTMP+37 , IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42 | 
| TYPE | OCL+1~, IVTMP+25* | 
| U | OCL+8, UDTMP+8, UDTMP+9, UDTMP+10, UDTMP+15, UDTMP+16, UDTMP+28, UDTMP+33, UDTMP+35, IVTMP+4 , IVTMP+21, IVTMP+23, IVTMP+25, IVTMP+26, IVTMP+27, IVTMP+28, IVTMP+29, IVTMP+31, IVTMP+35, IVTMP+36 , STAT+1 | 
| UNITS | OCL+1~, UDTMP+15*, UDTMP+28 | 
| WBDT | OCL+1~, OCL+4*, OCL+7*, OCL+9*, UDTMP+4*, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33 , UDTMP+34, UDTMP+35, UDTMP+36, IVTMP+2*, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+31, IVTMP+32 , IVTMP+34, IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42 | 
| X | OCL+1~, OCL+8*, IVTMP+21*, IVTMP+23*, STAT~, STAT+1*, STAT+2 | 
| >> X1 | OCL+10*, OCL+11, OCL+13 | 
| >> X2 | OCL+10*, OCL+11, OCL+13 | 
| >> X3 | OCL+10*, OCL+11, OCL+13 | 
| >> X4 | OCL+11*, OCL+13 | 
| >> X5 | OCL+11*, OCL+13 | 
| Y | OCL+1~, IVTMP+21*, STAT~, STAT+1 |