Routine: QAN2P35

Information

QAN2P35 ;ALB/MJB - Incident Reporting Package Decommission ;07/02/2024

Source file <QAN2P35.m>

Package	Total	Call Graph
Kernel	3	^%ZTLOAD ($$FMTE,$$NOW)^XLFDT MES^XPDUTL
VA FileMan	3	$$CREF^DILF ($$ROOT,$$VFILE)^DILFD EN^DIU2
MailMan	1	^XMD

Name	Comments	DBIA/ICR reference
TASK	;task the file deletion
BEGDEL	;background job entry point to remove all files and data
MSGTXT	;message into
LINE(TEXT)	;add line to tmp global stored for mail message
MAIL	;send message

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	BEGDEL+4!, BEGDEL+30!, LINE+2*

Name	Line Occurrences
LINE	BEGDEL+5, BEGDEL+17, BEGDEL+18, BEGDEL+20, BEGDEL+22, BEGDEL+23, BEGDEL+25, BEGDEL+26, BEGDEL+28
MAIL	BEGDEL+29

Name	Field # of Occurrence
DIU	BEGDEL+2~, BEGDEL+10*, BEGDEL+17, BEGDEL+18
DIU(0	BEGDEL+7*
DUZ	MAIL+3
QANCNT	BEGDEL+2~, BEGDEL+3, LINE+2
QANEND	BEGDEL+2~, BEGDEL+27, BEGDEL+28
QANFILE	BEGDEL+2~, BEGDEL+8*, BEGDEL+10, BEGDEL+12, BEGDEL+16
QANFLG	BEGDEL+2~, BEGDEL+3, BEGDEL+18, BEGDEL+19
QANLOOP	BEGDEL+2~, BEGDEL+5*
QANNODE	BEGDEL+2~, BEGDEL+10*, BEGDEL+16
QANSTART	BEGDEL+2~, BEGDEL+3, BEGDEL+26
QANSTR	BEGDEL+2~, BEGDEL+17, BEGDEL+18, BEGDEL+21, BEGDEL+22, BEGDEL+23, BEGDEL+24
QANTXT	BEGDEL+2~, BEGDEL+5*
TEXT	LINE~, LINE+2
XMDUZ	MAIL+2~, MAIL+3*
XMSUB	MAIL+2~, MAIL+4*
XMTEXT	MAIL+2~, MAIL+5*
XMY	MAIL+2~
XMY(	MAIL+3*
ZTDESC	TASK+2~, TASK+7*
ZTDTH	TASK+2~, TASK+8*
ZTIO	TASK+2~, TASK+8*
ZTRTN	TASK+2~, TASK+7*

Name	Field # of Occurrence
$T(MSGTXT+QANLOOP	BEGDEL+5