Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSJORRN

Package: Inpatient Medications

Routine: PSJORRN


Information

PSJORRN ;BIR/MV - RETURN INPATIENT ACTIVE MEDS (CONDENSED) NEW SORT ;Jun 17, 2020@13:03:40

Source Information

Source file <PSJORRN.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Inpatient Medications 4 $$CODES^PSIVUTL  $$LASTREN^PSJLMPRI  ($$OIDF,DRGDISP)^PSJLMUT1  $$MR^PSJORRE1  
Kernel 1 $$UP^XLFSTR  
VA FileMan 1 NOW^%DTC  

Entry Points

Name Comments DBIA/ICR reference
OCL(DFN,BDT,EDT,TFN) ; return condensed list of inpat meds
; MVIEW=2 - This is the new sort with GUI 27
; Execute this section if MVIEW=2
UDTMP ;*** Set ^TMP for Unit dose orders.
IVTMP ;*** Set ^TMP for IV orders.
STAT(Y,X) ;* Return the full status instead of just the code for U/D.
TYPE ;determine if this is an IMO order or not

External References

Name Field # of Occurrence
NOW^%DTC OCL+7
$$CODES^PSIVUTL UDTMP+9, IVTMP+25, IVTMP+26
$$LASTREN^PSJLMPRI UDTMP+4, IVTMP+7
$$OIDF^PSJLMUT1 IVTMP+29
DRGDISP^PSJLMUT1 UDTMP+13
$$MR^PSJORRE1 UDTMP+16, IVTMP+30
$$UP^XLFSTR UDTMP+27

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.7 - [#50.7] UDTMP+24, IVTMP+16
^PS(52.6 - [#52.6] IVTMP+20
^PS(52.7 - [#52.7] IVTMP+22
^PS(53.1 - [#53.1] OCL+12, IVTMP+25, TYPE+1
^PS(55 - [#55] OCL+11, OCL+13, UDTMP+17, IVTMP+26, TYPE+2
^SC - [#44] UDTMP+20, IVTMP+15
^TMP("PS" OCL+19*
^TMP("PSJTMP" OCL+14, OCL+15, OCL+16, OCL+19, OCL+20!, UDTMP+28*, UDTMP+29!*, UDTMP+31*, UDTMP+32*, UDTMP+33*
, UDTMP+34*, UDTMP+35*, UDTMP+36*, UDTMP+37*, IVTMP+20*, IVTMP+21*, IVTMP+22*, IVTMP+23*, IVTMP+31*, IVTMP+32!*
, IVTMP+34*, IVTMP+37*, IVTMP+38*, IVTMP+39*, IVTMP+40*, IVTMP+41*, IVTMP+42*, IVTMP+43*
^VA(200 - [#200] UDTMP+31, IVTMP+34

Label References

Name Line Occurrences
@( OCL+12
IVTMP OCL+13
TYPE UDTMP+3, IVTMP+5
UDTMP OCL+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% OCL+3~, OCL+7
A OCL+3~, TYPE+1*, TYPE+2*, TYPE+3
ADM OCL+3~, IVTMP+25*, IVTMP+26*, IVTMP+40
BDT OCL~, OCL+7*, OCL+11, OCL+13
CNT OCL+3~, UDTMP+27*, IVTMP+6*, IVTMP+19*, IVTMP+20*, IVTMP+21*, IVTMP+22*, IVTMP+23
DFN OCL~, OCL+11, OCL+12, OCL+13, UDTMP+4, UDTMP+13, UDTMP+17, IVTMP+7, IVTMP+26, TYPE+2
DN OCL+3~, UDTMP+13, IVTMP+20*, IVTMP+22*, IVTMP+28*, IVTMP+29*, IVTMP+31
DN(1 UDTMP+28
DO OCL+3~, UDTMP+12*, UDTMP+28, IVTMP+28*, IVTMP+31
EDT OCL~, OCL+8*, OCL+9*, UDTMP+6, UDTMP+7, IVTMP+4
EDTCMPLX UDTMP+1~, UDTMP+5*, UDTMP+6, UDTMP+7, IVTMP+1~, IVTMP+2*, IVTMP+3*, IVTMP+4
F OCL+3~, OCL+11*, OCL+12*, OCL+13*, UDTMP+2, UDTMP+5, UDTMP+6, UDTMP+7, UDTMP+8, UDTMP+10
, UDTMP+12, UDTMP+15, UDTMP+19, UDTMP+20, UDTMP+30, UDTMP+37, IVTMP+3, IVTMP+4, IVTMP+6, IVTMP+9
, IVTMP+11, IVTMP+12, IVTMP+20, IVTMP+22, IVTMP+25, IVTMP+26, IVTMP+28, IVTMP+30, IVTMP+33, IVTMP+35
, IVTMP+43, TYPE+1, TYPE+2
FON OCL+3~, UDTMP+2*, UDTMP+4, UDTMP+9, UDTMP+12*, UDTMP+13, UDTMP+15, UDTMP+17, UDTMP+28, IVTMP+6*
, IVTMP+7, IVTMP+25, IVTMP+26, IVTMP+31
>> GP UDTMP+22*, UDTMP+23, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35, UDTMP+36
, UDTMP+37, IVTMP+13*, IVTMP+14, IVTMP+20, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+31, IVTMP+32, IVTMP+34
, IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43
INFUS OCL+3~, IVTMP+24*, IVTMP+25*, IVTMP+26*, IVTMP+31
INST OCL+3~, UDTMP+2*, UDTMP+10*, UDTMP+34, IVTMP+24*, IVTMP+30*, IVTMP+38
IVLIM IVTMP+1~, IVTMP+2*, IVTMP+35*, IVTMP+36*, IVTMP+42
LOC UDTMP+1~, UDTMP+19*, UDTMP+20*, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35
, UDTMP+36, UDTMP+37, IVTMP+1~, IVTMP+2*, IVTMP+15*, IVTMP+20, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+31
, IVTMP+32, IVTMP+34, IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43
MR OCL+3~, UDTMP+2*, UDTMP+16*, UDTMP+32, IVTMP+24*, IVTMP+25*, IVTMP+26*, IVTMP+30*, IVTMP+37
ND OCL+3~, IVTMP+20*, IVTMP+22*
ND0 OCL+3~, UDTMP+7*, UDTMP+9, UDTMP+16, UDTMP+21, UDTMP+28, IVTMP+4*, IVTMP+11, IVTMP+12, IVTMP+24
, IVTMP+25, IVTMP+26, IVTMP+31
ND2 OCL+3~, UDTMP+6*, UDTMP+28, UDTMP+33, UDTMP+35, IVTMP+25*
>> ND2P5 IVTMP+35*, IVTMP+36
ND6 OCL+3~, UDTMP+10*, UDTMP+11*, UDTMP+36
ND8 UDTMP+1~, UDTMP+8*, UDTMP+20
NDDSS UDTMP+1~, UDTMP+2*, UDTMP+19*, UDTMP+20, IVTMP+1~, IVTMP+2*, IVTMP+9*, IVTMP+15
NDP2 UDTMP+1~, UDTMP+5*, UDTMP+8*, UDTMP+24, IVTMP+1~, IVTMP+2*, IVTMP+3*, IVTMP+9*, IVTMP+10
NOTGIVEN UDTMP+17~*, UDTMP+28
ON OCL+3~, OCL+11*, OCL+12*, OCL+13*, UDTMP+2, UDTMP+5, UDTMP+6, UDTMP+7, UDTMP+8, UDTMP+10
, UDTMP+12, UDTMP+15, UDTMP+17, UDTMP+19, UDTMP+30, UDTMP+37, IVTMP+3, IVTMP+4, IVTMP+6, IVTMP+9
, IVTMP+20, IVTMP+22, IVTMP+25, IVTMP+26, IVTMP+28, IVTMP+30, IVTMP+33, IVTMP+35, IVTMP+43, TYPE+1
, TYPE+2
PON OCL+3~, UDTMP+2*
PRIO UDTMP+1~, UDTMP+5*, UDTMP+23, IVTMP+1~, IVTMP+2*, IVTMP+3*, IVTMP+14
PROVIDER UDTMP+1~, UDTMP+30*, UDTMP+31, IVTMP+1~, IVTMP+2*, IVTMP+33*, IVTMP+34
PSJCLIN OCL+3~, UDTMP+29, IVTMP+32, TYPE+1*, TYPE+3*
PSJDDNM UDTMP+1~
PSJOI UDTMP+1~, UDTMP+24*, IVTMP+10*, IVTMP+16, IVTMP+17
PSJOINM UDTMP+1~, UDTMP+24*, UDTMP+27*, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35
, UDTMP+36, UDTMP+37, IVTMP+16*, IVTMP+17*, IVTMP+19*, IVTMP+20, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+31
, IVTMP+32, IVTMP+34, IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43
>> PSJST UDTMP+21*, UDTMP+22, UDTMP+23, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35
, UDTMP+36, UDTMP+37, IVTMP+11*, IVTMP+12*, IVTMP+13, IVTMP+14, IVTMP+20, IVTMP+21, IVTMP+22, IVTMP+23
, IVTMP+31, IVTMP+32, IVTMP+34, IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43
>> PSJST2 UDTMP+23*, IVTMP+14*
PST OCL+3~, OCL+12*
RNWDT UDTMP+1~, UDTMP+4*, UDTMP+28, IVTMP+7*, IVTMP+31
SCH OCL+3~, UDTMP+2*, IVTMP+24*, IVTMP+25*, IVTMP+26*, IVTMP+39
SIO OCL+3~, IVTMP+25*, IVTMP+26*, IVTMP+27*, IVTMP+41
START IVTMP+1~, IVTMP+2*, IVTMP+25*, IVTMP+26*, IVTMP+31
STAT OCL+3~, UDTMP+9*, UDTMP+28, IVTMP+25*, IVTMP+26*, IVTMP+31
STOP IVTMP+1~, IVTMP+2*, IVTMP+25*, IVTMP+26*, IVTMP+31
TFN OCL~, OCL+16*, OCL+19
TFN2 OCL+3~, OCL+4*, UDTMP+26*, UDTMP+28, UDTMP+29, UDTMP+31, UDTMP+32, UDTMP+33, UDTMP+34, UDTMP+35
, UDTMP+36, UDTMP+37, IVTMP+6*, IVTMP+20, IVTMP+21, IVTMP+22, IVTMP+23, IVTMP+31, IVTMP+32, IVTMP+34
, IVTMP+37, IVTMP+38, IVTMP+39, IVTMP+40, IVTMP+41, IVTMP+42, IVTMP+43
TYPE OCL+3~, IVTMP+24*
U OCL+12, UDTMP+6, UDTMP+7, UDTMP+9, UDTMP+15, UDTMP+16, UDTMP+28, UDTMP+33, UDTMP+35, UDTMP+37
, IVTMP+4, IVTMP+20, IVTMP+22, IVTMP+24, IVTMP+25, IVTMP+26, IVTMP+28, IVTMP+29, IVTMP+31, IVTMP+35
, IVTMP+36, IVTMP+43, STAT+1
UNITS OCL+3~, UDTMP+15*, UDTMP+28
WBDT OCL+3~, OCL+11*, OCL+13*
X OCL+3~, OCL+12*, IVTMP+20*, IVTMP+22*, STAT~, STAT+1*, STAT+2
>> X1 OCL+14*, OCL+15, OCL+16, OCL+19
>> X2 OCL+14*, OCL+15, OCL+16, OCL+19
>> X3 OCL+15*, OCL+16, OCL+19
>> X4 OCL+15*, OCL+16, OCL+19
>> X5 OCL+16*, OCL+19
Y OCL+3~, IVTMP+20*, STAT~, STAT+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All