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: XMCTLK

Package: MailMan

Routine: XMCTLK


Information

XMCTLK ;(WASH ISC)/CAP-TalkMan ;04/18/2002 07:29

Source Information

Source file <XMCTLK.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
MailMan 9 CHK^XM  GET^XMA2  KILL^XMC  ENT^XMC1  ASK^XMCXU  ENT1^XMD  INIT^XMVVITAE  KILLMSG^XMXUTIL  
$$TSTAMP^XMXUTIL1  
Kernel 6 (,HOME)^%ZIS  ^%ZISC  $$NEWERR^%ZTER  $$HTE^XLFDT  EN^XQH  H^XUS  
VA FileMan 2 NOW^%DTC  ^DIR  
Toolkit 1 KERM^XTKERMIT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
MailMan 1 XMTALK  

Entry Points

Name Comments DBIA/ICR reference
GO
GO1
ENT ;
R ;
S ;
Q ;
D ;
G ;RETURN TO TALKMAN MODE
ABEND ;Handle abnormal end
DQ ;
QQ ;
N ;
T ;
T0 ;
T1 ;
U ;
ECHO ;ENTRY TO ECHO
INIT ;
HELP(XMABORT) ;
TALK ; Talk mode entry

External References

Name Field # of Occurrence
NOW^%DTC DQ+15
^%ZIS GO1+2
HOME^%ZIS DQ+9
^%ZISC GO1+4, ABEND+1, DQ+9, TALK+18
$$NEWERR^%ZTER ENT+5
^DIR D+2, HELP+5
$$HTE^XLFDT D+19
CHK^XM QQ+2
GET^XMA2 D+20
KILL^XMC TALK+21, TALK+24
ENT^XMC1 TALK+15
ASK^XMCXU TALK+10
ENT1^XMD DQ+19
INIT^XMVVITAE INIT+1, TALK+4
KILLMSG^XMXUTIL DQ+12, DQ+20
$$TSTAMP^XMXUTIL1 S+3, U+1
EN^XQH HELP+8
KERM^XTKERMIT D+10
H^XUS INIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"You don't have a DUZ."
  • Line Location: XMCTLK+4
Function Call: WRITE
  • Prompt: !,"YOU MUST CHOOSE ANOTHER DEVICE"
  • Line Location: GO1+4
Function Call: WRITE
  • Prompt: @IOF,"<<<< You are now talking through device ",IO," >>>>"
  • Line Location: ENT+2
Function Call: WRITE
  • Prompt: !,"===== Enter <control>A to stop. =====",$C(7),!
  • Line Location: ENT+7
Function Call: WRITE
  • Prompt: A,*Y
  • Line Location: R+10
Function Call: WRITE
  • Prompt: A
  • Line Location: R+13
Function Call: READ
  • Variable: A
  • Timeout: TK
  • Line Location: S+3
Function Call: WRITE
  • Prompt: A
  • Line Location: S+3
Function Call: WRITE
  • Prompt: !
  • Line Location: S+8
Function Call: WRITE
  • Prompt: A,*Y
  • Line Location: S+10
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: Q+2
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: Q+4
Function Call: WRITE
  • Prompt: " ???? "
  • Line Location: D+2
Function Call: WRITE
  • Prompt: !,A,!
  • Line Location: D+4
Function Call: WRITE
  • Prompt: !," <No Kermit use yet. The correct Kernel tools version is not installed !>",!
  • Line Location: D+9
Function Call: WRITE
  • Prompt: !," <Continue in TalkMan Mode >",!
  • Line Location: D+11
Function Call: WRITE
  • Prompt: !
  • Line Location: D+14
Function Call: WRITE
  • Prompt: !
  • Line Location: D+16
Function Call: WRITE
  • Prompt: !
  • Line Location: D+21
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ABEND+3
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ABEND+5
Function Call: WRITE
  • Prompt: $C(7),!!,"End of Talkman session."
  • Line Location: DQ+1
Function Call: WRITE
  • Prompt: !,"You are back at your starting place.",!
  • Line Location: DQ+2
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: DQ+5
Function Call: WRITE
  • Prompt: *17
  • Line Location: DQ+7
Function Call: WRITE
  • Prompt: !,"TalkMan dialog capture being delivered now."
  • Line Location: DQ+19
Function Call: WRITE
  • Prompt: !
  • Line Location: QQ+1
Function Call: WRITE
  • Prompt: !
  • Line Location: QQ+3
Function Call: WRITE
  • Prompt: !,$C(7),"You don't have a DUZ."
  • Line Location: TALK+1
Function Call: WRITE
  • Prompt: !,"Attempting to connect...."
  • Line Location: TALK+13
Function Call: WRITE
  • Prompt: !,$C(7),"Could not connect to ",XMSITE,"."
  • Line Location: TALK+19
Function Call: WRITE
  • Prompt: !,"You are back at ",^XMB("NETNAME"),"."
  • Line Location: TALK+20
Routine Call
  • DIR
  • Line Location:
    • D+2
    • HELP+5
Routine Call
  • %ZIS
  • Line Location:
    • GO1+2
Routine Call
  • %ZIS
  • Line Location:
    • DQ+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF( N+4
^%ZOSF("EOFF" ENT+9
^%ZOSF("NBRK" ENT+3
^%ZOSF("PRIORITY" ENT+4, QQ+5
^%ZOSF("RM" T+3
^%ZOSF("TRAP" ENT+6
^DIC(15 D+9
^TMP("XMY" DQ+17!
^TMP("XMY0" DQ+17!
^VA(200 - [#200] N+3
^XMB("NETNAME" TALK+20
^XMB(3.9 - [#3.9] DQ+16*, T1+3*
^XUSEC("XMMGR" HELP+7

Label References

Name Line Occurrences
D Q+11, D+2
DQ D+15, ABEND+7
ENT TALK+23
G ENT+14, D+4, D+7, D+14, D+16, D+22
GO1 ECHO+3
HELP XMCTLK+8, TALK+6
INIT XMCTLK+6, GO1+3
N DQ+10
Q S+3, S+5
QQ DQ+11, DQ+12, DQ+15
R R+10, R+14, S+3, S+14, G+6
T ENT+11, D+4, D+10, G+4
T0 R+10, R+11, R+14, D+4, DQ+13
T1 T1+4
U D+12

Naked Globals

Name Field # of Occurrence
^( ENT+9, N+4
^("EON" ENT+9
^("PRIINQ" ENT+3
^("RM" ENT+9
^("TRMRD" ENT+9
^("TYPE-AHEAD" ENT+9
^(200 N+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DQ+16, QQ+6!
%H D+18!, DQ+15!
%I D+18!, DQ+15!
%ZIS GO1!, GO1+1*
>> A ENT+8*, R+3*, R+5, R+10, R+13, R+14, S+3*, S+10, S+12, D+4*
, N+4*
>> D ENT+8*, ENT+12*, R+5*, D+1, D+3*, D+13*, DQ+13*, T0+1*, T0+2*, T1+1*
, T1+2*, T1+3*
DIC TALK+3~
DIR Q+6!, QQ+6!, HELP+1~
DIR("??" Q+10*
DIR("A" HELP+3*
DIR("B" Q+9*, HELP+4*
DIR("T" Q+7*
DIR(0 Q+8*, Q+11*, Q+12*, HELP+2*
>> DIRUT HELP+5
DTIME S+3
>> DTOUT D+2
DUZ XMCTLK+4, GO1+3, DQ+18, N+3, HELP+7, TALK+1
DUZ(0 HELP+7
>> ER TALK+17
>> I ENT+9*, T0+2*
IO GO1+4, ENT+2, ENT+13, R+2, S+3, S+9, G+1, DQ+6
IO(0 GO1+4, R+10, R+12, S+2, S+8, Q+1, ABEND+2, N+1, T+1, TALK+22
IOF ENT+2
>> POP GO1+2
>> R R+3, R+9*
TK ENT+1~, ENT+10*, S+3*, S+6*
TL ENT+1~, ENT+10*, R+8, R+10*, R+14*, S+3*
TN ENT+1~, ENT+10*, R+7*, R+8, R+10, R+14, S+3
TP ENT+1~, ENT+10*, R+8*, R+10*, R+14*, S+3*, S+7*, S+8*, S+12*
U DQ+13, DQ+16, N+3, T1+1, TALK+11
X ENT+3*, ENT+6*, D+2*, D+4, D+7, D+8~, D+14, D+15, QQ+4*, N+3*
, T+2*, HELP+1~
X1 QQ+6!
X2 QQ+6!
>> XM ENT+8*, TALK+12*
XMA ENT+9*, R+6, S+4, QQ+6!
XMA0 D+1*, D+3, QQ+6!, INIT+2!, TALK+3~
XMABORT XMCTLK+5~, XMCTLK+7*, XMCTLK+8, HELP~, HELP+5*, TALK+2~, TALK+5*, TALK+6, TALK+10
XMB TALK+2~, TALK+10
XMB("SCR REC" , TALK+11
XMB0 ENT+9*, G+2, QQ+6!, T+3, INIT+2!, TALK+3~
XMB0("RM" ENT+9*, G+2
XMC TALK+2~
XMC("TALKMODE" R+1, R+4, TALK+5*
XMC0 ENT+9*, Q+5, G+3, ABEND+6, QQ+6!, N+2, T+4, INIT+2!, TALK+3~
XMCNT TALK+3~
XMD0 ENT+8*, D+17*, DQ+12, DQ+13, DQ+14*, DQ+15, DQ+16, QQ+6!, T1+1*, T1+3*
, INIT+2!, TALK+3~
>> XMDUN D+19, INIT+3
XMDUZ XMCTLK+5~, GO1+3, Q+11, DQ+18, INIT+3, TALK+2~, TALK+14, TALK+16*
XMDUZO TALK+14*, TALK+16!
XME0 S+3, QQ+6!, U+1*, INIT+2!, TALK+3~
XME0(0 ENT+3*, R+10, R+14, S+13, G+5
XMF0 ENT+9*, Q+5, G+2, ABEND+6, QQ+6!, T+3, INIT+2!, TALK+3~
XMG0 GO!, QQ+6!, ECHO+1!, TALK+3~
XMG0( ENT+9*
XMG0("EON" S+8, S+11, G+3, T+4, ECHO+2*
XMG0("NBRK" Q+5, G+2, ABEND+6, T+3
XMG0("TRMOFF" Q+5, ABEND+6, DQ+8
XMG0("TRMON" G+2, T+3
XMINST TALK+2~, TALK+10
XMIO TALK+2~, TALK+11*
XMLER TALK+3~
XMLINE TALK+3~
XMOKTYPE TALK+2~, TALK+10
XMOKTYPE("TELNET" TALK+9*
XMP ENT+3*, QQ+4, QQ+6!
XMSITE TALK+2~, TALK+10, TALK+19
XMSUB ENT+1~, Q+12, D+14!, D+16*, D+19*, DQ+13*, QQ+6!, T0+1
XMV XMCTLK+5~, TALK+2~
XMY DQ+17!
XMY( DQ+18*
XMZ ENT+1~, D+16, DQ+11, DQ+12, DQ+16, DQ+20, QQ+7*, T1+3, INIT+3!
>> XQH HELP+7*
Y ENT+3, R+10, S+1*, S+5, S+6, S+8, S+10, S+11, D+13*, DQ+13*
, T0+1, T1+1, HELP+1~, HELP+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All