Routine: GMRCIBKG

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Kernel	4	^%ZTLOAD ($$DOW,$$FMADD,$$FMDIFF,$$FMTH,$$NOW)^XLFDT (DELETEA,SETUP)^XQALERT $$STA^XUAF4
Consult Request Tracking	3	(PTERRMSG,SNDALRT)^GMRCIERR TRIGR^GMRCIEVT $$OBR^GMRCISG1
Health Level Seven	2	INIT^HLFNC2 LINK^HLUTIL3
Registration	2	$$EN^VAFCPID $$SITE^VASITE
VA Fileman	2	^DIK $$GET1^DIQ
Toolkit	1	($$GET,EN)^XPAR
Uncategorized	1	($$GETICN,$$IFLOCAL)^MPIF001

Package

Total

Call Graph

Kernel

^%ZTLOAD ($$DOW,$$FMADD,$$FMDIFF,$$FMTH,$$NOW)^XLFDT (DELETEA,SETUP)^XQALERT $$STA^XUAF4

Consult Request Tracking

(PTERRMSG,SNDALRT)^GMRCIERR TRIGR^GMRCIEVT $$OBR^GMRCISG1

Health Level Seven

INIT^HLFNC2 LINK^HLUTIL3

Registration

$$EN^VAFCPID $$SITE^VASITE

VA Fileman

^DIK $$GET1^DIQ

Toolkit

($$GET,EN)^XPAR

Uncategorized

($$GETICN,$$IFLOCAL)^MPIF001

Package	Total	Caller Graph
Consult Request Tracking	3	GMRC IFC BACKGROUND STARTUP GMRCIEVT GMRCINC

Package

Total

Caller Graph

Consult Request Tracking

GMRC IFC BACKGROUND STARTUP GMRCIEVT GMRCINC

Entry Points

Name	Comments	DBIA/ICR reference
GONOGO()	; determine if background job should run or not
DELALRT(MSGLOG)	;delete obsolete alerts for an entry ; Input: ; MSGLOG = ien from file 123.6
EN	;process file 123.6 and take action
REQUEUE	;task job to start up again one hour after completing
OVERDUE	; write message for alert to tell IRM job is overdue

External References

Name	Field # of Occurrence
^%ZTLOAD	REQUEUE+6
^DIK	EN+33
$$GET1^DIQ	EN+60
PTERRMSG^GMRCIERR	EN+64
SNDALRT^GMRCIERR	EN+47, EN+77, EN+86
TRIGR^GMRCIEVT	EN+18, EN+25, EN+43, EN+74, EN+82
$$OBR^GMRCISG1	EN+62
INIT^HLFNC2	EN+50
LINK^HLUTIL3	EN+58
$$GETICN^MPIF001	EN+54
$$IFLOCAL^MPIF001	EN+55
$$EN^VAFCPID	EN+56
$$SITE^VASITE	EN+63
$$DOW^XLFDT	EN+39, EN+71
$$FMADD^XLFDT	EN+12, EN+31, EN+36, EN+67, REQUEUE+5
$$FMDIFF^XLFDT	GONOGO+13, GONOGO+15
$$FMTH^XLFDT	REQUEUE+5
$$NOW^XLFDT	EN+8, EN+12, EN+36, EN+67, EN+90, REQUEUE+5, GONOGO+10
$$GET^XPAR	EN+29, EN+38, EN+70, GONOGO+8, GONOGO+12
EN^XPAR	EN+8, EN+90
DELETEA^XQALERT	DELALRT+6, GONOGO+18
SETUP^XQALERT	GONOGO+23
$$STA^XUAF4	EN+61

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: OVERDUE+1
Function Call: WRITE	Prompt: !,"The Inter-facility Consults background job is overdue." Line Location: OVERDUE+2
Function Call: WRITE	Prompt: !,"This is likely due to an error while the job runs. It is suggested" Line Location: OVERDUE+3
Function Call: WRITE	Prompt: !,"that you check the systems for errors. If the errors are resolved" Line Location: OVERDUE+4
Function Call: WRITE	Prompt: !,"the background job will catch up and run normally. There is a " Line Location: OVERDUE+5
Function Call: WRITE	Prompt: !,"remote possibility that the GMRC IFC BACKGROUND... parameters have" Line Location: OVERDUE+6
Function Call: WRITE	Prompt: !,"been edited and are out of synch." Line Location: OVERDUE+7

FileNo	Call Tags
^GMR(123.6 - [#123.6]	Classic Fileman Calls
^HLCS(870 - [#870]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123 - [#123]	EN+52
^GMR(123.6 - [#123.6]	EN+13, EN+14, EN+23

Name	Line Occurrences
$$GONOGO	EN+5
DELALRT	EN+24, EN+42, EN+46, EN+76, EN+81, EN+85
REQUEUE	EN+92

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	EN+28~, EN+32*
DIK	EN+28~, EN+32*
DIV	EN+63~*
DOM	EN+49~, EN+60*, EN+64
DOW	EN+37~, EN+39, EN+40, EN+69~, EN+71, EN+72
DT	EN+39, EN+71
GMRCBFI	GONOGO+7~, GONOGO+12*, GONOGO+13, GONOGO+15
GMRCBST	GONOGO+7~, GONOGO+8*, GONOGO+9, GONOGO+11, GONOGO+13, GONOGO+15
GMRCDFN	EN+52~*, EN+53, EN+54, EN+55, EN+56
GMRCIQT	EN+49~, EN+51, EN+53, EN+54, EN+55*
GMRCLNK	EN+49~, EN+58, EN+59*, EN+60
GMRCLNK(0	EN+59
GMRCLOG	EN+10~, EN+11, EN+13, EN+14, EN+24, EN+32, EN+42, EN+46, EN+47, EN+76 , EN+77, EN+81, EN+85, EN+86
GMRCLOG0	EN+10~, EN+14*, EN+17, EN+18, EN+20, EN+22, EN+23, EN+25, EN+27, EN+31 , EN+36, EN+43, EN+44, EN+52, EN+58, EN+61, EN+62, EN+67, EN+74, EN+75 , EN+80, EN+82, EN+84
GMRCNOW	GONOGO+7~, GONOGO+10*, GONOGO+11, GONOGO+13
GMRCPAR	EN+37~, EN+38, EN+40, EN+69~, EN+70, EN+72
GMRCQT	GONOGO+4~, GONOGO+5, GONOGO+11, GONOGO+13*, GONOGO+26
GMRCRETN	EN+28~, EN+29, EN+30, EN+31
GMRCSND	EN+37~, EN+40, EN+41, EN+44, EN+69~, EN+72, EN+73
GMRCTIM	EN+10~, EN+12*, EN+20, EN+31
HL	EN+49~, EN+50
HLECH	EN+49~
HLFS	EN+49~
HLQ	EN+49~
IOF	OVERDUE+1
MSGLOG	DELALRT~, DELALRT+5
OBR	EN+49~, EN+62*, EN+64
PID	EN+49~, EN+56, EN+57, EN+64
STA	EN+49~, EN+61, EN+63, EN+64
U	EN+17, EN+18, EN+20, EN+22, EN+23, EN+25, EN+27, EN+31, EN+36, EN+43 , EN+44, EN+52, EN+58, EN+61, EN+62, EN+67, EN+74, EN+75, EN+80, EN+82 , EN+84
XQA	GONOGO+17~
XQA("G.IFC TE	CH ERRORS" , GONOGO+19*
XQAID	DELALRT+4~, DELALRT+5, GONOGO+17~, GONOGO+18, GONOGO+21*
XQAKILL	DELALRT+4~, DELALRT+5, OVERDUE+8, GONOGO+17~, GONOGO+18*
XQAMSG	GONOGO+17~, GONOGO+20*
XQAROU	GONOGO+17~, GONOGO+22*
ZTDESC	REQUEUE+1~, REQUEUE+2*
ZTDTH	REQUEUE+1~, REQUEUE+5*
ZTIO	REQUEUE+1~, REQUEUE+3*
>> ZTQUEUED	EN+2
>> ZTREQ	EN+2*
ZTRTN	REQUEUE+1~, REQUEUE+4*
ZTSK	REQUEUE+1~

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCIBKG

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: