Routine: DG876PST

Package	Total	Call Graph
VA FileMan	6	TURNON^DIAUTL FIND^DIC (UPDATE,WP)^DIE EN^DIEZ $$ROUSIZE^DILF EN^DIPZ
Kernel	2	^%ZTLOAD (BMES,MES)^XPDUTL
Master Patient Index VistA	2	$$GETICN^MPIF001 $$A31^MPIFA31B
Clinical Information Resource Network	1	(EXC,START,STOP)^RGHLLOG
MailMan	1	^XMD
Registration	1	$$SITE^VASITE

Entry Points

Name	Comments	DBIA/ICR reference
POST	;Post init
XR(DGFILE,DGFLD)	;File index type cross references
TEMPL(DGFILE,DGFLDS,DGFNAME)	;Determine templates on the file to be compiled.
LOOP(FIELD,FILE)	;Compile templates.
AUDIT(DGFILE,DGFLD,DGFNAME)	;Turn on Auditing for Field in File
EMPA31	; queue off A31 messages on employees
DQEMPA31	; Entry point to queue job to update Employee Patients

External References

Name	Field # of Occurrence
^%ZTLOAD	EMPA31+7
TURNON^DIAUTL	AUDIT+1
FIND^DIC	XR+7
UPDATE^DIE	XR+36
WP^DIE	XR+47
EN^DIEZ	LOOP+15
$$ROUSIZE^DILF	LOOP+14
EN^DIPZ	LOOP+16
$$GETICN^MPIF001	DQEMPA31+11
$$A31^MPIFA31B	DQEMPA31+15
EXC^RGHLLOG	DQEMPA31+18
START^RGHLLOG	DQEMPA31+17
STOP^RGHLLOG	DQEMPA31+19
$$SITE^VASITE	DQEMPA31+5
^XMD	DQEMPA31+34, DQEMPA31+50
BMES^XPDUTL	XR+39, TEMPL+2, TEMPL+8, TEMPL+12, LOOP+7, LOOP+9, LOOP+15, LOOP+16, EMPA31+2, EMPA31+3
MES^XPDUTL	XR+9, XR+40, XR+42, XR+45, TEMPL+10, EMPA31+8, EMPA31+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: TEMPL+5
Function Call: WRITE	Prompt: !,"Adding AUDIT to file "_DGFILE_" "_DGFNAME_", field #"_DGFLD Line Location: AUDIT+1
Routine Call	DIC Line Location: XR+7
Routine Call	DIE Line Location: XR+36
Routine Call	DIE Line Location: XR+47

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DD("IX" - [#.11]	FIND^DIC, WP^DIE

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(391 - [#391]	EMPA31+3, DQEMPA31+3
^DPT("APTYPE"	DQEMPA31+9

Label References

Name	Line Occurrences
AUDIT	POST+10
EMPA31	POST+12
LOOP	TEMPL+4
TEMPL	POST+8
XR	POST+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CFIELD	TEMPL+7, TEMPL+11, TEMPL+13!
CFIELD(	TEMPL+9, LOOP+11, LOOP+12*
DGCNT	DQEMPA31+1~, DQEMPA31+7, DQEMPA31+21, DQEMPA31+24, DQEMPA31+39
DGDFN	DQEMPA31+1~, DQEMPA31+9*, DQEMPA31+11, DQEMPA31+15, DQEMPA31+18
DGECNT	DQEMPA31+1~, DQEMPA31+7, DQEMPA31+20, DQEMPA31+25, DQEMPA31+26, DQEMPA31+28, DQEMPA31+40, DQEMPA31+42
DGEMP	DQEMPA31+1~, DQEMPA31+3*, DQEMPA31+9
DGERR	XR+2~, DQEMPA31+1~, DQEMPA31+15*, DQEMPA31+16, DQEMPA31+18
DGERR("DIERR"	XR+41, XR+42
DGFDA	XR+2~
DGFDA(	XR+12, XR+13, XR+14, XR+15, XR+16, XR+17, XR+18, XR+19, XR+20, XR+21 , XR+22, XR+24, XR+25, XR+26, XR+27, XR+28
DGFILE	XR~, XR+6, XR+12, XR+19, XR+21, XR+22, XR+26, TEMPL~, TEMPL+2, TEMPL+4 , AUDIT~, AUDIT+1
DGFLD	XR~, XR+4, XR+21, XR+22, XR+27, AUDIT~, AUDIT+1
DGFLDS	POST+1~, POST+4*, POST+6, POST+8, POST+10, TEMPL~, TEMPL+4
DGFNAME	TEMPL~, TEMPL+2, AUDIT~, AUDIT+1
DGI	POST+1~, POST+6, POST+10, XR+38~, XR+41, XR+42, TEMPL+1~, TEMPL+4*
DGICN	DQEMPA31+1~, DQEMPA31+11*, DQEMPA31+12, DQEMPA31+13
DGIEN	XR+2~
DGIEN(1	XR+47
DGOUT	XR+2~
DGOUT("DILIST"	XR+8
DGSITE	DQEMPA31+1~, DQEMPA31+6*, DQEMPA31+13, DQEMPA31+37, DQEMPA31+45
DGSNAME	DQEMPA31+1~, DQEMPA31+6*, DQEMPA31+37
DGVAL	XR+2~, XR+7
DGVAL(1	XR+6*
DGVAL(2	XR+6*
DGWP	XR+2~
DGWP(1	XR+30*
DGWP(2	XR+31*
DGWP(3	XR+32*
DGWP(4	XR+33*
DGWP(5	XR+34*
DGXR	XR+2~, XR+4*, XR+6, XR+9, XR+13, XR+39, XR+45
DIERR	XR+2~, XR+37
DMAX	LOOP+1~, LOOP+14*
DUZ	DQEMPA31+33, DQEMPA31+46
FIELD	LOOP~, LOOP+3, LOOP+5
FILE	LOOP~, LOOP+3, LOOP+5
GLOBAL	LOOP+1~, LOOP+2*, LOOP+3, LOOP+5, LOOP+6, LOOP+8, LOOP+9, LOOP+10, LOOP+15, LOOP+16
PRINT	TEMPL+10, TEMPL+13!
PRINT(	TEMPL+9*
R	DQEMPA31+1~, DQEMPA31+23~, DQEMPA31+36!
R(1	DQEMPA31+24, DQEMPA31+37
R(2	DQEMPA31+25, DQEMPA31+27, DQEMPA31+38*
R(3	DQEMPA31+25, DQEMPA31+28, DQEMPA31+39*
R(4	DQEMPA31+29, DQEMPA31+41
R(5	DQEMPA31+30, DQEMPA31+42
R(6	DQEMPA31+43*
R(7	DQEMPA31+44*
TEMPLATN	LOOP+1~, LOOP+6*, LOOP+7, LOOP+9
TEMPLATP	LOOP+1~, LOOP+4, LOOP+5, LOOP+6, LOOP+8, LOOP+9, LOOP+10, LOOP+13
X	TEMPL+6, TEMPL+9, TEMPL+13!, LOOP+1~, LOOP+8, LOOP+9, LOOP+10, LOOP+11, LOOP+12, DQEMPA31+1~ , DQEMPA31+5, DQEMPA31+6, DQEMPA31+23~
XMDUN	DQEMPA31+23~, DQEMPA31+36!
XMDUZ	DQEMPA31+23~, DQEMPA31+32, DQEMPA31+36!, DQEMPA31+46
XMSUB	DQEMPA31+23~, DQEMPA31+31, DQEMPA31+36!, DQEMPA31+45
XMTEXT	DQEMPA31+23~, DQEMPA31+31, DQEMPA31+36!, DQEMPA31+45
XMY	DQEMPA31+23~, DQEMPA31+36!
XMY(	DQEMPA31+33*
XMY("Christine.Chesney@domain.ext"	DQEMPA31+47*
XMY("Ed.Zeigler@domain.ext"	DQEMPA31+49*
XMY("John.Williams30ec0c@domain.ext"	DQEMPA31+48*
XMZ	DQEMPA31+23~, DQEMPA31+36!
Y	TEMPL+6, TEMPL+9, TEMPL+13!, LOOP+1~, LOOP+13*, EMPA31+4~
ZTDESC	EMPA31+4~, EMPA31+6*
ZTDTH	EMPA31+4~, EMPA31+5*
ZTIO	EMPA31+4~, EMPA31+5*
ZTRTN	EMPA31+4~, EMPA31+5*
ZTSAVE	EMPA31+4~
ZTSK	EMPA31+4~, EMPA31+8, EMPA31+9

Customize PDF page

Package: Registration

Routine: DG876PST

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: