Routine: PSJEXP

Package	Total	Call Graph
Inpatient Medications	13	$$EN^PSGCT ENP^PSGGAO ($$ENDTC,$$ENMRN,$$ENNPN)^PSGMI ENUNM^PSGOU ^PSGSEL (ENCV,ENKV)^PSGSETU ENDEV^PSGTI GT55^PSIVORFB ^PSJAC (,LIST)^PSJEXP0 DRGDISP^PSJLMUT1 ADMTM^PSJPDIR $$NFWS^PSJUTL1
VA Fileman	4	^%DT NOW^%DTC ^DIC ^DIR
Kernel	1	^%ZISC

Package	Total	Caller Graph
Inpatient Medications	1	PSJ EXP

Entry Points

External References

Name	Field # of Occurrence
^%DT	DT
NOW^%DTC	ENQ
^%ZISC	DONE
^DIC	CDIC+1, LDIC+1, G, W
^DIR	C+2, L+2
$$EN^PSGCT	ENQ
ENP^PSGGAO	P
$$ENDTC^PSGMI	ENQ
$$ENMRN^PSGMI	ARSET+1
$$ENNPN^PSGMI	ARSET
ENUNM^PSGOU	LP
^PSGSEL	PSJEXP+7
ENCV^PSGSETU	PSJEXP+6
ENKV^PSGSETU	DONE
ENDEV^PSGTI	PSJEXP+13
GT55^PSIVORFB	ARSETIV
^PSJAC	LP
^PSJEXP0	ENQ+1
LIST^PSJEXP0	PSJEXP+11
DRGDISP^PSJLMUT1	ARSET+4
ADMTM^PSJPDIR	PSJEXP+8
$$NFWS^PSJUTL1	ARSET+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: C+2
Function Call: WRITE	Prompt: ! Line Location: L+2
Function Call: WRITE	Prompt: ! Line Location: G+0
Function Call: WRITE	Prompt: ! Line Location: G+0
Function Call: WRITE	Prompt: S Line Location: W+0
Function Call: WRITE	Prompt: ! Line Location: W+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: DT+0
Function Call: WRITE	Prompt: !,"No ",D," date chosen for notices run." Condition for execution: Y<0 Line Location: DT+0
Function Call: WRITE	Prompt: !!?2,"Enter the ",D," date of the range of dates to find orders about to expire.",!,"The start date and stop date may be the same." Line Location: DTM+0
Function Call: WRITE	Prompt: " The stop date may not come before the start date." Condition for execution: D="stop" Line Location: DTM+0
Function Call: WRITE	Prompt: ! Line Location: DTM+0
Routine Call	DIC Line Location: CDIC+1 LDIC+1 G W
Routine Call	DIR Line Location: C+2 L+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(42 - [#42]	Classic Fileman Calls
^SC - [#44]	Classic Fileman Calls
^PS(57.5 - [#57.5]	Classic Fileman Calls
^PS(57.8 - [#57.8]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	LW
^DPT("CN"	LW+2
^PS(55 - [#55]	LC+1, LC+2, LC+3, LC+4, LP, GS, GSIV+1, GSIV+2, ARSET, ARSET+2
^PS(57.5 - [#57.5]	LG
^PS(57.7 - [#57.7]	LP+2, LP+3
^PS(57.8 - [#57.8]	LL
^TMP("PSG"	ENQ+1!, DONE!, GS+1, GSIV+3, ARSET+6, ARSETIV+3

Label References

Name	Line Occurrences
@(	PSJEXP+7, ENQ+1
ARSET	GS
ARSETIV	GSIV+2
DONE	PSJEXP+7, PSJEXP+10, PSJEXP+11, PSJEXP+13
DT	PSJEXP+10
DTM	DT
GS	LP+5
GSIV	LP+5
LC	LL
LP	LC+2, LC+4, LW+2
LW	LG

Naked Globals

Name	Field # of Occurrence
^(	GS+1, GS+3, GSIV+3, GSIV+5, ARSET+2
^(0	LW, LP+2, GS, GSIV+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ENQ, DONE!
%DT	PSJEXP+7!, PSJEXP+10*!
%DT(0	PSJEXP+10*
ADCNT	DONE!
AM	DONE!
>> CG	LL, LDIC+1*
CHOICE	DONE!, LP+5
>> CL	LL, CDIC+1
>> CLINIC	LC+1, LC+2, LC+3, LC+4
CNT	DONE!
D	PSJEXP+10*, DONE!, DT, DTM
DFN	DONE!, ARSETIV*
DIC	PSJEXP+7!, CDIC+1!, LDIC+1!, G!, W!
DIC("A"	W*
DIC(0	CDIC+1, LDIC+1, G, W
DIR	C+1!, L+1!
DIR("?"	C+2, L+2
DIR("A"	C+1, L+1
DIR(0	C+1, L+1
DO	DONE!, ARSET+2*, ARSET+6
DOB	DONE!
DRG	DONE!, ARSET+2, ARSET+5, ARSET+6, ARSETIV+1*, ARSETIV+3
DRG("AD"	ARSETIV+1
DRG("SOL"	ARSETIV+1
DRGI	DONE!
DRGN	DONE!
DRGT	DONE!
DTIME	DT
DTOUT	DONE!
DUOUT	DONE!
FD	ENQ*, DONE!, GS, GSIV+1
FSTFLG	DONE!
GMRAREC	DONE!
IOST	PSJEXP+14
IR	DONE!, ARSETIV+1*, ARSETIV+3
>> JDFN	LC+2, LC+4
JJ	DONE!
LNCNT	DONE!
MR	DONE!, ARSET, ARSET+1, ARSET+6, ARSETIV+1*, ARSETIV+3
ND	DONE!, ARSET, ARSET+2
ND3	DONE!
ND4	DONE!
NF	DONE!
ON	DONE!, ARSETIV*
ON55	ARSETIV~
OPI	DONE!
OUT	PSJEXP+5~, PSJEXP+11
P	DONE!
P("MR"	ARSETIV+1
P(17	ARSETIV+1
P(2	ARSETIV+1
P(6	ARSETIV+1
P(8	ARSETIV+1
P(9	ARSETIV+1
POP	PSJEXP+13, DONE+2!
PPAGE	PSJEXP+5~, PSJEXP+7*
PPN	DONE+2!, LP+1*, GS+1, GS+3, GSIV+3, GSIV+5, ARSET+6, ARSETIV+3
PR	DONE+2!, ARSET, ARSET+6, ARSETIV+1, ARSETIV+3
PRIMD	DONE!
PSEX	DONE+2!
PSG	ARSET+3~, ARSET+4
PSG(1	ARSET+5
PSGDT	ENQ*, DONE+2!
PSGEXPF	PSJEXP+10*, ENQ, DONE+2!
PSGEXPS	PSJEXP+10*, ENQ, DONE+2!
PSGOD	DONE+2!
PSGP	PSJEXP+7, DONE+2!, LC+2, LC+4, LW+2, LP, LP+1, GS, GSIV+1, GSIV+2 , ARSET, ARSET+1, ARSET+2, ARSET+4, ARSETIV, P
PSGP(0	LP+1, GS+1, GSIV+3, P
PSGPTMP	PSJEXP+5~, PSJEXP+7*
PSGSS	PSJEXP+7, PSJEXP+8, PSJEXP+9, ENQ+1, DONE+2!, G*
PSGSSH	PSJEXP+7*, DONE+2!
PSGTIR	PSJEXP+12*, DONE+2!
PSIVUP	DONE!
PSJACNWP	DONE+1!, LP~*
PSJAD	DONE+1!
PSJJORD	DONE+1!, GS, GSIV+1, GSIV+2, ARSET, ARSET+1, ARSET+2, ARSET+4, ARSET+6, ARSETIV , ARSETIV+3
PSJMSG	DONE!, G, W, P*
PSJNEW	PSJEXP+5~*
PSJOPC	DONE+2!
PSJORIFN	DONE!
PSJPAD	DONE+1!, GS+3, GSIV+5
PSJPAGE	DONE+1!, GS+1, GSIV+3
PSJPDOB	DONE+1!, GS+1, GSIV+3
PSJPDX	DONE+1!, GS+1, GSIV+3
PSJPRB	DONE+1!, LP+1*, LP+2, GS+1, GSIV+3, ARSET+6, ARSETIV+3
PSJPSEX	DONE+1!, GS+1, GSIV+3
PSJPTD	DONE+1!, GS+3, GSIV+5
PSJPWD	DONE+1!, LP+2, LP+3, ARSET+1
PSJPWDN	DONE+1!, GS+1, GSIV+3, ARSET+5, ARSET+6, ARSETIV+2, ARSETIV+3
PSJPWT	DONE+1!, GS+1, GSIV+3
PSJSEL	DONE+1!
PSJSEL("C"	PSJEXP+9*
PSJSEL("TM"	LP+2, LP+4
PSJSEL("W"	PSJEXP+8*
PSJSOL	DONE+1!
PST	DONE+2!, GS, GSIV, ARSET+6, ARSETIV+3
Q	DONE+2!
RF	DONE+2!
SCH	DONE+2!, ARSET+2, ARSET+6, ARSETIV+1, ARSETIV+3
SD	ENQ*, DONE+2!, LP, GS, GSIV+1
SD1	DONE+2!, GS*, ARSET+6
SD1IV	DONE+2!, GSIV+1*, ARSETIV+3
SEX	DONE+2!
SI	DONE+2!
SLS	DONE+1!
SM	DONE+2!, ARSET+1*, ARSET+6
SNDFLG	DONE+2!
SOLCNT	DONE+2!
SSN	DONE+2!
ST	DONE+2!, ARSET, ARSET+6, ARSETIV+1, ARSETIV+3
STD	DONE+2!, ARSET+2, ARSET+6, ARSETIV+1, ARSETIV+3
>> STDTE	LC+1, LC+2, LC+3, LC+4
TEAM	DONE+2!
TEMPTM	DONE+2!, LP+3*, LP+4
TM	DONE+2!, LP+2*, LP+3, GS+1, GSIV+3, ARSET+6, ARSETIV+3
U	GS, GSIV+2, ARSET+1, ARSETIV+1
VA	DONE+2!
VA("PID"	GS+1, GSIV+3
WCNT	DONE+2!
WD	PSJEXP+7, PSJEXP+8, DONE+2!, LG, LW, W*
WDN	DONE+2!, LW*, LW+2
WG	PSJEXP+7, DONE+2!, LG, G
WRD	DONE+2!
WS	DONE+2!
WT	DONE+2!
X	PSJEXP+12, ENQ, DONE+2!, CDIC+2, LDIC+2, ARSET+1, ARSET+3~, ARSETIV~, G, DT
XQUIT	PSJEXP+6, DONE+2!
Y	PSJEXP+7, PSJEXP+10, DONE+2!, CDIC+1, LDIC+1, G, W, P, DT*
Y(0	G*, W
Y1	DONE+1!
>> ZTDESC	PSJEXP+12*
ZTDTH	PSJEXP+12!
ZTSAVE	PSJEXP+12!
ZTSAVE(	PSJEXP+12*
>> ZTSK	PSJEXP+13

Customize PDF page

Package: Inpatient Medications

Routine: PSJEXP

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: