Routine: IVM2174P

Package	Total	Call Graph
Kernel	3	^%ZTLOAD ($$FMADD,$$NOW,$$SCH)^XLFDT ($$PATCH,BMES,MES)^XPDUTL
MailMan	1	^XMD
Master Patient Index VistA	1	$$GETICN^MPIF001
Registration	1	$$SITE^VASITE

Entry Points

Name	Comments	DBIA/ICR reference
EP	; Entry Point ; Extend the expiration date of the ^XTMP("DG53970P") global to +120 days
TASK	;Build and send MailMan message with list of patient records needing SSN updates
GETDATA	; loop over DFNs in ^XTMP("DG53970P",JOB,"DFN") - store all data in ^TMP global
MSG	; All data is collected in ^TMP("IVM2174P") - put together email message
LN()	;Increment line counter

Name	Line Occurrences (* Changed, ! Killed)
^DGPR(408.12 - [#408.12]	GETDATA+8, GETDATA+10
^TMP("IVM2174P"	TASK+3!, TASK+7!, GETDATA+6, GETDATA+17, MSG+20, MSG+24, MSG+25
^XTMP("DG53970P"	EP+2*, TASK+4, GETDATA+2, GETDATA+16, GETDATA+17

Name	Line Occurrences
$$LN	MSG+7, MSG+8, MSG+9, MSG+10, MSG+11, MSG+12, MSG+13, MSG+14, MSG+15, MSG+16 , MSG+17, MSG+18, MSG+21, MSG+22, MSG+27, MSG+28
GETDATA	TASK+5
MSG	TASK+6

Name	Field # of Occurrence
DCNT	TASK+1~, TASK+2, GETDATA+17, MSG+18
DFN	TASK+1~, GETDATA+1, GETDATA+2, GETDATA+5, GETDATA+6, GETDATA+8, MSG+20*, MSG+22
DT	EP+2
DUZ	MSG+4
ERRMSG	MSG+1~, MSG+25, MSG+26, MSG+27, MSG+28
FOUND	TASK+1~, GETDATA+15, GETDATA+16, GETDATA+17
I	TASK+1~, GETDATA+2, GETDATA+6, GETDATA+17, MSG+19, MSG+20, MSG+24, MSG+25
ICN	TASK+1~, GETDATA+5*, GETDATA+6
IEN	TASK+1~, GETDATA+8, GETDATA+10, MSG+24, MSG+25, MSG+27, MSG+28
IENCNT	TASK+1~, GETDATA+16*, GETDATA+17
IVMSITE	MSG+1~, MSG+2*, MSG+6, MSG+14, MSG+15
IVMTEXT	EP+4~, EP+7, EP+16!, EP+18
IVMTEXT(1	EP+5, EP+17
IVMTEXT(2	EP+6*
JOB	TASK+1~, TASK+2, TASK+4, TASK+5, GETDATA+2, GETDATA+16, GETDATA+17
LINE	TASK+1~, MSG+24, MSG+27
LN	MSG+1~, LN+1*, LN+2
MSG	MSG+1~
MSG(	MSG+7, MSG+8, MSG+9, MSG+10, MSG+11, MSG+12, MSG+13, MSG+14, MSG+15, MSG+16 , MSG+17, MSG+18, MSG+21, MSG+22, MSG+27, MSG+28
PCNT	TASK+1~, TASK+2, GETDATA+3, MSG+17, MSG+19, MSG+32
VAL	TASK+1~, GETDATA+10*, GETDATA+11, GETDATA+12
XIEN	TASK+1~, GETDATA+12*, GETDATA+17
XMDUZ	MSG+1~, MSG+6*
XMSUB	MSG+1~, MSG+6*
XMTEXT	MSG+1~, MSG+5*
XMY	MSG+1~
XMY(	MSG+4*
XMY("G.IVM20174MONITOR@DOMAIN.EXT"	MSG+3*
ZTDESC	EP+4~, EP+12, MSG+33~, MSG+35
ZTDTH	EP+4~, EP+13, MSG+33~, MSG+36
ZTIO	EP+4~, EP+14, MSG+33~, MSG+37
ZTRTN	EP+4~, EP+11, MSG+33~, MSG+34
ZTSK	EP+4~, EP+17, MSG+33~