Routine: PSJLIUTL

Package	Total	Call Graph
Inpatient Medications	8	($$ENDD,$$ENDTC)^PSGMI ENFD^PSGNE3 ENSTOP^PSIVCAL ($$CODES,GTOT)^PSIVUTL NFIV^PSJDIN $$DURMIN^PSJLIVMD SETTMP^PSJLMPRU $$DATE2^PSJUTL2
Kernel	2	$$FMADD^XLFDT $$LOW^XLFSTR
Order Entry Results Reporting	1	($$ES,ES)^ORX8
Registration	1	$$SETSTR^VALM1

Package	Total	Caller Graph
Inpatient Medications	2	PSJLIVFD PSJLIVMD

Entry Points

Name	Comments	DBIA/ICR reference
REQDT(ORDER)	;
LONG(Y,COL,LEN)	; Display long fields.
FLDNO(X,COL)
WDTE(Y)	; Format and print date.
WTPC	; Write provider comments.
TYPE()	; IV Type
ACT()	;
STARTDT()	; Start Date
WRTDRG(DRGT)	; Print AD/SOL drugs for "backdoor" view.
ACTIONS()
STOPDT()	; Stop Date
PROVIDER()	; Provider

External References

Name	Field # of Occurrence
$$ES^ORX8	PROVIDER+2
ES^ORX8	PROVIDER+2
$$ENDD^PSGMI	REQDT+22, REQDT+32
$$ENDTC^PSGMI	STARTDT+2, STOPDT+2, REQDT+22, REQDT+24, REQDT+32, REQDT+34
ENFD^PSGNE3	REQDT+29
ENSTOP^PSIVCAL	REQDT+30
$$CODES^PSIVUTL	TYPE+1
GTOT^PSIVUTL	FLDNO+5
NFIV^PSJDIN	WRTDRG+5
$$DURMIN^PSJLIVMD	REQDT+26
SETTMP^PSJLMPRU	LONG+10, LONG+16, WRTDRG+8, WTPC+3, WTPC+4
$$DATE2^PSJUTL2	REQDT+6, REQDT+7, REQDT+21, REQDT+31
$$SETSTR^VALM1	FLDNO+7, LONG+9, LONG+11, LONG+15, LONG+18, WRTDRG+7
$$FMADD^XLFDT	REQDT+26
$$LOW^XLFSTR	PROVIDER+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	WDTE+2
^ORD(101 - [#101]	ACTIONS+2, ACT+2
^PS(52.7 - [#52.7]	WRTDRG+3
^PS(53.1 - [#53.1]	WTPC+3, REQDT+2, REQDT+28
^PS(55 - [#55]	WTPC+4, REQDT+28

Label References

Name	Line Occurrences
LONG	WTPC+3, WTPC+4

Naked Globals

Name	Field # of Occurrence
^(0	WRTDRG+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	REQDT+14, REQDT+19
COL	FLDNO~, FLDNO+7, LONG~, LONG+9, LONG+11, LONG+15, LONG+18
>> DA	ACTIONS+2, ACT+2
>> DA(1	ACTIONS+2, ACT+2
>> DFN	WTPC+4, REQDT+28
DIC	ACTIONS+1~
>> DRG(	WRTDRG+2, WRTDRG+3
DRGT	WRTDRG~, WRTDRG+2, WRTDRG+3, WRTDRG+5
DRGX	WRTDRG+1~, WRTDRG+2*, WRTDRG+3
>> DTOUT	WTPC+3, WTPC+4
>> DUOUT	WTPC+3, WTPC+4
DUR	REQDT+25~*, REQDT+26
DURMIN	REQDT+26~*
ESIG	PROVIDER+2~*, PROVIDER+3
ESIG1	PROVIDER+2~*
LEN	LONG~, LONG+6, LONG+7, LONG+9, LONG+10, LONG+11, LONG+14, LONG+15, LONG+18
>> LINE	LONG+7*, LONG+8, LONG+11
ND0	REQDT+1~, REQDT+2*, REQDT+4
>> ON	FLDNO+7
ORDER	REQDT~, REQDT+1, REQDT+2, REQDT+5, REQDT+8, REQDT+9, REQDT+10, REQDT+11, REQDT+12, REQDT+13 , REQDT+15, REQDT+17, REQDT+18, REQDT+20, REQDT+21, REQDT+23, REQDT+25, REQDT+26, REQDT+27, REQDT+28 , REQDT+30, REQDT+33
>> P("DTYP"	STARTDT+1, STOPDT+1, PROVIDER+1
>> P("NAT"	PROVIDER+2
>> P("OT"	FLDNO+5, FLDNO+6, STARTDT+1, STOPDT+1, PROVIDER+1
>> P(17	STARTDT+1, STOPDT+1
>> P(2	STARTDT+2, REQDT+6, REQDT+15, REQDT+21, REQDT+30
>> P(21	PROVIDER+2
>> P(23	TYPE+1
>> P(3	STOPDT+2, REQDT+7, REQDT+20, REQDT+30, REQDT+31
>> P(4	FLDNO+5, TYPE+1, REQDT+15, REQDT+20, REQDT+21, REQDT+31
>> P(5	TYPE+1
>> P(6	PROVIDER+3
PARENT	REQDT+1~, REQDT+2*, REQDT+3, REQDT+16
>> PSGACT	ACTIONS+3, ACTIONS+4, ACTIONS+5, ACTIONS+6, ACTIONS+7, ACTIONS+8, ACTIONS+9, ACTIONS+11*, ACTIONS+12, ACTIONS+13
>> PSGFD	REQDT+7, REQDT+10, REQDT+11, REQDT+17, REQDT+19, REQDT+20, REQDT+26, REQDT+27, REQDT+28, REQDT+29* , REQDT+30*, REQDT+31, REQDT+32
>> PSGFDN	REQDT+32*
>> PSGNEFD	REQDT+19, REQDT+20*, REQDT+29
>> PSGNESD	REQDT+16*
>> PSGORD	REQDT+28
PSGRDTX	REQDT+1!, REQDT+2, REQDT+3, REQDT+4!, REQDT+5, REQDT+13, REQDT+18, REQDT+25
PSGRDTX(	REQDT+1, REQDT+8, REQDT+9, REQDT+10, REQDT+11, REQDT+12, REQDT+13, REQDT+15, REQDT+17, REQDT+18 , REQDT+20, REQDT+21, REQDT+23, REQDT+25, REQDT+26*, REQDT+27, REQDT+33
PSGRFD	REQDT+2, REQDT+4!, REQDT+18, REQDT+19, REQDT+20, REQDT+33, REQDT+34
PSGRFDN	REQDT+2, REQDT+4!, REQDT+34
>> PSGRSD	REQDT+2, REQDT+13, REQDT+14, REQDT+15, REQDT+23, REQDT+24
>> PSGRSDN	REQDT+2, REQDT+24
>> PSGSD	REQDT+6, REQDT+8, REQDT+9, REQDT+12, REQDT+14, REQDT+15, REQDT+16, REQDT+21*, REQDT+22, REQDT+25 , REQDT+26, REQDT+28, REQDT+29, REQDT+30
>> PSGSDN	REQDT+22*
>> PSGSRDTX	REQDT+16
PSGST	REQDT+28~*
>> PSIVAC	STARTDT+1, STOPDT+1, PROVIDER+1
>> PSIVBR	ACT+4
>> PSIVCHG	WTPC+2
>> PSIVNUM	STARTDT+1, STOPDT+1, PROVIDER+1
>> PSIVX	WTPC+3, WTPC+4
>> PSJBADD	ACTIONS+11
>> PSJHIDFG	ACT+3
>> PSJHIS	FLDNO+7
PSJIVIEN	WRTDRG+1~, WRTDRG+3*, WRTDRG+5
>> PSJL	FLDNO+7, LONG+9, LONG+10, LONG+11, LONG+15, LONG+16, LONG+18, WRTDRG+4, WRTDRG+7, WRTDRG+8 , WTPC+3, WTPC+4*
>> PSJLMX	WRTDRG+11*
PSJNF	WRTDRG+5~
PSJNF("NF"	WRTDRG+6
PSJOLDOT	FLDNO+5~*
>> PSJORD	FLDNO+7, WTPC+3, WTPC+4
>> PSJSTAR	FLDNO+4*, FLDNO+6
PSJX	WRTDRG+1~, WRTDRG+4, WRTDRG+6, WRTDRG+7
STR	LONG+4~, LONG+14, LONG+15, LONG+16, LONG+17*, LONG+18
STRLEN	LONG+4~, LONG+9, LONG+10, LONG+11
U	WRTDRG+3, WRTDRG+4, PROVIDER+3, ACTIONS+2, ACT+2, REQDT+4, REQDT+5, REQDT+13, REQDT+18, REQDT+22 , REQDT+25, REQDT+32
X	FLDNO~, FLDNO+6, FLDNO+7, LONG+8, LONG+9, LONG+10, LONG+13, LONG+14, LONG+17, WRTDRG+3 , WRTDRG+4, TYPE+1, TYPE+2, STARTDT+1, STOPDT+1, PROVIDER+1, PROVIDER+3*, PROVIDER+4, ACTIONS+1~
Y	LONG~, LONG+6, LONG+7, LONG+9, LONG+11, LONG+13, LONG+14, LONG+17, WTPC+3, WTPC+4 , WDTE~, WDTE+1, WDTE+2, WDTE+3, ACTIONS+1~, ACTIONS+2, ACTIONS+3, ACTIONS+4, ACTIONS+5, ACTIONS+6 , ACTIONS+7, ACTIONS+8, ACTIONS+9, ACTIONS+12, ACTIONS+13, ACT+1~, ACT+2, ACT+3, ACT+4

Marked Items

Name	Field # of Occurrence
$T(ES^ORX8	PROVIDER+2

Customize PDF page

Package: Inpatient Medications

Routine: PSJLIUTL

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items