Routine: PSJMDWS

Package	Total	Call Graph
Inpatient Medications	7	ENKV^PSGSETU ^PSJAC ($$ENDATE,$$MEDTYPE,$$PRN,$$STDATE)^PSJMDIR $$GWP^PSJMDIR1 (,MEDTYPE,WARD)^PSJMEDS ^PSJMPRT ($$SELDEV,EXIT,EXITDEV,SETPRTQ,SETSORTQ)^PSJMUTL
Registration	1	DEM^VADPT
VA Fileman	1	C^%DTC

Package	Total	Caller Graph
Inpatient Medications	1	PSJ MDWS

Entry Points

Name	Comments	DBIA/ICR reference
PRTQ	;*** Entry when queue to the printer.
ENLM	;Enrty Point for PSJ LM MDWS protocol
ASK	;***Prompt for selection creteria. Quit when PSJSTOP=1
EN
EXIT	;
SORTQ	;*** Entry when queue to do the sorting.

External References

Name	Field # of Occurrence
C^%DTC	ASK+3, ENLM+6
ENKV^PSGSETU	EXIT+3
^PSJAC	SORTQ+5
$$ENDATE^PSJMDIR	ASK+4, ENLM+7
$$MEDTYPE^PSJMDIR	ASK+6, ENLM+8
$$PRN^PSJMDIR	ASK+2, ENLM+5
$$STDATE^PSJMDIR	ASK+3, ENLM+6
$$GWP^PSJMDIR1	ASK+5
^PSJMEDS	SORTQ+2, SORTQ+4
MEDTYPE^PSJMEDS	SORTQ+5
WARD^PSJMEDS	SORTQ+3
^PSJMPRT	PRTQ+1
$$SELDEV^PSJMUTL	ASK+7, ENLM+9
EXIT^PSJMUTL	EXIT+2
EXITDEV^PSJMUTL	EXIT+2
SETPRTQ^PSJMUTL	SORTQ+10
SETSORTQ^PSJMUTL	EN+4
DEM^VADPT	ENLM+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	PSJMDWS+4!, EXIT+1!, ENLM+2!

Label References

Name	Line Occurrences
ASK	PSJMDWS+5
EN	ENLM+10
EXIT	PSJMDWS+5, EN, SORTQ+6
SORTQ	EN+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADMIN	SORTQ+1~
CD	SORTQ+1~
>> DFN	ENLM+3*
DRG	SORTQ+1~
DRGI	SORTQ+1~
DRGN	SORTQ+1~
DRGT	SORTQ+1~
IO("Q"	EN
MID	SORTQ+1~
MN	SORTQ+1~
ND	SORTQ+1~
ND1	SORTQ+1~
OD	SORTQ+1~
ON	SORTQ+1~
PFLG	EXIT+4!
PLSD	SORTQ+1~
PPN	SORTQ+5, EXIT+4!, ENLM+4
PSGEXPDT	EXIT+4!
PSGIO	SORTQ+6, EXIT+4!
PSGLFD	EXIT+4!
PSGLOD	EXIT+4!
PSGLSD	EXIT+4!
PSGMAR	EXIT+4!
PSGMARWD	EXIT+4!
PSGMFOR	EXIT+4!
PSGMTYPE	EXIT+4!, ASK+6, ENLM+8
PSGOES	EXIT+4!
PSGON	EXIT+4!
PSGP	SORTQ+5*, EXIT+4!, ENLM+3, ENLM+4
PSGP(0	ENLM+3*, ENLM+4
PSGPAT	EXIT+4!
PSGPAT(	SORTQ+5, ENLM+4*
PSGPG	EXIT+4!
PSGPLC	EXIT+4!
PSGPLF	EXIT+4!, ASK+4, ENLM+7
PSGPLO	EXIT+4!
PSGPLS	EXIT+5!, ASK+3, ENLM+6
PSGRBADM	EXIT+5!
PSGRBPPN	EXIT+5!
PSGRETF	EXIT+5!
PSGS0XT	EXIT+5!
PSGS0Y	EXIT+5!
PSGSS	SORTQ+2, SORTQ+3, SORTQ+4, SORTQ+5, EXIT+5!, ENLM+4*
PSGTM	EXIT+5!
PSGTMALL	EXIT+5!
PSGTMP	EXIT+5!, ASK+3, ASK+4, ENLM+6, ENLM+7
PSGTMP1	EXIT+5!, ASK+3, ASK+4, ENLM+6, ENLM+7
PSGWD	EXIT+5!, ASK+6, ENLM+8
PSGWG	SORTQ+4*, EXIT+5!
PSGWGNM	EXIT+5!
PSGWN	EXIT+6!
PSGWN1	EXIT+6!
PSIVUP	SORTQ+1~
PSJACNWP	SORTQ+5*, EXIT+6!
PSJADT	EXIT+6!
PSJADT1	EXIT+6!
PSJADTME	EXIT+6!
PSJADTO	EXIT+6!
PSJASTR	EXIT+7!
PSJATME	EXIT+7!
PSJATME1	EXIT+6!
PSJATMEO	EXIT+6!, EXIT+7!
PSJDOS	EXIT+7!
PSJHL1	EXIT+7!
PSJHL2	EXIT+7!
PSJHL3	EXIT+7!
PSJHL62	EXIT+7!
PSJHOLD	EXIT+7!
PSJLN	EXIT+7!
>> PSJMDWS	ENLM+4*
PSJMPRN	EXIT+7!, ASK+2, ENLM+5
PSJMR	EXIT+7!
PSJNEED	EXIT+7!
PSJONCAL	EXIT+7!
PSJONETM	EXIT+7!
PSJORIFN	SORTQ+1~
PSJPLC	EXIT+8!
PSJPRB	EXIT+8!
PSJPRT	EXIT+8!
PSJPWDN	EXIT+8!
PSJPWDO	EXIT+8!
PSJSCHE	EXIT+8!
PSJSI	EXIT+8!
PSJSTOP	PSJMDWS+4, PSJMDWS+5, EXIT+8!, ENLM+2
PSJTOTLN	EXIT+8!
PST	SORTQ+1~
QST	SORTQ+1~
RBNO	SORTQ+1~
ST	SORTQ+1~
T	SORTQ+1~
TM	SORTQ+1~
TMNO	SORTQ+1~
TS	SORTQ+1~
UD0	SORTQ+1~
UD2	SORTQ+1~
VADM	ENLM+2~, ENLM+3!
VADM(1	ENLM+3
>> X	ASK+3, ENLM+6
>> X1	ASK+3, ENLM+6
>> X2	ASK+3, ENLM+6
XDESC	EN+1~, EN+2, EN+4, SORTQ+7~, SORTQ+8, SORTQ+10
XSAVE	EN+1~, EN+3, EN+4, SORTQ+7~, SORTQ+9, SORTQ+10
XTRTN	EN+1~, EN+4, SORTQ+7~, SORTQ+10
XTYPE	SORTQ+1~
>> Y	ASK+2, ASK+3, ASK+4, ASK+6, ENLM+5, ENLM+6, ENLM+7, ENLM+8
ZSTOP	EXIT+8!
ZTQUEUED	EXIT+8!

Customize PDF page

Package: Inpatient Medications

Routine: PSJMDWS

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: