Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XMZDOM

Package: MailMan

Routine: XMZDOM


Information

XMZDOM ;(WASH ISC)/CAP - CONVERT MAILMAN HOST #'S TO IDCU ;5/23/90 10:17

Source Information

Source file <XMZDOM.m>

Call Graph

Call Graph Total: 10

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  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
MailMan 1 XMZDOM0  

Entry Points

Name Comments DBIA/ICR reference
END
TEXT
ZTSK
R
KILL
GO
OUT

External References

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

Name Field # of Occurrence
^("OLDAUSTIN" GO

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All