PSJORRN1 ;BIR/JCH-RETURN INPATIENT MEDS (CONDENSED) SECOND 'NEW' SORT ;07 Feb 07 / 12:56 PM
Source file <PSJORRN1.m>
| 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+21, IVTMP+16 |
| ^PS(52.6 - [#52.6] | IVTMP+22 |
| ^PS(52.7 - [#52.7] | IVTMP+24 |
| ^PS(53.1 - [#53.1] | OCL+8, IVTMP+27, TYPE+1 |
| ^PS(55 - [#55] | OCL+7, OCL+9, UDTMP+16, IVTMP+28, TYPE+2 |
| ^SC - [#44] | UDTMP+4, UDTMP+19, IVTMP+6, IVTMP+15 |
| ^TMP("PS" | OCL+13* |
| ^TMP("PSJTMP" | OCL+10, OCL+11, OCL+13, OCL+14!, UDTMP+26*, UDTMP+27!*, UDTMP+29*, UDTMP+30*, UDTMP+31*, UDTMP+32* , UDTMP+33*, UDTMP+34*, IVTMP+22*, IVTMP+23*, IVTMP+24*, IVTMP+25*, IVTMP+32*, IVTMP+33!*, IVTMP+35*, IVTMP+38* , IVTMP+39*, IVTMP+40*, IVTMP+41*, IVTMP+42*, IVTMP+43* |
| ^VA(200 - [#200] | UDTMP+29, IVTMP+35 |
| Name | Line Occurrences |
|---|---|
| @( | OCL+8 |
| IVTMP | OCL+9 |
| TYPE | UDTMP+4, IVTMP+6 |
| 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+27*, IVTMP+28*, IVTMP+41 |
| BDT | OCL~, OCL+4*, OCL+9 |
| CNT | OCL+1~, IVTMP+7*, IVTMP+21*, IVTMP+22*, IVTMP+23*, IVTMP+24*, IVTMP+25 |
| DFN | OCL~, OCL+7, OCL+8, OCL+9, UDTMP+5, UDTMP+13, UDTMP+16, IVTMP+8, IVTMP+28, TYPE+2 |
| DN | OCL+1~, UDTMP+13, IVTMP+22*, IVTMP+24*, IVTMP+29*, IVTMP+30*, IVTMP+32 |
| DN( | IVTMP+22* |
| DN(1 | UDTMP+25*, UDTMP+26, UDTMP+27, UDTMP+29, UDTMP+30, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, IVTMP+21* , IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+25, IVTMP+32, IVTMP+33, IVTMP+35, IVTMP+38, IVTMP+39, IVTMP+40 , IVTMP+41, IVTMP+42, IVTMP+43 |
| DO | OCL+1~, UDTMP+12*, UDTMP+26, IVTMP+29*, IVTMP+32 |
| DT | OCL+4 |
| EDT | OCL~, OCL+5*, OCL+6*, UDTMP+7, UDTMP+8, IVTMP+5 |
| EDTCMPLX | UDTMP+1~, UDTMP+6*, UDTMP+7, UDTMP+8, IVTMP+1~, IVTMP+2*, IVTMP+4*, IVTMP+5 |
| F | OCL+1~, OCL+7*, OCL+8*, OCL+9*, UDTMP+2, UDTMP+6, UDTMP+7, UDTMP+8, UDTMP+10, UDTMP+11 , UDTMP+12, UDTMP+14, UDTMP+18, UDTMP+19, UDTMP+28, IVTMP+4, IVTMP+5, IVTMP+7, IVTMP+10, IVTMP+12 , IVTMP+13, IVTMP+22, IVTMP+24, IVTMP+27, IVTMP+28, IVTMP+29, IVTMP+31, IVTMP+34, IVTMP+36, TYPE+1 , TYPE+2 |
| FON | OCL+1~, UDTMP+2*, UDTMP+5, UDTMP+9, UDTMP+12*, UDTMP+13, UDTMP+14, UDTMP+16, UDTMP+26, IVTMP+7* , IVTMP+8, IVTMP+27, IVTMP+28, IVTMP+32 |
| INFUS | OCL+1~, IVTMP+26*, IVTMP+27*, IVTMP+28*, IVTMP+32 |
| INST | OCL+1~, UDTMP+2*, UDTMP+10*, UDTMP+32, IVTMP+26*, IVTMP+31*, IVTMP+39 |
| IVLIM | IVTMP+1~, IVTMP+2*, IVTMP+36*, IVTMP+37*, IVTMP+43 |
| >> LOC | UDTMP+18*, UDTMP+19*, IVTMP+15* |
| MR | OCL+1~, UDTMP+2*, UDTMP+15*, UDTMP+30, IVTMP+26*, IVTMP+27*, IVTMP+28*, IVTMP+31*, IVTMP+38 |
| ND | OCL+1~, IVTMP+22*, IVTMP+24* |
| ND0 | OCL+1~, UDTMP+8*, UDTMP+9, UDTMP+15, UDTMP+20, UDTMP+26, IVTMP+5*, IVTMP+12, IVTMP+13, IVTMP+18 , IVTMP+26, IVTMP+27, IVTMP+28, IVTMP+32 |
| ND2 | OCL+1~, UDTMP+7*, UDTMP+22, UDTMP+26, UDTMP+31, UDTMP+33, IVTMP+27* |
| >> ND2P5 | IVTMP+36*, IVTMP+37 |
| ND6 | OCL+1~, UDTMP+10*, UDTMP+34 |
| >> ND8 | UDTMP+11*, UDTMP+19 |
| NDDSS | UDTMP+1~, UDTMP+2*, UDTMP+18*, IVTMP+1~, IVTMP+2*, IVTMP+10*, IVTMP+15 |
| NDP2 | UDTMP+1~, UDTMP+6*, UDTMP+21, IVTMP+1~, IVTMP+2*, IVTMP+4*, IVTMP+10*, IVTMP+11 |
| NOTGIVEN | UDTMP+16~*, UDTMP+26 |
| ON | OCL+1~, OCL+7*, OCL+8*, OCL+9*, UDTMP+2, UDTMP+3, UDTMP+6, UDTMP+7, UDTMP+8, UDTMP+10 , UDTMP+11, UDTMP+12, UDTMP+14, UDTMP+16, UDTMP+18, UDTMP+28, IVTMP+3, IVTMP+4, IVTMP+5, IVTMP+7 , IVTMP+10, IVTMP+22, IVTMP+24, IVTMP+27, IVTMP+28, IVTMP+29, IVTMP+31, IVTMP+34, IVTMP+36, TYPE+1 , TYPE+2 |
| PON | OCL+1~, UDTMP+2* |
| PROVIDER | UDTMP+1~, UDTMP+28*, UDTMP+29, IVTMP+1~, IVTMP+2*, IVTMP+34*, IVTMP+35 |
| PSJ30DAY | OCL+1~, OCL+2*, OCL+4 |
| PSJCLIN | OCL+1~, UDTMP+4, UDTMP+27, IVTMP+6, IVTMP+33, TYPE+1*, TYPE+3* |
| PSJLOC | UDTMP+1~, UDTMP+4*, IVTMP+1~, IVTMP+2*, IVTMP+6* |
| PSJNOW | OCL+1~, OCL+2* |
| >> PSJOI | UDTMP+21*, IVTMP+11*, IVTMP+16, IVTMP+17 |
| >> PSJOINM | UDTMP+21*, IVTMP+16*, IVTMP+17* |
| PSJOTYP | OCL+1~, OCL+7*, OCL+8*, OCL+9*, UDTMP+3, IVTMP+3 |
| >> PSJST | UDTMP+20*, IVTMP+11*, IVTMP+12*, IVTMP+13*, IVTMP+14 |
| PSJST2 | UDTMP+1~, UDTMP+20*, UDTMP+26, UDTMP+27, UDTMP+29, UDTMP+30, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34 , IVTMP+14*, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+25, IVTMP+32, IVTMP+33, IVTMP+35, IVTMP+38, IVTMP+39 , IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43 |
| PSJSTP | UDTMP+1~, UDTMP+22*, IVTMP+18* |
| PST | OCL+1~, OCL+8* |
| RNWDT | UDTMP+1~, UDTMP+5*, UDTMP+26, IVTMP+8*, IVTMP+32 |
| SCH | OCL+1~, UDTMP+2*, IVTMP+26*, IVTMP+27*, IVTMP+28*, IVTMP+40 |
| SIO | OCL+1~, IVTMP+27*, IVTMP+28*, IVTMP+42 |
| START | IVTMP+1~, IVTMP+2*, IVTMP+27*, IVTMP+28*, IVTMP+32 |
| STAT | OCL+1~, UDTMP+9*, UDTMP+26, IVTMP+27*, IVTMP+28*, IVTMP+32 |
| STOP | IVTMP+1~, IVTMP+2*, IVTMP+27*, IVTMP+28*, IVTMP+32 |
| TFN | OCL~, OCL+2, OCL+13* |
| TFN2 | OCL+1~, OCL+2*, UDTMP+24*, UDTMP+26, UDTMP+27, UDTMP+29, UDTMP+30, UDTMP+31, UDTMP+32, UDTMP+33 , UDTMP+34, IVTMP+20*, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+25, IVTMP+32, IVTMP+33, IVTMP+35, IVTMP+38 , IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43 |
| TYPE | OCL+1~, IVTMP+26* |
| U | OCL+8, UDTMP+7, UDTMP+8, UDTMP+9, UDTMP+14, UDTMP+15, UDTMP+26, UDTMP+31, UDTMP+33, IVTMP+5 , IVTMP+22, IVTMP+24, IVTMP+26, IVTMP+27, IVTMP+28, IVTMP+29, IVTMP+30, IVTMP+32, IVTMP+36, IVTMP+37 , STAT+1 |
| UNITS | OCL+1~, UDTMP+14*, UDTMP+26 |
| WBDT | OCL+1~, OCL+4*, OCL+7*, OCL+9*, UDTMP+3*, UDTMP+26, UDTMP+27, UDTMP+29, UDTMP+30, UDTMP+31 , UDTMP+32, UDTMP+33, UDTMP+34, IVTMP+3*, IVTMP+22, IVTMP+23, IVTMP+24, IVTMP+25, IVTMP+32, IVTMP+33 , IVTMP+35, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43 |
| X | OCL+1~, OCL+8*, IVTMP+22*, IVTMP+24*, 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 |
| Y | OCL+1~, IVTMP+22*, STAT~, STAT+1 |