Routine: PSGMAR0

Package	Total	Call Graph
Inpatient Medications	6	$$ENDTC2^PSGMI ^PSGMIV ^PSGMMAR5 ^PSGPL0 PSJAC2^PSJAC DRGDISP^PSJLMUT1
Dietetics	1	CUR^FHORD7
Kernel	1	$$UP^XLFSTR
VA Fileman	1	(C,NOW)^%DTC

Package	Total	Caller Graph
Inpatient Medications	4	PSGMAR PSGMIV PSGMMAR0 PSGMMAR5

Entry Points

Name	Comments	DBIA/ICR reference
GW	; find patients in each ward
5	;Loop thru IV orders(Hyperal).
GPI	; get patient info ; PSGTMALL=1(sort by all team), PSGTM=1(individual team(S) selected).
GP	; go thru selected patients
DTSET	;
DIET	; Include abbr. diet label if indicated in the Site par.
GG	; find individual wards in this ward group
3	;Loop thru IV orders that are Piggy back and Syringes types.
2	;Loop thru UD orders
DONE	;
4	;Loop thru IV orders(Additives).
SPN	; set patient node
6	;Loop thru IV order(Chemo).
SET
GC
GL
ORSET	; order record set

External References

Name	Field # of Occurrence
C^%DTC	ORSET+32, SPN+15, SET+1
NOW^%DTC	PSGMAR0+9
CUR^FHORD7	DIET+7
$$ENDTC2^PSGMI	SET+3
^PSGMIV	2+12, 3+1, 4+1, 5+1, 6+1
^PSGMMAR5	GPI+14
^PSGPL0	ORSET+9
PSJAC2^PSJAC	GW+5, GP+1, GC+6, GC+11
DRGDISP^PSJLMUT1	ORSET+5
$$UP^XLFSTR	ORSET+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: PSGMAR0+9
Function Call: WRITE	Prompt: !!,"(No data found for 24 hour MAR run.)" Line Location: PSGMAR0+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	GW+1
^DPT("CN"	GW+5, DIET+6
^PS(55 - [#55]	GC+4, GC+6, GC+9, GC+11, 2+11, ORSET+1, ORSET+3
^PS(57.5 - [#57.5]	GG+1, GW+4
^PS(57.7 - [#57.7]	GPI+5
^PS(57.8 - [#57.8]	GL
^PS(59.6 - [#59.6]	DTSET+2, DTSET+3
^PS(59.7 - [#59.7]	PSGMAR0+8, DIET+4
^SC - [#44]	GC
^TMP($J	PSGMAR0+9!, GPI+16, ORSET+3, ORSET+13, ORSET+16, ORSET+20, ORSET+24, ORSET+27, SPN+4, SPN+7* , SPN+10*
^XTMP(	ORSET+33, ORSET+35, ORSET+37, SPN+16, SPN+18, SPN+20

Label References

Name	Line Occurrences
@(	PSGMAR0+9, GPI+10, GPI+11
DIET	SPN+1
DTSET	GW+5, GP+1, GC+1, GC+6, GC+11
GC	GL
GPI	GW+5, GP+1, GC+6, GC+11
GW	GG+1
ORSET	2+11
SPN	GPI+9, GPI+16, ORSET+3

Naked Globals

Name	Field # of Occurrence
^(0	GW+1, GC, GPI+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PSGMAR0+9, ORSET+32!, SPN+15!
%H	ORSET+32!, SPN+15!
%T	ORSET+32!, SPN+15!
>> A	ORSET+3*
ADM	DIET+1~, DIET+6*, DIET+7
>> CG	GL
>> CL	GL*, GC, GC+6, GC+11
DFN	DIET+1~, DIET+6*
>> DRG	ORSET+7*, ORSET+13, ORSET+16, ORSET+20, ORSET+24, ORSET+27, ORSET+35, ORSET+37
DT	ORSET+32, ORSET+33, SPN+15, SPN+16
>> FD	ORSET+1*
>> FT	DTSET+4, DTSET+5, SET, SET+2
IO	PSGMAR0+9
IOF	PSGMAR0+9
MARX	ORSET+5~
MARX(1	ORSET+7
>> ND2	ORSET+1*, ORSET+7, ORSET+8, ORSET+10
>> PPN	GPI+7*, GPI+8, GPI+16, ORSET+13, ORSET+16, ORSET+20, SPN+4
>> PSGAPWDN	GC*
>> PSGCAD	GC+3, GC+4, GC+6, GC+8, GC+9, GC+11
>> PSGCLNC	ORSET+19
PSGDEM	ORSET+30~, ORSET+35, ORSET+37, ORSET+38, SPN+13~, SPN+18, SPN+20, SPN+21
>> PSGDT	PSGMAR0+9*
>> PSGINCL	ORSET+27, ORSET+34, SPN+7, SPN+17
>> PSGINCLG	ORSET+24, ORSET+36, SPN+10, SPN+19
>> PSGINWD	ORSET+19
>> PSGINWDG	ORSET+16
PSGMAR	ORSET+9!
PSGMAR(	ORSET+9
PSGMAR24	GPI+12~, GPI+13*, GPI+15!
>> PSGMARB	GPI+9
>> PSGMARDT	GW+5, GP+1, GC+1, GC+6, GC+11, DTSET+1
>> PSGMARED	2+11*
>> PSGMARFD	SPN+2, SET*
>> PSGMARFP	SPN+2, SET+3*
>> PSGMARO	2+11*, ORSET+1, ORSET+3, ORSET+5, ORSET+7, ORSET+9
>> PSGMARSD	SPN+2, SET*
>> PSGMARSP	SPN+2, SET+3*
PSGMARWC	2+9~, 2+10*, 2+11
>> PSGMARWD	GG+1*, GW+1, GW+4, GPI+5
>> PSGMARWG	GG+1, GW+4*
>> PSGMARWN	PSGMAR0+9, GW+1, GW+5, GPI+2, GPI+16, 2+10, 2+11, ORSET+3*, ORSET+13, ORSET+16 , ORSET+19, ORSET+20, ORSET+24, ORSET+27, ORSET+34, ORSET+35, ORSET+36, ORSET+37, SPN+4, SPN+7 , SPN+10, SPN+17, SPN+18, SPN+19, SPN+20, DIET+6
PSGMFOR	DONE+1!, ORSET+1*
>> PSGMSORT	PSGMAR0+8*, ORSET+13, ORSET+16, ORSET+20, ORSET+24, ORSET+27, ORSET+35, ORSET+37
>> PSGMTYPE	GPI+10, GPI+11
>> PSGP	GW+5, GP+1, GC+5, GC+6, GC+10, GC+11, GPI+7, 2+11, ORSET+1, ORSET+3 , ORSET+5, DIET+6
>> PSGP(0	GPI+7, SPN+2
>> PSGPAT(	GP+1
>> PSGPLC	ORSET+8*
>> PSGPLF	ORSET+1, ORSET+8, SPN+2, DTSET+1, SET+1, SET+2*, SET+3
>> PSGPLO	ORSET+9*
>> PSGPLS	GC+3, GC+8, 2+11, ORSET+8, SPN+2, DTSET+1, SET+2, SET+3
>> PSGRBPPN	GPI+8, ORSET+34, ORSET+36, SPN+17, SPN+19
>> PSGREP	ORSET+31, ORSET+33, ORSET+35, ORSET+37, SPN+14, SPN+16, SPN+18, SPN+20
>> PSGSS	PSGMAR0+9, GPI+2, GPI+4, GPI+16, ORSET+13, ORSET+16, ORSET+19, ORSET+21, ORSET+24, ORSET+27 , ORSET+34, ORSET+36, SPN+4, SPN+7, SPN+10, SPN+17, SPN+19
>> PSGTM	GPI+4, GPI+6
>> PSGTM(	GPI+6
>> PSGTMALL	GPI+4, GPI+6
>> PSJACNWP	PSGMAR0+9*
PSJDIET	SPN+4, SPN+7, SPN+10, SPN+13, DIET+1!, DIET+7*
PSJMPAR	DIET+1~, DIET+4*, DIET+5
>> PSJPAD	SPN+2
>> PSJPAGE	SPN+2
>> PSJPDOB	SPN+2
>> PSJPDX	SPN+2
>> PSJPHT	SPN+2
>> PSJPHTD	SPN+2
>> PSJPRB	GPI+3*, GPI+5, GPI+8, SPN+4
>> PSJPSEX	SPN+2
>> PSJPTD	SPN+2
>> PSJPWD	SPN+2, DTSET+2
>> PSJPWDN	GPI+2
>> PSJPWT	SPN+2
>> PSJPWTD	SPN+2
>> PSJSYSW	DTSET+2*, DTSET+3
>> PSJSYSW0	DTSET+3*, DTSET+4
>> PST	2+11, 2+12, 3+1, 4+1, 5+1, 6+1, ORSET+7
>> Q	ORSET+9*
>> QST	ORSET+7*, ORSET+8, ORSET+9, ORSET+10, ORSET+13, ORSET+16, ORSET+20, ORSET+24, ORSET+27, ORSET+35 , ORSET+37
>> QX	ORSET+9*
>> SD	ORSET+1*
>> ST	DTSET+4, DTSET+5, SET, SET+1, SET+2
SUB1	GPI+8~*, GPI+16, ORSET+3, ORSET+24, ORSET+27, ORSET+35, ORSET+37, SPN+7, SPN+10, SPN+18 , SPN+20
SUB2	GPI+8~*, GPI+16, ORSET+3, ORSET+24, ORSET+27, ORSET+35, ORSET+37, SPN+7, SPN+10, SPN+18 , SPN+20
>> T	ORSET+1*
>> TM	GPI+2, GPI+4, GPI+5*, GPI+6, GPI+16, ORSET+3, ORSET+24, ORSET+27, ORSET+35, ORSET+37 , SPN+7, SPN+10, SPN+18, SPN+20
U	PSGMAR0+8, ORSET+7, ORSET+8, ORSET+33, SPN+2, SPN+4, SPN+7, SPN+10, SPN+13, SPN+16 , DIET+5
>> VA("PID"	SPN+2
>> X	ORSET+1, ORSET+8, ORSET+9, ORSET+10, ORSET+13, ORSET+16, ORSET+20, ORSET+24, ORSET+27, ORSET+30 , ORSET+33, ORSET+38, SPN+2, SPN+4, SPN+7, SPN+10, SPN+13, SPN+16, SPN+21*, SET+1
>> X1	ORSET+32, SPN+15, SET+1*
>> X2	ORSET+32, SPN+15, SET+1*
>> XTYPE	GPI+10, GPI+11
>> Y	DIET+3*, DIET+7

Customize PDF page

Package: Inpatient Medications

Routine: PSGMAR0

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: