Routine: PSGMMAR

Call Graph Total: 17

Package	Total	Call Graph
Inpatient Medications	12	ENP^PSGGAO ENKV^PSGLOI ^PSGMMAR0 ^PSGMMAR1 (DH,SD)^PSGMMARH MARFORM^PSGMUTL ENDPT^PSGP ^PSGSEL (ENCV,ENKV)^PSGSETU ENDEV^PSGTI ^PSJAC ($$MEDTYPE,ADMTM,RBPPN)^PSJMDIR
VA Fileman	4	^%DT (C,NOW)^%DTC ^DIC ^DIR
Kernel	1	^%ZISC

Package

Total

Call Graph

ENP^PSGGAO ENKV^PSGLOI ^PSGMMAR0 ^PSGMMAR1 (DH,SD)^PSGMMARH MARFORM^PSGMUTL ENDPT^PSGP ^PSGSEL
(ENCV,ENKV)^PSGSETU ENDEV^PSGTI ^PSJAC ($$MEDTYPE,ADMTM,RBPPN)^PSJMDIR

VA Fileman

^%DT (C,NOW)^%DTC ^DIC ^DIR

Kernel

^%ZISC

Package	Total	Caller Graph
Inpatient Medications	7	PSGOE5 PSJU 14D MAR PSJU 7D MAR PSJU OR 14D MAR PSJU OR 7D MAR PSJU OR PAT 14D MAR PSJU OR PAT 7D MAR

Package

Total

Caller Graph

Inpatient Medications

PSGOE5 PSJU 14D MAR PSJU 7D MAR PSJU OR 14D MAR PSJU OR 7D MAR PSJU OR PAT 14D MAR PSJU OR PAT 7D MAR

Name	Comments	DBIA/ICR reference
C	;
EN	;
ENLM	;
ENOE	;
EN14	;
ENQ	; when queued
CDIC	;
DEV	;
L	;
G	;
EN1	;
ENOR
DONE	;
W	;
EN7	;
DATE	;
LDIC	;
P	;
OUT

External References

Name	Field # of Occurrence
^%DT	DATE+1
C^%DTC	DATE+3
NOW^%DTC	DATE+4
^%ZISC	ENQ+6
^DIC	G+1, W+1, CDIC+1, LDIC+1
^DIR	ENOE+1, C+4, L+2
ENP^PSGGAO	P+1
ENKV^PSGLOI	DONE+3
^PSGMMAR0	ENQ+2
^PSGMMAR1	ENQ+2
DH^PSGMMARH	DATE+1
SD^PSGMMARH	ENOE+1
MARFORM^PSGMUTL	EN1+1
ENDPT^PSGP	P+1
^PSGSEL	DATE+5
ENCV^PSGSETU	EN+2, ENLM+2
ENKV^PSGSETU	DONE+1
ENDEV^PSGTI	DEV+4
^PSJAC	ENLM+3
$$MEDTYPE^PSJMDIR	DATE+6
ADMTM^PSJMDIR	W+2
RBPPN^PSJMDIR	G+5, W+3

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "HOW MANY DAYS? (7/14) " Formatting: !! Timeout: DTIME Variable: PSGMARDF Line Location: PSGMMAR+3
Function Call: WRITE	Prompt: $C(7)," 7 OR 14 DAY MAR!!" Line Location: PSGMMAR+3
Function Call: WRITE	Prompt: ! Line Location: ENOE+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: DATE+1
Function Call: WRITE	Prompt: !!,"Enter START DATE/TIME for "_PSGMARDF_" day MAR: " Line Location: DATE+1
Function Call: WRITE	Prompt: X="^" Condition for execution: '$T $C(7) S:'$T Line Location: DATE+1
Function Call: WRITE	Prompt: $C(7),!!?5,"(No date selected, or MAR run.)" Line Location: DATE+2
Function Call: WRITE	Prompt: $C(7),!!?5,"(No patient(s) selected for MAR run.)" Line Location: OUT+0
Function Call: WRITE	Prompt: ! Line Location: G+1
Function Call: WRITE	Prompt: ! Line Location: W+1
Function Call: WRITE	Prompt: ! Line Location: C+4
Function Call: WRITE	Prompt: ! Line Location: L+2
Routine Call	DIC Line Location: G+1 W+1 CDIC+1 LDIC+1
Routine Call	DIR Line Location: ENOE+1 C+4 L+2

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

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	ENQ+2!
^XTMP(	ENQ+4!

Name	Line Occurrences
@(	DATE+5
DEV	DATE+7
DONE	PSGMMAR+4, EN+2, EN1+1, ENOE+1, DATE+2, DATE+7, ENQ+6
EN	PSGMMAR+4, EN7+1
EN1	ENLM+3
OUT	DATE+5, DATE+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DATE+4
>> %DT	DATE+1*
AD	DONE+4!
APSPATS	DONE+11!
ASTERS	DONE+4!
BD	DONE+4!
BLN	DONE+4!
>> CG	LDIC+1*
>> CL	CDIC+1*
CNTR	DONE+4!, P+1*
DA1	DONE+4!
DA2	DONE+4!
DAO	DONE+4!
DFN	DONE+8!
DIC	DONE+4!, G+1!, W+1!, CDIC+1!, LDIC+1!
DIC("A"	G+1, W+1
DIC(0	G+1, W+1, CDIC+1, LDIC+1
DIR	ENOE+1!, C+3!, L+1!
DIR("?"	C+4, L+2
DIR("A"	C+3, L+1
DIR(0	C+3, L+1
DIROUT	ENOE+1!
DIRUT	ENOE+1!
DRG	DONE+4!
DRGI	ENQ+1~
DRGN	ENQ+1~
DRGT	ENQ+1~
DRUGNAME	EN+1~
DTIME	PSGMMAR+3, DATE+1
DTOUT	ENOE+1!
DUOUT	ENOE+1!
DX	DONE+4!
EXPIRE	DONE+4!
F	EN+1~
FD	DONE+4!
HT	DONE+10!
HX	DONE+4!
IO	DEV+5
IO("Q"	DATE+7, DEV+5
L	DONE+4!
LN	ENQ+1~
LN1	DONE+4!
LN14	DONE+4!
LN2	DONE+4!
LN3	DONE+4!
LN31	DONE+4!
LN32	DONE+4!
LN4	DONE+4!
LN5	DONE+4!
LN6	DONE+4!
LN7	DONE+4!
MARLB	EN+1~
MOS	DONE+5!
MSG1	DONE+5!
MSG2	DONE+5!
N	DONE+5!
NAME	EN+1~
NAMENEED	DONE+5!
ND2	DONE+5!
NEED	DONE+5!
NG	DONE+8!
NO	DONE+8!
ON	DONE+8!
ONHOLD	DONE+10!
OPST	DONE+5!
>> ORVP	ENOR
P	ENQ+1~
PAGE	DONE+5!
PN	DONE+5!
PND	DONE+5!
PNN	DONE+5!
>> POP	DATE+7, DEV+4
PPN	DONE+5!
PRB	DONE+5!
PSEX	DONE+5!
PSGADR	DONE+5!
PSGALG	DONE+5!
>> PSGCLNC	C+2, CDIC+1
PSGD	DONE+6!
PSGDICA	P+1*, P+5!
>> PSGDT	DATE+4*
PSGDW	DONE+6!
PSGLRPH	DONE+9!
PSGMAPA	DONE+5!
PSGMAPB	DONE+5!
PSGMAPC	DONE+5!
PSGMAPD	DONE+5!
PSGMAR	DONE+6!
PSGMARB	EN1+1, DATE+6, DONE+6!, P+1
PSGMARDF	PSGMMAR+3, PSGMMAR+4, EN7+1, EN14+1*, DATE+1, DATE+3, DONE+6!, DEV+1, DEV+4, ENLM+2!
PSGMARED	DONE+6!
PSGMARFD	DATE+3*, DONE+6!
PSGMARFP	DONE+6!
PSGMARGD	DONE+6!
PSGMARO	DONE+9!
PSGMAROC	DONE+6!
PSGMAROF	EN+2!, DATE+5, DONE+6!, ENLM+3*
PSGMARPT	DONE+6!
PSGMARS	ENOE+1*, DONE+6!
PSGMARSD	DATE+3*, DONE+6!
PSGMARSM	DONE+6!
PSGMARSP	DONE+6!
PSGMARTS	DONE+7!
PSGMARWD	DATE+4, DATE+5, DATE+6, DONE+7!, W+1, W+2, P+4
PSGMARWG	DATE+4, DONE+7!, G+2, G+3*
PSGMARWN	DONE+7!
PSGMARWS	DONE+7!
PSGMPG	DONE+7!
PSGMPGN	DONE+7!
PSGMSORT	ENQ+1~
PSGMTYPE	DATE+6*, DONE+9!
PSGOENOF	DATE+5, DONE+1, DONE+10!
PSGOES	DONE+10!
PSGOP	EN+1~
PSGORD	DONE+7!
>> PSGP	DATE+5, P+1, P+2, ENOR, ENLM+3
PSGPAT	DATE+5, DONE+7!, P+1!, P+2, P+5, ENLM+3
PSGPAT(	P+2, ENLM+3
PSGPG	DONE+9!
PSGPLF	OUT!
PSGPLS	OUT!
PSGRBPPN	DATE+4*, DONE+10!
>> PSGREP	ENQ+4
PSGS0XT	DONE+10!
PSGS0Y	DONE+5!
PSGSS	DATE+5, DONE+2!, DEV+3, ENLM+3*
PSGSSH	DATE+5*, DONE+2!
PSGST	DONE+10!
PSGTIR	DONE+10!, DEV+1*
PSGTM	DONE+9!
PSGTMALL	DONE+9!
>> PSGVBY	DONE+1, DONE+2
PSGWD	DONE+10!, W+2*
PSGXDT	DONE+5!
PSIVUP	ENQ+1~
PSJACNWP	DONE+8!
PSJDIET	DONE+7!
PSJJORD	DONE+5!
PSJORIFN	ENQ+1~
>> PSJPWD	DATE+4, P+4
PSJPWDO	DATE+4, DONE+9!, P+4
PSJSTOP	DATE+5, DONE+9!, G+1, G+4, W+1, W+3, P+5, CDIC+1, LDIC+1*
PSSN	DONE+5!
PST	DONE+8!
PTM	DONE+8!
PWDN	DONE+8!
QST	DONE+8!
>> QUIT	ENLM+2
R	DONE+8!
RB	DONE+8!
RCT	DONE+8!
S	DONE+8!
SD	DONE+8!
SM	DONE+8!
SPACES	DONE+8!
T	DONE+8!
TD	DONE+8!
TM	DONE+8!
TS	DONE+8!
UP	EN+1~
VADM	ENLM+1~
WD	DONE+8!
WDN	DONE+8!
WG	DONE+8!
WGN	DONE+8!
WS	DONE+8!
WT	DONE+8!
>> X	DATE+1, DATE+3, G+2, CDIC+2, LDIC+2, DEV+1, DEV+2, DEV+3
X1	DATE+3*, DONE+8!
X2	DATE+3*, DONE+8!
XQUIT	EN+2, DONE+10!
XTYPE	DONE+9!
>> Y	ENOE+1, DATE+1, DATE+2, DATE+3, DATE+6, G+3, G+4, W+1, W+2, P+5* , CDIC+1, LDIC+1
Y1	DONE+8!
ZTDESC	DONE+10!, DEV+1*
ZTSAVE	DEV+1!
ZTSAVE(	DEV+1, DEV+2, DEV+3*
ZTSK	DEV+4!

Customize PDF page

Package: Inpatient Medications

Routine: PSGMMAR

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: