Routine: XMZDOM

Package	Total	Call Graph
MailMan	6	GETTIME^XMA02 ^XMZDOM0 ^XMZDOM1 ^XMZDOM2 IDCU^XMZDOM3 (,0)^XMZDOM4
Kernel	2	^%ZIS ^%ZTLOAD
VA Fileman	2	NOW^%DTC DT^DICRW

Package

Total

Call Graph

MailMan

GETTIME^XMA02 ^XMZDOM0 ^XMZDOM1 ^XMZDOM2 IDCU^XMZDOM3 (,0)^XMZDOM4

Kernel

^%ZIS ^%ZTLOAD

VA Fileman

NOW^%DTC DT^DICRW

Package	Total	Caller Graph
MailMan	1	XMZDOM0

Package

Total

Caller Graph

MailMan

XMZDOM0

Name	Field # of Occurrence
NOW^%DTC	XMZDOM+4
^%ZIS	TEXT+2
^%ZTLOAD	TEXT+8
DT^DICRW	ZTSK
GETTIME^XMA02	TEXT+5
^XMZDOM0	ZTSK+1
^XMZDOM1	ZTSK
^XMZDOM2	ZTSK
IDCU^XMZDOM3	TEXT+1
^XMZDOM4	XMZDOM+3
0^XMZDOM4	R+4

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "OPTION: P//" Formatting: ! Timeout: 900 Variable: X Line Location: R+0
Function Call: WRITE	Prompt: !!,"<< Time out ! " Line Location: R+0
Function Call: WRITE	Prompt: $E(XMF0,$L(X)+1,99) Line Location: R+3
Function Call: WRITE	Prompt: !!,*7,"The OLDMINI and OLDAUSTIN entries are NOT IN the TRANSMISSION SCRIPT file.",!,"You cannot reverse the IDCU conversion because you haven't run it.",!! Line Location: GO+0
Function Call: WRITE	Prompt: !!,*7,"You have Transmission scripts name OLDMINI or OLDAUSTIN.",!,"You have already run this conversion. " Line Location: GO+1
Function Call: WRITE	Prompt: *7,!!,"The following will initialize your TRANSMISSION scripts.",!,"You must enter in the correct UserID and Password in order for it to work.",!,"If you do not, you may edit it in the 4.6 file later." Line Location: TEXT+0
Function Call: READ	Prompt: "Enter the IDCU UserID sent to you by mail: " Formatting: !! Timeout: 600 Variable: XMU Line Location: TEXT+1
Function Call: READ	Prompt: "Enter the IDCU Password sent to you by mail: " Formatting: !! Timeout: 600 Variable: XMP Line Location: TEXT+1
Function Call: WRITE	Prompt: !!," << No device --" Line Location: TEXT+2
Function Call: WRITE	Prompt: ! Line Location: TEXT+5
Function Call: WRITE	Prompt: "Task #"_ZTSK_" queued by request",! Line Location: TEXT+8
Function Call: WRITE	Prompt: !!,"WORKING",!! Line Location: ZTSK+0
Function Call: WRITE	Prompt: !!,"<< User requested Abort " Line Location: OUT+0
Function Call: WRITE	Prompt: "Process aborted >>",!!,*7 Line Location: END+0
Routine Call	%ZIS Line Location: TEXT+2

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("UCI"	TEXT+5
^UTILITY($J	ZTSK!
^XMB("OLDAUSTIN"	GO+1
^XMB(4.6 - [#4.6]	GO, GO+1

Name	Line Occurrences
END	R, GO, GO+1, TEXT+2, TEXT+3
GO	R+2, R+3, TEXT+3
KILL	TEXT+9, END
OUT	R+1, TEXT+1
R	R+4
XMZDOM	R+2
ZTSK	TEXT+3

Name	Field # of Occurrence
^("OLDAUSTIN"	GO

Local Variables

Name	Field # of Occurrence
%	XMZDOM+4, R+3, TEXT+6*, TEXT+7, KILL!
%0	KILL!
>> %IS	TEXT+2*
%ZIS	TEXT+2!
I	R+3*, KILL!
IO	TEXT+6, ZTSK
IO("Q"	TEXT+3
IOM	TEXT+6
ION	TEXT+6
IOSL	TEXT+6
IOST	TEXT+6
>> IOT	TEXT+7
POP	TEXT+2!
U	XMZDOM+4*, R+3, TEXT+3
X	R*, R+1, R+2, R+3, TEXT+1, TEXT+3, OUT, KILL!
XMA	ZTSK*, KILL!
XMB	KILL!
XMC	KILL!
XMD	KILL!
XMD(1	ZTSK*
XMDT	XMZDOM+4*, KILL!
XME	KILL!
XMF	KILL!
XMF0	R+2, R+3, GO, GO+1, TEXT, TEXT+1, TEXT+4, KILL!
XMP	TEXT+1*, KILL!
XMPG	ZTSK*, KILL!
XMS	KILL!
XMU	TEXT+1*, KILL!
Y	TEXT+5, TEXT+8, KILL!
ZTDESC	TEXT+4*, KILL+1!
ZTDTH	TEXT+5*, KILL+1!
ZTIO	TEXT+7*!, KILL+1!
ZTRTN	TEXT+4*, KILL+1!
ZTSAVE	KILL+1!
ZTSAVE("XMF0"	TEXT+8*
ZTSAVE("XMP"	TEXT+8*
ZTSAVE("XMU"	TEXT+8*
ZTSK	TEXT+8, KILL+1!
ZTUCI	TEXT+8*, KILL+1!

Customize PDF page

Package: MailMan

Routine: XMZDOM

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

Naked Globals

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed