Routine: GMRCIEV1

Package	Total	Call Graph
Consult Request Tracking	5	($$CNVTD,$$ISCERNER,$$LOC,$$ROUTE,NOMPI,NW,TRIGR)^GMRCIEVT SETTCH2^GMRCIMSG ($$OBXSF,$$OBXTZ,$$ORC,OBXWP)^GMRCISEG ($$OBR,$$OBXPD)^GMRCISG1 ($$ADD2OBR,$$ADD2PID,LOGMSG)^GMRCIUTL
Health Level Seven	2	INIT^HLFNC2 GENERATE^HLMA
Kernel	2	$$FMTE^XLFDT ($$TITLE,$$UP)^XLFSTR
Registration	2	$$EN^VAFCPID $$SITE^VASITE
Master Patient Index VistA	1	($$GETICN,$$IFLOCAL)^MPIF001
VA FileMan	1	($$GET1,GETS)^DIQ

Package	Total	Caller Graph
Consult Request Tracking	1	GMRCIEVT

Name	Comments	DBIA/ICR reference
RESUB(GMRCDA,GMRCACT)	;build HL7 msg with edits from resubit
SF(GMRCDA,GMRCACT)	;send SIG FINDING update
FWD(GMRCDA,GMRCACT)	;bld HL7 msg upon FWD action
FWD2IFC(GMRCDA,GMRCACT)	;pkg up and send request upon fwd'ing into IFC serv
EXIST201(GMRCDA,GMRCACT)	;
CRNRNTE(IEN,GMRCNA)	;format an NTE seg with all comments to go to Cerner
CRNROBX(IEN,GMRCNA)	;If Add Comment going to Cerner, send ALL comments
LOC(GMRCLOC,GMRCIENS)	;DETERMINE LOCATION
SITE	;SET LOCAL SITE

External References

Name	Field # of Occurrence
$$GET1^DIQ	EXIST201+2, CRNROBX+30
GETS^DIQ	CRNRNTE+16, CRNROBX+20
$$CNVTD^GMRCIEVT	RESUB+20, RESUB+34, SF+19, SF+31, FWD+19, FWD+32
$$ISCERNER^GMRCIEVT	SF+42, FWD+43
$$LOC^GMRCIEVT	CRNROBX+28
$$ROUTE^GMRCIEVT	RESUB+64, SF+53, FWD+54
NOMPI^GMRCIEVT	RESUB+11, SF+10, FWD+10
NW^GMRCIEVT	FWD2IFC+6
TRIGR^GMRCIEVT	FWD2IFC+9
SETTCH2^GMRCIMSG	CRNRNTE+5
$$OBXSF^GMRCISEG	SF+51, FWD+52
$$OBXTZ^GMRCISEG	RESUB+63, SF+52, FWD+53
$$ORC^GMRCISEG	RESUB+26, SF+26, FWD+25
OBXWP^GMRCISEG	RESUB+40, RESUB+56, SF+44, FWD+45, CRNROBX+25
$$OBR^GMRCISG1	RESUB+30, SF+32, FWD+28
$$OBXPD^GMRCISG1	RESUB+49
$$ADD2OBR^GMRCIUTL	RESUB+34, SF+33, FWD+32
$$ADD2PID^GMRCIUTL	RESUB+20, SF+19, FWD+19
LOGMSG^GMRCIUTL	RESUB+10, RESUB+65, RESUB+69, SF+9, SF+54, SF+59, FWD+9, FWD+55, FWD+60
INIT^HLFNC2	RESUB+8, SF+7, FWD+7
GENERATE^HLMA	RESUB+67, SF+57, FWD+58
$$GETICN^MPIF001	RESUB+14, SF+13, FWD+13
$$IFLOCAL^MPIF001	RESUB+15, SF+14, FWD+14
$$EN^VAFCPID	RESUB+16, SF+15, FWD+15
$$SITE^VASITE	CRNRNTE+6, CRNROBX+10, SITE+1
$$FMTE^XLFDT	CRNRNTE+17, CRNROBX+21
$$TITLE^XLFSTR	CRNRNTE+11, CRNRNTE+13, CRNROBX+12, CRNROBX+14
$$UP^XLFSTR	CRNRNTE+17, CRNROBX+21

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
123.02	GETS^DIQ
^GMR(123.6 - [#123.6]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	CRNROBX+30, LOC+5
^GMR(123 - [#123]	RESUB+12, RESUB+20, SF+11, SF+19, SF+25, SF+40, SF+51, FWD+11, FWD+19, FWD+41 , FWD+52, FWD2IFC+5, FWD2IFC+8, CRNRNTE+15, CRNRNTE+19, CRNROBX+19, LOC+2, LOC+3
^GMR(123.1 - [#123.1]	CRNRNTE+11, CRNRNTE+13, CRNROBX+12, CRNROBX+14
^GMR(123.6 - [#123.6]	FWD2IFC+5, EXIST201+1
^TMP("GMRCCRNRCMT"	CRNROBX+16
^TMP("GMRCMT"	RESUB+55!, RESUB+56, RESUB+57, RESUB+58, RESUB+59, RESUB+61!, SF+41!, SF+43, SF+44, SF+45 , SF+46, SF+47, SF+49!, FWD+42!, FWD+44, FWD+45, FWD+46, FWD+47, FWD+48, FWD+50!
^TMP("GMRCRFR"	RESUB+39!, RESUB+40, RESUB+41, RESUB+43, RESUB+44, RESUB+46!
^TMP("HLS"	RESUB+7!, RESUB+16, RESUB+20, RESUB+26, RESUB+30, RESUB+34, RESUB+44, RESUB+50, RESUB+59, RESUB+63* , SF+6!, SF+15, SF+19, SF+26, SF+33, SF+47, SF+51, SF+52, FWD+6!, FWD+15 , FWD+19, FWD+25, FWD+33, FWD+48, FWD+52, FWD+53

Label References

Name	Line Occurrences
$$EXIST201	RESUB+65, SF+54, FWD+55
$$LOC	CRNRNTE+20
CRNROBX	SF+43, FWD+44
FWD	FWD2IFC+10
SITE	CRNRNTE+20, LOC+2

Naked Globals

Name	Field # of Occurrence
^(	CRNRNTE+15, CRNRNTE+19, CRNROBX+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CMT	CRNRNTE+3~, CRNRNTE+4*
ERR	RESUB+68~, RESUB+69, SF+58~, SF+59, FWD+59~*, FWD+60
GMRC773	RESUB+5~, RESUB+67, RESUB+68, RESUB+69, SF+4~, SF+57, SF+58, SF+59, FWD+4~, FWD+58 , FWD+59, FWD+60
GMRCACT	RESUB~, RESUB+10, RESUB+11, RESUB+26, RESUB+30, RESUB+40, RESUB+56, RESUB+65, RESUB+69, SF~ , SF+9, SF+10, SF+26, SF+40, SF+44, SF+54, SF+59, FWD~, FWD+9, FWD+10 , FWD+25, FWD+28, FWD+41, FWD+45, FWD+55, FWD+60, FWD2IFC~, FWD2IFC+10, EXIST201~, EXIST201+1 , CRNROBX+6~
GMRCACTD	CRNRNTE+3~, CRNRNTE+10, CRNRNTE+11, CRNRNTE+12, CRNRNTE+13, CRNROBX+6~, CRNROBX+11, CRNROBX+12, CRNROBX+13, CRNROBX+14
GMRCACTD(	CRNRNTE+11, CRNRNTE+13, CRNRNTE+15, CRNRNTE+18, CRNROBX+12, CRNROBX+14, CRNROBX+19, CRNROBX+23
GMRCACTN	FWD2IFC+4~, FWD2IFC+7, FWD2IFC+8, FWD2IFC+9
GMRCCRNR	SF+4~, SF+42, SF+43, SF+44, FWD+4~, FWD+43, FWD+44, FWD+45
GMRCDA	RESUB~, RESUB+10, RESUB+11, RESUB+12, RESUB+20, RESUB+26, RESUB+30, RESUB+34, RESUB+40, RESUB+49 , RESUB+56, RESUB+64, RESUB+65, RESUB+69, SF~, SF+9, SF+10, SF+11, SF+19, SF+25 , SF+26, SF+31, SF+32, SF+33, SF+40, SF+42, SF+43, SF+44, SF+51, SF+53 , SF+54, SF+59, FWD~, FWD+9, FWD+10, FWD+11, FWD+19, FWD+25, FWD+28, FWD+32 , FWD+41, FWD+43, FWD+44, FWD+45, FWD+52, FWD+54, FWD+55, FWD+60, FWD2IFC~, FWD2IFC+5 , FWD2IFC+6, FWD2IFC+8, FWD2IFC+9, FWD2IFC+10, EXIST201~, EXIST201+1
GMRCDFN	RESUB+12~, RESUB+13, RESUB+14, RESUB+15, RESUB+16, RESUB+20, SF+11~, SF+12, SF+13, SF+14 , SF+15, SF+19, FWD+11~*, FWD+12, FWD+13, FWD+14, FWD+15, FWD+19
GMRCDT	CRNRNTE+3~, CRNRNTE+17, CRNRNTE+23, CRNROBX+6~, CRNROBX+21, CRNROBX+34
GMRCENBY	CRNRNTE+3~, CRNRNTE+21, CRNRNTE+22, CRNROBX+6~, CRNROBX+32, CRNROBX+33
GMRCIENS	CRNRNTE+3~, CRNRNTE+16, CRNRNTE+17, CRNRNTE+20, CRNRNTE+21, CRNROBX+6~, CRNROBX+20, CRNROBX+21, CRNROBX+28, CRNROBX+29 , CRNROBX+30, CRNROBX+32, LOC~, LOC+2, LOC+3
GMRCIQT	RESUB+5~, RESUB+11, RESUB+13, RESUB+14, RESUB+15, SF+4~, SF+10, SF+12, SF+13, SF+14 , FWD+4~, FWD+10, FWD+12, FWD+13, FWD+14*
GMRCL	CRNRNTE+3~, CRNRNTE+19, CRNROBX+6~, CRNROBX+26
GMRCLOC	CRNRNTE+3~, CRNRNTE+6, CRNRNTE+20, CRNROBX+6~, CRNROBX+10, CRNROBX+28, LOC~, LOC+2, SITE+1*
GMRCN	CRNRNTE+3~, CRNRNTE+15, CRNRNTE+16, CRNRNTE+19, CRNROBX+6~, CRNROBX+18, CRNROBX+19*, CRNROBX+20, CRNROBX+25
GMRCNA	CRNRNTE~, CRNRNTE+18, CRNRNTE+19*, CRNRNTE+20, CRNRNTE+22, CRNRNTE+23, CRNRNTE+24, CRNRNTE+25, CRNROBX~, CRNROBX+22 , CRNROBX+23, CRNROBX+26, CRNROBX+28, CRNROBX+31, CRNROBX+33, CRNROBX+34
GMRCO	CRNROBX+6~, CRNROBX+20!
GMRCO(	CRNROBX+21, CRNROBX+28, CRNROBX+29, CRNROBX+30, CRNROBX+32
GMRCOS	SF+4~, SF+25*, FWD+4~
GMRCOUT	CRNRNTE+3~, CRNRNTE+16!
GMRCOUT(	CRNRNTE+17, CRNRNTE+21
GMRCPCS	CRNRNTE+3~
GMRCPD	RESUB+5~, RESUB+49*, RESUB+50
GMRCSITE	CRNROBX+30~*
GMRCSTDA	CRNROBX+30~*
GMRCSTNM	CRNROBX+30~*, CRNROBX+31
GMRCT	CRNRNTE+3~, CRNRNTE+15, CRNRNTE+18, CRNRNTE+19, CRNRNTE+20, CRNRNTE+22, CRNRNTE+23, CRNRNTE+24, CRNRNTE+25, CRNROBX+6~ , CRNROBX+18, CRNROBX+22, CRNROBX+23, CRNROBX+26, CRNROBX+28, CRNROBX+31, CRNROBX+33, CRNROBX+34
GMRCTMP	CRNRNTE+3~, CRNROBX+6~, CRNROBX+16*, CRNROBX+25, CRNROBX+26, CRNROBX+35
GMRCX	CRNRNTE+3~, CRNRNTE+11, CRNRNTE+13, CRNRNTE+15, CRNRNTE+18, CRNRNTE+19, CRNROBX+6~, CRNROBX+12, CRNROBX+14, CRNROBX+19* , CRNROBX+23, CRNROBX+26*
HL	RESUB+5~, RESUB+8, RESUB+9, SF+4~, SF+7, SF+8, FWD+4~, FWD+7, FWD+8
HLL	RESUB+5~, SF+4~, FWD+4~
HLL("LINKS"	RESUB+64, RESUB+66, SF+53, SF+55, FWD+54*, FWD+56
>> HLP	RESUB+67, SF+57, FWD+58
>> HLP("SUBSCRIBER"	RESUB+66, SF+55, FWD+56*
I	RESUB+42~, RESUB+43, RESUB+44, RESUB+54~, RESUB+58, RESUB+59, SF+46~, SF+47, FWD+47~*, FWD+48
IEN	CRNRNTE~, CRNRNTE+15, CRNRNTE+16, CRNRNTE+19, CRNROBX~, CRNROBX+19, CRNROBX+20, CRNROBX+25
IEN123P6	EXIST201+1~*, EXIST201+2
LOCNAME	CRNROBX+6~, CRNROBX+28, LOC+1~, LOC+3, LOC+4, LOC+5, LOC+6
OBR	SF+4~, SF+32, SF+33, SF+38, FWD+4~, FWD+28, FWD+32, FWD+33, FWD+39
PROSTHCS	SF+4~, SF+38, SF+43, SF+44, FWD+4~, FWD+39, FWD+44, FWD+45
SEG	RESUB+5~, RESUB+6, RESUB+16, RESUB+20, RESUB+22, RESUB+26, RESUB+27, RESUB+30, RESUB+34, RESUB+36 , RESUB+44, RESUB+45, RESUB+50, RESUB+51, RESUB+59, RESUB+60, RESUB+63, SF+4~, SF+5, SF+15 , SF+19, SF+21, SF+26, SF+27, SF+33, SF+34, SF+47, SF+48, SF+51, SF+52 , FWD+4~, FWD+5, FWD+15, FWD+19, FWD+21, FWD+25, FWD+26, FWD+33, FWD+35, FWD+48 , FWD+49, FWD+52*, FWD+53
TCH	CRNRNTE+3~
U	RESUB+12, RESUB+20, RESUB+66, RESUB+68, SF+11, SF+19, SF+25, SF+38, SF+51, SF+55 , SF+58, FWD+11, FWD+19, FWD+39, FWD+52, FWD+56, FWD+59, FWD2IFC+5, CRNRNTE+6, CRNRNTE+15 , CRNRNTE+18, CRNRNTE+21, CRNROBX+10, CRNROBX+19, CRNROBX+23, CRNROBX+32, LOC+4, LOC+5, SITE+1

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCIEV1

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: