Routine: GMRAIAD1

Package	Total	Call Graph
Uncategorized	2	($$TS,$$XCN200,SETDLMS)^VDEFEL ERR^VDEFREQ
VA Fileman	2	^%DTC $$GET1^DIQ
Adverse Reaction Tracking	1	ENTRY^GMRAIAD2
Registration	1	BLDPID^VAFCQRY

Package	Total	Caller Graph
Adverse Reaction Tracking	1	GMRAIAD2

Entry Points

External References

Name	Field # of Occurrence
^%DTC	RXAGRP1+30
$$GET1^DIQ	OBX1+10
ENTRY^GMRAIAD2	CALL
BLDPID^VAFCQRY	PID+1
$$TS^VDEFEL	OBR+5, RXAGRP1+5, RXAGRP1+6, RXAGRP1+14, RXAGRP1+33, OBX2+5, RXAGRP2+7, RXAGRP2+8, RXAGRP2+16
$$XCN200^VDEFEL	OBR+8, OBR+11, OBX1+13
SETDLMS^VDEFEL	EN+24
ERR^VDEFREQ	EN+28, EN+30

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^GMR(120.85 - [#120.85]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN+30
^GMR(120.8 - [#120.8]	OBR+19
^GMR(120.85 - [#120.85]	EN+27, OBR+14, OBX1+3, OBX1+4, OBX1+18, RXAGRP1, RXAGRP1+1, OBX2, OBX2+1, OBX2+3 , OBX10, RXAGRP2, RXAGRP2+1, RXAGRP2+4
^GMRD(120.83 - [#120.83]	OBX1+6
^TMP("HLS"	EN+18!, SAVE+9!*

Label References

Name	Line Occurrences
$$HL7RC	RXAGRP1+9, RXAGRP1+10, RXAGRP1+13, RXAGRP1+15, RXAGRP1+18, RXAGRP1+27, RXAGRP1+37, RXAGRP1+42, RXAGRP1+45, RXAGRP1+50 , OBX2+3, OBX2+4, RXAGRP2+11, RXAGRP2+20, RXAGRP2+23
CALL	OBX2
EXIT	EN+28, EN+30, RXAGRP2
OBX2	OBX1+18
RXAGRP2	OBX10
SAVE	PID+3, OBR+21, OBX1+15, RXAGRP1+21, RXAGRP1+46, RXAGRP1+51, RXAGRP1+60, RXAGRP1+67, OBX2+6, OBX10+2 , RXAGRP2+12, RXAGRP2+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADD	EN+13~, SAVE+2!*, SAVE+4, SAVE+11!
ADD(	SAVE+3*
ALRDATA	EN+13~, EN+27, EN+28, EN+29, OBR+5, OBR+8, OBR+11, OBR+19, RXAGRP1+1!
ALRDATA("LIKE"	RXAGRP1+54
ALRDATA(0	RXAGRP1+9, RXAGRP1+10, RXAGRP1+13, RXAGRP1+15, RXAGRP1+18, RXAGRP1+27, RXAGRP1+33, RXAGRP1+37, RXAGRP1+45, RXAGRP1+50
ALRDATA(1	RXAGRP1+5, RXAGRP1+6, RXAGRP1+14, RXAGRP1+30, RXAGRP1+38, RXAGRP1+42
ARRAY	EN+15~, EN+18, SAVE+5, SAVE+10
CMP	EN+15~, RXAGRP1+24, RXAGRP1+27, RXAGRP1+30, RXAGRP1+33, RXAGRP1+34, RXAGRP1+37, RXAGRP1+38*, RXAGRP1+39
DATA	EN+14~
DFN	EN+13~, EN+29*, EN+30, PID+1
DTE	EN+13~
DTP	EN+13~
EVIEN	EN~
GMRAHL	EN+15~, EN+19*, PID+1
GMRAHL("ECH"	EN+22
GMRAHL("FS"	EN+23
GMRAHL("Q"	EN+23
GMRAPID	EN+14~, PID!, PID+1, PID+3!
GMRAPID(	PID+2!
GMRAPID(1	PID+2*, PID+3
HL7RC	EN+14~, EN+23*, HL7RC+2
HLCM	EN+13~, EN+22*, EN+23, OBR+1, OBR+2, OBR+8, OBR+11, OBR+15, OBR+16, OBR+19 , RXAGRP1+27, RXAGRP1+30, RXAGRP1+33, RXAGRP1+37, RXAGRP1+38, RXAGRP1+56, RXAGRP1+57, RXAGRP1+59, RXAGRP1+65, RXAGRP2+17
HLES	EN+13~, EN+22*, EN+23, HL7RC+4
HLFS	EN+13~, EN+23*, OBR, OBR+1, OBR+2, OBR+5, OBR+8, OBR+16, OBR+20, OBR+21 , OBX1, OBX1+7, OBX1+10, OBX1+13, OBX1+14, OBX1+15, RXAGRP1+1, RXAGRP1+5, RXAGRP1+6, RXAGRP1+9 , RXAGRP1+10, RXAGRP1+13, RXAGRP1+14, RXAGRP1+15, RXAGRP1+18, RXAGRP1+21, RXAGRP1+34, RXAGRP1+39, RXAGRP1+42, RXAGRP1+45 , RXAGRP1+46, RXAGRP1+50, RXAGRP1+51, RXAGRP1+55, RXAGRP1+56, RXAGRP1+59, RXAGRP1+60, RXAGRP1+63, RXAGRP1+66, RXAGRP1+67 , OBX2+2, OBX2+3, OBX2+4, OBX2+5, OBX2+6, OBX10+1, OBX10+2, RXAGRP2+4, RXAGRP2+7, RXAGRP2+8 , RXAGRP2+11, RXAGRP2+12, RXAGRP2+17, RXAGRP2+20, RXAGRP2+23, RXAGRP2+24, SAVE+1
HLQ	EN+13~, EN+23*
HLRP	EN+13~, EN+22*, EN+23, OBR+16, OBX1+5, OBX1+6
HLSC	EN+13~, EN+22*, EN+23
I	EN+14~, PID+2, SAVE~, SAVE+3, HL7RC~, HL7RC+4*
IEN	EN+14~, OBX1+18, RXAGRP1, RXAGRP1+1, OBX2+1, OBX2+3, RXAGRP2+1, RXAGRP2+4
KEY	EN~, EN+27, EN+28, OBR+1, OBR+14, OBX1+3, OBX1+4, OBX1+10, OBX1+18, RXAGRP1 , RXAGRP1+1, OBX2, OBX2+1, OBX2+3, OBX10, RXAGRP2, RXAGRP2+1, RXAGRP2+4
LIKE	EN+14~, RXAGRP1+54*, RXAGRP1+56, RXAGRP1+57
LIKERSP	EN+14~, RXAGRP1+54*, RXAGRP1+57, RXAGRP1+64
MSHP	EN~
OCHR	HL7RC~, HL7RC+2*, HL7RC+3, HL7RC+4
OUT	EN~
OUT("HLS"	SAVE+9!
OUTX	EN+14~, PID, PID+3, OBR, OBR+1, OBR+2, OBR+5, OBR+8, OBR+16, OBR+20* , OBR+21, OBX1, OBX1+7, OBX1+10, OBX1+13, OBX1+14, OBX1+15, RXAGRP1+1, RXAGRP1+5, RXAGRP1+6 , RXAGRP1+9, RXAGRP1+10, RXAGRP1+13, RXAGRP1+14, RXAGRP1+15, RXAGRP1+18, RXAGRP1+21, RXAGRP1+24, RXAGRP1+34, RXAGRP1+39 , RXAGRP1+42, RXAGRP1+45, RXAGRP1+46, RXAGRP1+50, RXAGRP1+51, RXAGRP1+55, RXAGRP1+56, RXAGRP1+59, RXAGRP1+60, RXAGRP1+63 , RXAGRP1+66, RXAGRP1+67, OBX2+2, OBX2+3, OBX2+4, OBX2+5, OBX2+6, OBX10+1, OBX10+2, RXAGRP2+4 , RXAGRP2+7, RXAGRP2+8, RXAGRP2+11, RXAGRP2+12, RXAGRP2+16, RXAGRP2+17, RXAGRP2+20, RXAGRP2+23, RXAGRP2+24, SAVE+1 , SAVE+2, SAVE+3, SAVE+4!, SAVE+5, SAVE+11!
PTC	EN+15~
RCHR	HL7RC~, HL7RC+2*, HL7RC+4
RCHRI	HL7RC~, HL7RC+1*, HL7RC+2
S	EN+14~, EN+18, PID, OBR, OBX1, RXAGRP1+1, RXAGRP1+24, RXAGRP1+51, RXAGRP1+55, RXAGRP1+63* , OBX2+2, OBX10+1, RXAGRP2+4, RXAGRP2+16
SEPC	EN+15~
SEPE	EN+15~
SEPF	EN+15~
SEPR	EN+15~
SEPS	EN+15~
SEQ	EN+14~, PID*, PID+1
>> SITEPARM	OBR+1
>> TARGET	EN+18, EXIT, SAVE+8, SAVE+10
TYPE	HL7RC~*, HL7RC+1
U	EN+29, OBR+1, OBR+5, OBR+8, OBR+11, OBR+14, OBR+19, OBX1+4, OBX1+5, OBX1+6 , RXAGRP1+5, RXAGRP1+6, RXAGRP1+9, RXAGRP1+10, RXAGRP1+13, RXAGRP1+14, RXAGRP1+15, RXAGRP1+18, RXAGRP1+27, RXAGRP1+30 , RXAGRP1+33, RXAGRP1+37, RXAGRP1+38, RXAGRP1+42, RXAGRP1+45, RXAGRP1+50, RXAGRP1+57, RXAGRP1+64, OBX2+3, OBX2+4 , OBX2+5, OBX10+1, RXAGRP2+7, RXAGRP2+8, RXAGRP2+11, RXAGRP2+16, RXAGRP2+20, RXAGRP2+23, SAVE+8, SAVE+10
VAL	EN+14~, OBR+1, OBR+8, OBR+11, OBR+16, OBX1+4, OBX1+13, RXAGRP1+5, RXAGRP1+6, RXAGRP1+9* , RXAGRP1+10, RXAGRP1+13, RXAGRP1+14, RXAGRP1+15, RXAGRP1+18, RXAGRP1+33, RXAGRP1+37, RXAGRP1+50, RXAGRP1+56, RXAGRP1+57 , RXAGRP1+59, RXAGRP1+64, RXAGRP1+65, RXAGRP2+16*, RXAGRP2+17
>> VDEFHL	EN+19
VFLAG	EN~
X	EN+14~, OBR+14, OBR+15, OBR+16, OBR+19, OBR+20, OBX1+3, OBX1+4, RXAGRP1+30, RXAGRP1+57* , RXAGRP1+58, RXAGRP1+59, RXAGRP1+65, RXAGRP1+66, OBX2, OBX2+3, OBX2+4, OBX2+5, OBX10, OBX10+1 , RXAGRP2, RXAGRP2+4, RXAGRP2+7, RXAGRP2+8, RXAGRP2+11, RXAGRP2+16, RXAGRP2+20, RXAGRP2+23, HL7RC~, HL7RC+3 , HL7RC+4, HL7RC+5
X1	EN+14~, RXAGRP1+30*
X2	EN+14~, RXAGRP1+30*
Y	EN+14~, OBX1+3, OBX1+4, OBX1+5, OBX1+6, RXAGRP2+17*
Z	EN+14~, OBX1+3, OBX1+5, OBX1+6*, OBX1+7
>> ZTSTOP	EN+28, EN+30

Customize PDF page

Package: Adverse Reaction Tracking

Routine: GMRAIAD1

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Comments	DBIA/ICR reference
RXAGRP2
RXAGRP1
OBX2
OBX1
PID
EN(EVIEN,KEY,VFLAG,OUT,MSHP)	;
HL7RC(X)
VALID	;;VDEF HL7 MESSAGE BUILDER ; Creates HL7 V2.4 ORU^R01 message for allergy adverse reaction
CALL
LIKEQ	; LIKE set
EXIT
SAVE
OBR
OBX10