Routine: SD53P859

Entry Points

Name	Comments	DBIA/ICR reference
EN	; entry point
CLEANUP	; * Begin cleanup utility * ; TMP had stored in an IEN in the PARENT REQUEST field (#43.8) and this field is reserved for MRTC appts made by VSE. ; This utility will follow the logic below to find and erase erroneous Parent ptr fields, so VSE can once again Cancel those appointments normally.
ERASE	;erase parent ptr field from this rec
SNDMAIL	;send mailman to installer

Name	Field # of Occurrence
UPDATE^DIE	EN+10, ERASE+3
^DIK	EN+19
$$GET1^DIQ	CLEANUP+20, ERASE+5, ERASE+6, ERASE+7, ERASE+8
$$CHKSTOP^SDTMPEDT	EN+9
$$FMADD^XLFDT	CLEANUP+12
$$FMTE^XLFDT	ERASE+10
^XMD	SNDMAIL+9
MES^XPDUTL	EN+3, EN+4, EN+6, EN+8, EN+9, EN+11, EN+12, EN+18, EN+20, EN+21 , EN+22, EN+23, CLEANUP+5, CLEANUP+6, CLEANUP+7, CLEANUP+8, CLEANUP+9, CLEANUP+10, CLEANUP+26, CLEANUP+27 , CLEANUP+28, CLEANUP+29

Name	Line Occurrences
Function Call: WRITE	Prompt: !,CHILD,?20,CIDDT Line Location: ERASE+9
Routine Call	DIE Line Location: EN+10 ERASE+3

Name	Line Occurrences (* Changed, ! Killed)
^SD(40.6 - [#40.6]	EN+8, EN+17
^SDEC(409.85 - [#409.85]	CLEANUP+13, CLEANUP+14, CLEANUP+15, CLEANUP+17, CLEANUP+18, CLEANUP+21, CLEANUP+22, CLEANUP+23
^TMP("SDTMP"	CLEANUP+24, ERASE+10, SNDMAIL+2, SNDMAIL+3, SNDMAIL+4*, SNDMAIL+9!

Name	Field # of Occurrence
APPDT	ERASE+1~, ERASE+7*, ERASE+10
CHILD	CLEANUP+3~, CLEANUP+15*, CLEANUP+17, CLEANUP+18, CLEANUP+20, CLEANUP+23, ERASE+3, ERASE+7, ERASE+8, ERASE+9
CIDDT	ERASE+1~, ERASE+8*, ERASE+9, ERASE+10
DA	EN+1~, EN+17*, EN+18
DFN	CLEANUP+3~, CLEANUP+20*, ERASE+5, ERASE+6
DIFROM	SNDMAIL+9~
DIK	EN+1~, EN+15*
DT	CLEANUP+12
DUZ	SNDMAIL+8
ERR	EN+1~, EN+11, EN+12, EN+13!
ERRCNT	EN+1~, EN+2, EN+12, EN+22
FDA	EN+1~, EN+13!, ERASE+1~
FDA(	EN+10, ERASE+3
FIX	CLEANUP+3~, CLEANUP+4, CLEANUP+24, CLEANUP+28, ERASE+2, ERASE+10
LSTNAM1	ERASE+1~, ERASE+5*, ERASE+10
MRTC	CLEANUP+3~, CLEANUP+17*, CLEANUP+19
PARENT	CLEANUP+3~, CLEANUP+18*, CLEANUP+19, CLEANUP+21, CLEANUP+22, CLEANUP+23
QQ	CLEANUP+3~, CLEANUP+12, CLEANUP+13, CLEANUP+14, CLEANUP+15
RR	CLEANUP+3~, CLEANUP+14*, CLEANUP+15
SDIEN	EN+1~, EN+13!
SSN4	ERASE+1~, ERASE+6*, ERASE+10
STP	EN+1~, EN+7, EN+8, EN+9, EN+10, EN+11, EN+12, EN+16, EN+17, EN+18 , EN+20
TOT	CLEANUP+3~, CLEANUP+4, CLEANUP+16, CLEANUP+27
U	CLEANUP+17, CLEANUP+18
XMDUZ	SNDMAIL+1~, SNDMAIL+6*
XMSUB	SNDMAIL+1~, SNDMAIL+5*
XMTEXT	SNDMAIL+1~, SNDMAIL+7*
XMY	SNDMAIL+1~
XMY(	SNDMAIL+8*