Routine: AUM9115

Package	Total	Call Graph
VA Fileman	4	^%DT H^%DTC DT^DICRW ^DIR
Kernel	2	HOME^%ZIS ^%ZTLOAD
IHS VA Utilities	1	($$DIR,DIR)^XBDIR
MailMan	1	^XMD
Table Maintenance	1	START^AUM91151
Uncategorized	1	DEL^A9AUM15

Package

Total

Call Graph

VA Fileman

^%DT H^%DTC DT^DICRW ^DIR

HOME^%ZIS ^%ZTLOAD

($$DIR,DIR)^XBDIR

^XMD

START^AUM91151

DEL^A9AUM15

Package	Total	Caller Graph
Table Maintenance	1	AUM91151

Package

Total

Caller Graph

Table Maintenance

AUM91151

Name	Comments	DBIA/ICR reference
Q2	;
SINGLE(K)	; Get holders of a single key K.
HELP(L)	;EP - Display text at label L.
GREET	;;EP - To add to mail message.
VP	;
START	;EP - From Taskman
INTRO	;EP - To write to mail message, too.
QUE	;

Name	Field # of Occurrence
^%DT	QUE+2
H^%DTC	QUE+5
HOME^%ZIS	AUM9115+4, QUE+8
^%ZTLOAD	QUE+8
DEL^A9AUM15	START+9, START+11
START^AUM91151	START+4
DT^DICRW	AUM9115+4
^DIR	AUM9115+8
$$DIR^XBDIR	START+11
DIR^XBDIR	START+11
^XMD	START+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR ZERO.",! Line Location: AUM9115+3
Function Call: WRITE	Prompt: !,"QUEUE INFORMATION MISSING - NOT QUEUED" Line Location: QUE+3
Function Call: WRITE	Prompt: !!,"QUEUED TO TASK ",ZTSK,!!,"A mail message with the results will be sent to your MailMan 'IN' basket.",! Line Location: QUE+9
Function Call: WRITE	Prompt: !!,*7,"QUEUE UNSUCCESSFUL. RESTART UTILITY." Line Location: QUE+10
Function Call: WRITE	Prompt: !!,"The results are in your MailMan 'IN' basket.",! Line Location: START+10
Function Call: WRITE	Prompt: ! Line Location: HELP+1
Function Call: WRITE	Prompt: !?4,$P($T(@L+%),";",3) Line Location: HELP+2
Function Call: WRITE	Prompt: !?4,"**** AUM Version ",$P($T(+2),";",3)," Patch ",$P($P($T(+2),";",5),"",3),?65,"***" Line Location: VP+1
Function Call: WRITE	Prompt: !?4,"** ",$P($P($T(+1),";",2),"-",2),?65,"**" Line Location: VP+2
Routine Call	%ZIS Line Location: AUM9115+4 QUE+8
Routine Call	DIR Line Location: AUM9115+8

Name	Line Occurrences (* Changed, ! Killed)
^TMP("AUM9115"	START+3!, START+8!
^XUSEC(	SINGLE+3, SINGLE+4

Name	Line Occurrences
AUM9115	QUE+3
HELP	AUM9115+4, AUM9115+10, QUE+3
SINGLE	START+6
START	AUM9115+11
VP	AUM9115+4

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	START+6, HELP+2
>> %DT	QUE+1*
>> %DT("A"	QUE+1*
>> %DT("B"	QUE+1*
>> %DT(0	QUE+1*
>> %H	QUE+6
>> %T	QUE+6
DIR	AUM9115+9!
DIR("??"	AUM9115+7*
DIR("A"	AUM9115+6*
DIR("B"	AUM9115+5*
DIR(0	AUM9115+5*
>> DIRUT	AUM9115+10
DUZ	AUM9115+3, START+5
K	SINGLE~, SINGLE+3, SINGLE+4
L	HELP~
>> X	QUE+4*
XMDUZ	START+2~, START+5*
XMSUB	START+2~, START+5*
XMTEXT	START+2~, START+5*
XMY	START+2~
XMY(	START+5, SINGLE+4
Y	AUM9115+11, QUE+3, QUE+4, SINGLE+1~, SINGLE+2, SINGLE+4
>> ZTDESC	QUE+7*
>> ZTDTH	QUE+6*
>> ZTIO	QUE+7*
>> ZTQUEUED	START+9
>> ZTREQ	START+9*
>> ZTRTN	QUE+7*
>> ZTSK	QUE+9

Customize PDF page

Package: Table Maintenance

Routine: AUM9115

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(	QUE+7, START+5, VP+1, VP+2
$T(@L+%	HELP+2
$T(@L+%+1	HELP+2
$T(DIR^XBDIR	START+11