Routine: XMUT1A

Package	Total	Call Graph
VA FileMan	4	NOW^%DTC ^DIC IXALL^DIK ^DIR
Kernel	2	^%ZISC EN^XUTMDEVQ
MailMan	1	$$NAME^XMXUTIL

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 3

Package	Total	Caller Graph
MailMan	3	XMUT-REC-DELETE XMUT-REC-RPT XMUT1

Entry Points

Name	Comments	DBIA/ICR reference
NOKL
GO
FX
TABLE	;;;DESCRIPTION^PROGRAM OR TAG^PROGRAM
LIST	;LIST MESSAGES FOUND
L
ZTSK	;
N
H
NQ
DEL	;DELETE LIST FROM ^TMP("XMUT1"...
D
DQ
H1
NO

External References

Name	Field # of Occurrence
NOW^%DTC	ZTSK+1
^%ZISC	FX+2, NQ+2
^DIC	FX
IXALL^DIK	GO+2
^DIR	N+6, D+7
$$NAME^XMXUTIL	LIST+3, ZTSK+2, DEL+2, D+6
EN^XUTMDEVQ	L+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: FX+3
Function Call: WRITE	Prompt: !!,"CHOOSE FROM:",! Line Location: LIST+2
Function Call: READ	Variable: X Timeout: DTIME Line Location: L+0
Function Call: WRITE	Prompt: !!,"WHICH ONE: ",J,"//" Line Location: L+0
Function Call: WRITE	Prompt: !!,"Message removed from list - no longer in 3.9 file.",! Line Location: N+2
Function Call: WRITE	Prompt: !?2,Y,?22,$P(I,"^") Line Location: N+4
Function Call: WRITE	Prompt: @IOF,!,"CONTENTS OF MAILBOXES FOR ",XMA0,?60,"PAGE: ",XMB0,!! Line Location: H+1
Function Call: WRITE	Prompt: " DATE@TIME",?22,"SUBJECT",!! Line Location: H+2
Function Call: WRITE	Prompt: @IOF Line Location: NQ+1
Function Call: WRITE	Prompt: !!,"CHOOSE FROM:",! Line Location: DEL+1
Function Call: READ	Variable: X Timeout: DTIME Line Location: D+0
Function Call: WRITE	Prompt: !!,"WHICH ONE ",J,"//" Line Location: D+0
Function Call: WRITE	Prompt: !," NO SUCH USER !!!",$C(7) Line Location: D+5
Function Call: WRITE	Prompt: " << DELETED !!!" Line Location: DQ+0
Function Call: WRITE	Prompt: !!,"Choose NUMBER from list. Or enter '??' for a list.",!,$C(7) Line Location: H1+0
Function Call: WRITE	Prompt: !!!,"NO MESSAGES RECOVERED FOR ANYBODY !!!" Line Location: NO+0
Routine Call	DIC Line Location: FX
Routine Call	DIR Line Location: N+6 D+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	ZTSK+1
^DOPT("XMUT1"	NOKL, GO, GO+1
^TMP("XMUT1"	LIST+3, L+3, N, N+2!, DEL+2, D+3, DQ!
^VA(200 - [#200]	LIST+3, DEL+2, D+4
^XMB(3.9 - [#3.9]	N+1

Label References

Name	Line Occurrences
@(	FX+1
D	D+1
DEL	D+2, D+3
DQ	D+5
FX	NOKL, FX+3
H	ZTSK+2, N+5, N+7
H1	L+1, L+3, D+1, D+2, D+3
L	L+1
LIST	L+2, L+3
N	N+2, N+5, N+7
NO	LIST+4, DEL+3
NQ	N, N+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ZTSK+1!
%H	ZTSK+1!
%I	ZTSK+1!
C	LIST+1~, LIST+2, DEL+1
DD	FX+1!
DIC	FX*!
DIC(0	FX*
DIE	FX+3!
DIF	FX+3!
>> DIK	NOKL*
DIR	N+6!, D+7!
DIR("A"	D+6*
DIR("B"	D+6*
DIR(0	N+6, D+6
DIRUT	N+6!, D+7!
DO	FX+1!
DTIME	L, D
F	LIST+1~, LIST+2, DEL+1
I	GO+1, LIST+1~, LIST+3, N+1, N+2, N+3, N+4, DEL+2
IO	N+6
IO(0	N+6
IOF	H+1, NQ+1
IOSL	N+5
IOST	N+5
J	LIST+1~, LIST+2, LIST+3, LIST+4, L, DEL+1, DEL+2, DEL+3, D
U	FX+1
X	GO+1, FX+1, LIST+1~, L, L+1, L+2, L+3, L+4, N+6, D , D+1, D+2, D+3, D+4, D+7
XMA0	ZTSK+2*, H+1, NQ!
XMB0	ZTSK+2, H, H+1, NQ!, D+4*, D+5
XMC0	ZTSK+2, N, N+1, N+2, NQ!
XMD0	N+3, N+5, H, NQ!
XME0	LIST+1~, L+4, ZTSK+2, N, N+2, NQ!, D+4, D+6, DQ!
XMF0	ZTSK+1*, N+3, NQ!
Y	FX, FX+1!, ZTSK+1, ZTSK+2, N+3, N+4
Y(0	FX+1
>> ZTQUEUED	N+6, NQ+1
>> ZTREQ	NQ+1*
>> ZTSAVE	L+5
>> ZTSAVE("XME0"	L+4*
ZTSK	NQ+1!

Customize PDF page

Package: MailMan

Routine: XMUT1A

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items