Routine: PSGMAR3

Package	Total	Call Graph
Inpatient Medications	2	$$ENDTC2^PSGMI $$SITE^PSGMMAR2
VA Fileman	1	C^%DTC

Package	Total	Caller Graph
Inpatient Medications	7	PSGMAR2 PSGMIV PSGMMAR2 PSGMMAR4 PSGMMIVC PSJORMA2 PSJORMAR

Entry Points

Name	Comments	DBIA/ICR reference
ENB	;
TS(X)	;
TMSTR	;*** Set up the Admin times to print across on the 24 hour MAR.
BOT	; bottom of MAR
HEADER	; pat info
ADD	;
ATS(PSGX)	;*** Print allergies and reactions.

External References

Name	Field # of Occurrence
C^%DTC	ADD+1
$$ENDTC2^PSGMI	HEADER+5
$$SITE^PSGMMAR2	HEADER+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Condition for execution: $G(PSGPG)&($Y) Line Location: HEADER+3
Function Call: WRITE	Prompt: !,$S(PST["C":"CONTINUOUS",1:"ONE-TIME/PRN")_" SHEET",?60,"24 HOUR MAR",?86,PSGMARSP_" through "_PSGMARFP Line Location: HEADER+3
Function Call: WRITE	Prompt: @IOF Condition for execution: $G(PSGPG)&($Y) Line Location: HEADER+4
Function Call: WRITE	Prompt: !,$S(PST["C":"CONTINUOUS",1:"ONE-TIME/PRN")_" SHEET",?30,"24 HOUR MAR",?60,PSGMARSP_" through "_PSGMARFP,?110,"Page ___ of ___" Line Location: HEADER+4
Function Call: WRITE	Prompt: !?5,$P($$SITE^PSGMMAR2(80),U,2),?101,"Printed on "_$$ENDTC2^PSGMI(PSGXDT) Line Location: HEADER+5
Function Call: WRITE	Prompt: !,"Allergies: See attached list of Allergies/Adverse Reactions" Line Location: HEADER+9
Function Call: WRITE	Prompt: !,?49,"Admin" Line Location: HEADER+13
Function Call: WRITE	Prompt: !?1,"Order",?8,"Start",?20,"Stop",?49,"Times" Line Location: HEADER+15
Function Call: WRITE	Prompt: ?59 Line Location: HEADER+15
Function Call: WRITE	Prompt: ?59 Line Location: HEADER+15
Function Call: WRITE	Prompt: !,LN1 Line Location: HEADER+16
Function Call: WRITE	Prompt: !,"Allergies: ",PSGVALG(1)," ",PSGALG(1)," ADR: ",PSGVADR(1)," ",PSGADR(1) Line Location: ATS+9
Function Call: WRITE	Prompt: !!,"Verified Allergies:",! Line Location: ATS+13
Function Call: WRITE	Prompt: ?2,PSGVALG(X),! Line Location: ATS+14
Function Call: WRITE	Prompt: "Non-Verified Allergies:",! Line Location: ATS+15
Function Call: WRITE	Prompt: ?2,PSGALG(X),! Line Location: ATS+16
Function Call: WRITE	Prompt: "Verified Adverse Reactions:",! Line Location: ATS+17
Function Call: WRITE	Prompt: ?2,PSGVADR(X),! Line Location: ATS+18
Function Call: WRITE	Prompt: "Non-Verified Adverse Reactions:",! Line Location: ATS+19
Function Call: WRITE	Prompt: ?2,PSGADR(X),! Line Location: ATS+20
Function Call: WRITE	Prompt: ! Line Location: ATS+27
Function Call: WRITE	Prompt: ?59 Line Location: TMSTR+3
Function Call: WRITE	Prompt: !?7,LN2 Line Location: BOT+2
Function Call: WRITE	Prompt: !,LN1 Line Location: ENB+2
Function Call: WRITE	Prompt: !,"\|",?12,"SIGNATURE/TITLE",?39,"\| INIT \| ALLERGIES \| INJECTION SITES \|",?87,"MED/DOSE OMITTED",?107,"\| REASON \| INIT \|" Line Location: ENB+3
Function Call: WRITE	Prompt: !,"\|"_$E(LN1,1,38)_"\|------\|--------------\|"_BLN(Q),?82,"\|"_$E(LN1,1,24)_"\|"_$E(LN1,1,16)_"\|------\|" Line Location: ENB+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	HEADER+6

Label References

Name	Line Occurrences
ADD	TMSTR+4
ATS	HEADER+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AD	HEADER+8
ADMINHR	TMSTR+2~, TMSTR+3*
>> APSPATS	ATS+26*
>> BD	HEADER+7
>> BLN(	ENB+4
>> DX	HEADER+8
HRS	TMSTR+3*, TMSTR+4, TMSTR+5!
>> HT	HEADER+7
I	ATS+1~
IOF	HEADER+4
>> LN1	HEADER+16, ENB+2, ENB+4, ENB+5
>> LN2	BOT+2
>> LN4	BOT+1, BOT+2
>> LN5	BOT+1, BOT+2
>> LN7	BOT+1, BOT+2
MPH	TMSTR+3, TMSTR+4, TMSTR+5!, ADD+1
>> MSG1	HEADER+4*, BOT+1, BOT+2
>> MSG2	HEADER+4*, BOT+1, BOT+2
>> ONHOLD	TMSTR+4
>> OPST	BOT+1, BOT+2
>> PAGE	HEADER+7
>> PPN	HEADER+6, ENB+5
>> PRB	HEADER+7, ENB+5
>> PSEX	HEADER+8
>> PSGADR	ATS+2, ATS+3, ATS+7
>> PSGADR(	ATS+20
>> PSGADR(1	ATS+7*, ATS+9
>> PSGALG	HEADER+9, ATS+2, ATS+3, ATS+5
>> PSGALG(	ATS+16
>> PSGALG(1	ATS+4, ATS+5, ATS+6*, ATS+9
>> PSGDT	HEADER+1
>> PSGFORM	HEADER+2*, ENB+5
>> PSGL	HEADER+4*
>> PSGLFFD	TMSTR+4
>> PSGMARFD	HEADER+15, TMSTR+4
>> PSGMARFP	HEADER+4
>> PSGMAROC	HEADER+4, ATS+10, ATS+25, BOT+2
>> PSGMARSD	HEADER+15, TMSTR+4
>> PSGMARSP	HEADER+4
>> PSGMPG	ENB+1*, ENB+5
>> PSGMPGN	ENB+1*, ENB+5
>> PSGPG	HEADER+4*
>> PSGPLS	TMSTR+3
>> PSGVADR	ATS+2, ATS+3
>> PSGVADR(	ATS+18
>> PSGVADR(1	ATS+9
>> PSGVALG	ATS+2, ATS+3
>> PSGVALG(	ATS+14
>> PSGVALG(1	ATS+4, ATS+6, ATS+8*, ATS+9
PSGX	HEADER+12~, ATS~, ATS+11
>> PSGXDT	HEADER+1*, HEADER+5
>> PSJDIET	HEADER+14
>> PSSN	HEADER+7, ENB+5
>> PST	HEADER+4, TS+1
>> PWDN	HEADER+6, HEADER+7, HEADER+8, ENB+5
>> Q	TMSTR+4, TS+1, TS+5, BOT+2, ENB+4*
>> QQ	TMSTR+4, BOT+1, BOT+2*
SAVE	ATS+1~, ATS+12, ATS+23, ATS+24
SAVE1	ATS+1~, ATS+24*, ATS+25
>> TD	HEADER+8
TIM	TMSTR+3, TMSTR+4, TMSTR+5!
>> TMSTR	TMSTR+3
TS	TS+1!*, TS+2, TS+3, TS+4, TS+5
TS(	TS+1, TS+5
TS(1	TS+3, TS+4
TS(3	TS+2, TS+4
TS(5	TS+3, TS+4
U	HEADER+5
>> WT	HEADER+6
X	HEADER+15, ATS+14, ATS+16, ATS+18, ATS+20*, ADD+1, TS~, TS+1, TS+2, TS+3 , TS+4, TS+5
>> X1	ADD+1*
>> X2	ADD+1*

Customize PDF page

Package: Inpatient Medications

Routine: PSGMAR3

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: