Routine: PSJLMPRU

Information

PSJLMPRU ;BIR/MLM - INPATIENT LISTMAN UD PROFILE UTILITIES ; 1/6/20 11:10am

Package	Total	Call Graph
Inpatient Medications	7	$$ENDTC2^PSGMI $$GETSIOPI^PSJBCMA5 ($$ISCLOZ,DISPCMP)^PSJCLOZ DRGDISP^PSJLMUT1 $$WS^PSJO ($$PADECL,$$PADEWD)^PSJPAD50 $$DRGFLAG^PSJPADSI
List Manager	2	$$SETSTR^VALM1 CNTRL^VALM10
Registration	1	INP^VADPT
Toolkit	1	$$GET^XPAR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 6

Package	Total	Caller Graph
Inpatient Medications	6	PSIVLB PSJLIUTL PSJLIVFD PSJLIVMD PSJLMPRI PSJLMUDE

Entry Points

Name	Comments	DBIA/ICR reference
PUD(DFN,ON,PSJF,DN)	; Setup LM profile view for UD
RNDTDSP	; Display Renewal Date - #373
PTXT(TXT,SUB,LM,RM)	; Display Instructions/dosage ordered.
SETTMP(SUB,PSJL)	;

External References

Name	Field # of Occurrence
$$ENDTC2^PSGMI	PUD+33, RNDTDSP+1
$$GETSIOPI^PSJBCMA5	PUD+53
$$ISCLOZ^PSJCLOZ	PUD+27
DISPCMP^PSJCLOZ	PUD+30
DRGDISP^PSJLMUT1	PUD+35
$$WS^PSJO	PUD+11
$$PADECL^PSJPAD50	PUD+18
$$PADEWD^PSJPAD50	PUD+20
$$DRGFLAG^PSJPADSI	PUD+21
INP^VADPT	PUD+19
$$SETSTR^VALM1	PUD+6, PUD+8, PUD+40, PUD+41, PUD+43, PUD+44, PUD+47, PUD+48, RNDTDSP+3, RNDTDSP+4
CNTRL^VALM10	PUD+7, PUD+39, PUD+51
$$GET^XPAR	PUD+14

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.1 - [#53.1]	PUD+17
^PS(53.45 - [#53.45]	PUD+53, PUD+54, PUD+55, PUD+57!
^PS(55 - [#55]	PUD+17
^PSDRUG - [#50]	PUD+23
^TMP(	SETTMP+1*

Label References

Name	Line Occurrences
PTXT	PUD+54, PUD+55
RNDTDSP	PUD+49, PUD+52
SETTMP	PUD+51, PUD+52, PTXT+12, PTXT+13, PTXT+15

Naked Globals

Name	Field # of Occurrence
^(	PUD+3, PUD+4
^(2	PUD+3
^(4	PUD+3
^(6	PUD+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	PUD~, PUD+27, PUD+53
DN	PUD~, PUD+3
>> DO	PUD+3*
DRUGNAME	PUD+25~, PUD+35
DRUGNAME(	PUD+37, PUD+40, PUD+48
DUZ	PUD+53, PUD+54, PUD+55, PUD+57
>> IOBON	PUD+51
>> IOINHI	PUD+51
>> IOINORM	PUD+51
>> IORVOFF	PUD+7, PUD+39
>> IORVON	PUD+7, PUD+39
LEN	PUD+25~*, PUD+33, RNDTDSP+1
LM	PTXT~, PTXT+8
>> ND	PUD+3*, PUD+9, PUD+10, PUD+30
>> ND14	PUD+4*
>> ND4	PUD+3*, PUD+6
>> ND6	PUD+3*, PUD+53
>> NDP2	PUD+3*, PUD+7, PUD+51
>> NF	PUD+11, PUD+23, PUD+47
ON	PUD~, PUD+3, PUD+4, PUD+11, PUD+17, PUD+21, PUD+22, PUD+23, PUD+27, PUD+35 , PUD+53
PADE	PUD+1~, PUD+14, PUD+21, PUD+47
>> PF	PUD+9*, PUD+47
>> PSGID	PUD+9*
PSGID1	PUD+25~, PUD+43
>> PSGP	PUD+11, PUD+17, PUD+21, PUD+35
>> PSJC	PUD+5, PUD+33, PUD+41
>> PSJCLIN	PUD+12
PSJCLNK	PUD+15~, PUD+18*, PUD+20
PSJDISP	PUD+22~*, PUD+23
>> PSJEXPT	PUD+25
PSJF	PUD~, PUD+3, PUD+4, PUD+11, PUD+22, PUD+23
PSJFLAG	PUD+1~, PUD+3*, PUD+7, PUD+39
PSJL	PUD+6, PUD+8, PUD+40, PUD+41, PUD+43, PUD+44, PUD+47, PUD+48, PUD+51, PUD+52* , PUD+54, PUD+55, RNDTDSP+3, RNDTDSP+4, PTXT+8, PTXT+11, PTXT+12, PTXT+13, PTXT+14*, PTXT+15 , SETTMP~, SETTMP+1
>> PSJLN	PUD+7, PUD+39, PUD+51, SETTMP+1*
>> PSJNEWOE	PUD+21
PSJORCL	PUD+15~, PUD+17*, PUD+18
>> PSJPWD	PUD+11
>> PSJS	PUD+40
>> PSJSCHT	PUD+41
>> PSJSYSU	PUD+7
PSJTXT3	PUD+53~, PUD+54*
PSJV	PUD+1~, PUD+7*, PUD+8
>> PSJX	PUD+37*, PUD+38, PUD+40, PUD+48, PUD+49
PSSD	PUD+30!
RM	PTXT~, PTXT+12, PTXT+13
>> RNDT	PUD+4*, RNDTDSP+1
RNDTDSP	RNDTDSP+1~*, RNDTDSP+2, RNDTDSP+4
RNDTPRT	PUD+36, PUD+52, PUD+56!, RNDTDSP+5
>> RTE	PUD+9*
>> SCH	PUD+3, PUD+9
>> SD	PUD+9, PUD+30
SD1	PUD+25~, PUD+43
>> SM	PUD+9*, PUD+47
>> STAT	PUD+9, PUD+10, PUD+44, PUD+51
SUB	PTXT~, PTXT+12, PTXT+13, PTXT+15, SETTMP~, SETTMP+1
TXT	PTXT~, PTXT+9
TXTLN	PUD+53~*, PUD+55
U	PUD+3, PUD+7, PUD+9, PUD+10, PUD+51
>> UDU	PUD+6
>> V	PUD+6*, PUD+7
VAIN	PUD+19~
VAIN(4	PUD+19, PUD+20
>> WRD	PTXT+9, PTXT+11, PTXT+12, PTXT+13, PTXT+14
>> WS	PUD+11, PUD+12, PUD+47
X	PUD+3, PUD+33, PUD+53~, PTXT+9

Customize PDF page

Package: Inpatient Medications