Routine: PSODGAL

Package	Total	Call Graph
Adverse Reaction Tracking	3	^GMRADPT ($$ORCHK,GETCOM,GETDATA,GETREAC)^GMRAOR EN1^GMRAOR2
Outpatient Pharmacy	1	^PSORXI
VA Fileman	1	^DIR

Package

Total

Call Graph

Adverse Reaction Tracking

^GMRADPT ($$ORCHK,GETCOM,GETDATA,GETREAC)^GMRAOR EN1^GMRAOR2

Outpatient Pharmacy

^PSORXI

VA Fileman

^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSODRG

Package

Total

Caller Graph

Outpatient Pharmacy

PSODRG

Name	Comments	DBIA/ICR reference
DSPLY	;
CLASS(DFN)	;
CHK1(DFN)	;not matched to ndf
DRCL(DFN)	;
CHK(DFN,TYP,PTR)	;matched to ndf
CLASS2	;
CLASSDSP	;

Name	Field # of Occurrence
^DIR	CLASSDSP+15, DSPLY+18
^GMRADPT	CHK1+2, CLASS+7
$$ORCHK^GMRAOR	CHK+3
GETCOM^GMRAOR	CHK1+8
GETDATA^GMRAOR	CLASS+5, DRCL+6
GETREAC^GMRAOR	CHK1+7
EN1^GMRAOR2	CLASS+8
^PSORXI	CLASSDSP+16, DSPLY+20

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!,"A Drug-Allergy Reaction exists for this medication and/or class!",! Line Location: CLASSDSP+2
Function Call: WRITE	Prompt: !,"Drug: "_PSODRUG("NAME") Line Location: CLASSDSP+3
Function Call: WRITE	Prompt: !,"Drug Class: "_^TMP($J,"PSODRCLS",CT) Line Location: CLASSDSP+4
Function Call: WRITE	Prompt: ! Line Location: CLASSDSP+15
Function Call: WRITE	Prompt: $C(7),!,"A Drug-Allergy Reaction exists for this medication and/or class!",! Line Location: DSPLY+1
Function Call: WRITE	Prompt: !,?6,"Ingredients: " Line Location: DSPLY+3
Function Call: WRITE	Prompt: !?19 Condition for execution: $X+$L($G(GMRAING(I)))+2>IOM Line Location: DSPLY+6
Function Call: WRITE	Prompt: $G(GMRAING(I))_", " Line Location: DSPLY+6
Function Call: WRITE	Prompt: !?19 Condition for execution: $X+$L($G(GMRAREAC(I)))+2>IOM Line Location: DSPLY+10
Function Call: WRITE	Prompt: $G(GMRAREAC(I))_", " Line Location: DSPLY+10
Function Call: WRITE	Prompt: ! Line Location: DSPLY+18
Routine Call	DIR Line Location: CLASSDSP+15 DSPLY+18

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(120.8 - [#120.8]	CHK1+2, CHK1+3
^PS(50.605 - [#50.605]	DRCL+12
^TMP("GMRAOC"	DRCL+7, DRCL+9, DRCL+11, DRCL+15, DRCL+16, DRCL+18, DRCL+19, DRCL+22!
^TMP("PSODAI"	CHK+3!, CHK+5, CHK+6, CHK1+1!, CHK1+5*
^TMP($J	CLASS+4!, CLASS+10, CLASS+13, CLASS+14, CLASS+17, CLASS+18, CLASS2+6, CLASS2+9, CLASS2+10, CLASS2+13* , CLASS2+14*, CLASSDSP+1, CLASSDSP+4, CLASSDSP+6, CLASSDSP+7, CLASSDSP+9, CLASSDSP+10, CLASSDSP+12!
^XUSEC("PSORPH"	CHK+4, CHK1+5, DSPLY+2

Name	Line Occurrences
$$DRCL	CLASS2+2
CLASS2	CLASS+5
CLASSDSP	CLASS+20
DSPLY	CHK+7, CHK1+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGNL	CLASS+1~, CLASS+8!
AGNL("C"	CLASS+16, CLASS+17, CLASS+18
AGNL("S"	CLASS+12, CLASS+13, CLASS+14
AGNL("V"	CLASS+9, CLASS+10
APTR	CHK1+3*, CHK1+4, CHK1+10!
CC	CLASS+1~, CLASS+7*, CLASS+8
CLCHK	CLASS+1~, CLASS+6, CLASS+10, CLASS2+4, CLASS2+6, CLASS2+10, CLASS2+13, CLASS2+14
CPT	CLASS+1~, CLASS+9*, CLASS+10
CT	CLASS+1~, CLASS+9, CLASS2+4, CLASS2+5, CLASS2+6, CLASS2+8, CLASS2+9, CLASS2+10, CLASS2+12, CLASS2+13 , CLASS2+14, CLASSDSP+4*
DFN	CHK~, CHK+3, CHK1~, CLASS~, CLASS2+2, DRCL~, DRCL+6
DIR	CLASSDSP+17!, DSPLY+19!, DSPLY+21!
DIR("?"	CLASSDSP+13, CLASSDSP+14, DSPLY+4, DSPLY+5
DIR("A"	CLASSDSP+15, DSPLY+18
DIR("B"	CLASSDSP+15, DSPLY+18
DIR(0	CLASSDSP+15, DSPLY+18
DIROUT	CLASSDSP+17!, DSPLY+19!, DSPLY+21!
DIRUT	CLASSDSP+17!, DSPLY+19!, DSPLY+21!
DTOUT	CLASSDSP+17!, DSPLY+19!, DSPLY+21!
DUOUT	CLASSDSP+17!, DSPLY+19!, DSPLY+21!
DUZ	CHK+4, CHK1+5, DSPLY+2
GMRA	CHK1+2, CHK1+10!, CLASS+1~, CLASS+7
GMRACL	DRCL+8~, DRCL+9*, DRCL+11, DRCL+12, DRCL+13, DRCL+15, DRCL+16, DRCL+18, DRCL+19
GMRACOM	CHK+10!
GMRACOM(	CLASS2+12, CLASS2+13, CLASS2+14, DSPLY+14, DSPLY+15, DSPLY+16, DRCL+19*
GMRACOM(0	DSPLY+12
GMRADRCL	DRCL+5!
GMRADRCL(	CLASS2+4, CLASS2+6, DRCL+13*
GMRAING	CHK+10!
GMRAING(	CHK+6, DSPLY+6
GMRAING(0	DSPLY+3
GMRAL	CHK1+10!
GMRAL(	CHK1+2, CLASS+7
GMRALOC	DRCL+10~, DRCL+11*, DRCL+13
GMRANM	DRCL+10~, DRCL+12*, DRCL+13
GMRAREAC	CHK+10!
GMRAREAC(	CLASS2+8, CLASS2+9, CLASS2+10, DSPLY+10, DRCL+16*
GMRAREAC(0	DSPLY+8
I	CHK+6, CHK+10!, DSPLY+6, DSPLY+10*, DSPLY+21!
IOM	DSPLY+6, DSPLY+10
J	DRCL+3~, DRCL+15, DRCL+16, DRCL+18, DRCL+19
K	CLASS+12~, CLASS+13, CLASS+14, CLASS+16~, CLASS+17, CLASS+18, CLASS2+1~, CLASS2+8, CLASS2+9, CLASS2+10 , CLASS2+12, CLASS2+13, CLASS2+14, CLASSDSP+6, CLASSDSP+7, CLASSDSP+9, CLASSDSP+10, DSPLY+14*, DSPLY+15, DSPLY+16 , DSPLY+21!
L	CLASS2+1~, DSPLY+15*, DSPLY+16, DSPLY+21!
LEN	CLASS+1~, CLASS+2, CLASS+3, CLASS+9, CLASS2+5
LP	CHK1+2*, CHK1+3, CHK1+7, CHK1+8, CHK1+10!
PSOACK	CHK+3, CHK+7, CHK+10!, CHK1+2, CHK1+3, CHK1+4, CHK1+5, CHK1+9, CHK1+10!
>> PSODRUG("IEN"	CHK1+4
>> PSODRUG("NAME"	CLASSDSP+3, DSPLY+3
>> PSODRUG("VA C	LASS" , CLASS+3, CLASS+9, CLASS2+5
PTR	CHK~, CHK+3
RET	CLASS2+1~, CLASS2+2, CLASS2+3, DRCL+3~, DRCL+4, DRCL+21*, DRCL+23
TYP	CHK~, CHK+3
U	DRCL+12, DRCL+13
Y	CLASSDSP+16, CLASSDSP+17!, DSPLY+19!, DSPLY+20, DSPLY+21!

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSODGAL

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items