Routine: XMAH1CP

Package	Total	Call Graph
MailMan	8	NEW^XMA C1^XMA1 REPLY^XMA11 (KL,S2)^XMA1B ENTS^XMA20 INSTXM^XMA21 ENT1^XMAD1 $$NET^XMRENT
Kernel	1	ENDR^%ZISS

Package

Total

Call Graph

MailMan

NEW^XMA C1^XMA1 REPLY^XMA11 (KL,S2)^XMA1B ENTS^XMA20 INSTXM^XMA21 ENT1^XMAD1 $$NET^XMRENT

Kernel

ENDR^%ZISS

Entry Points

Name	Field # of Occurrence
ENDR^%ZISS	ZIS
NEW^XMA	ENTA+4
C1^XMA1	AZ
REPLY^XMA11	AQ+10
KL^XMA1B	ENTA+4
S2^XMA1B	ENTA+4
ENTS^XMA20	ARN+2
INSTXM^XMA21	ACHK+1
ENT1^XMAD1	ARN+13
$$NET^XMRENT	ARN+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!!," << Message SAVED in IN Basket ! >>",! Line Location: ENTA+3
Function Call: WRITE	Prompt: !!," << LOCAL Reply Sent >>",! Line Location: AQ+11
Function Call: READ	Timeout: DTIME Variable: X Line Location: ARA+0
Function Call: WRITE	Prompt: *7,$S($D(IORVON):IORVON,1:""),!,"Do you wish to send this reply across the network ? YES//",$S($D(IORVOFF):IORVOFF,1:"") Line Location: ARA+0
Function Call: WRITE	Prompt: !!,$C(7)_"Enter 'Yes' if you wish to send this message across the network." Line Location: ARA+5
Function Call: WRITE	Prompt: !,"Enter 'No' if you wish your response to remain local." Line Location: ARA+6
Function Call: WRITE	Prompt: !,"The sender of this message will not see your response if you answer 'No'." Line Location: ARA+7
Function Call: WRITE	Prompt: !!,"CAUTION !!!",!! Line Location: ARA+8
Function Call: WRITE	Prompt: "A network response will go to all message recipients on the mail system" Line Location: ARA+9
Function Call: WRITE	Prompt: !,"of the sender. FOR EXAMPLE, If the sender's address ends '@DOMAIN.NAME'" Line Location: ARA+10
Function Call: WRITE	Prompt: !,"and the message had 500 recipients on FORUM, then a response sent across" Line Location: ARA+11
Function Call: WRITE	Prompt: !,"the network will be delivered to 500 recipients. If you prefer to send a" Line Location: ARA+12
Function Call: WRITE	Prompt: !,"response only to the sender, you should create a new message.",!! Line Location: ARA+13
Function Call: WRITE	Prompt: ! Line Location: ARN+2
Function Call: WRITE	Prompt: !,"Network Reply complete !" Line Location: ARN+13
Function Call: WRITE	Prompt: !!,"Response will only be local !",!! Line Location: ARS+0

Name	Line Occurrences (* Changed, ! Killed)
^TMP("XMY"	AR!
^TMP("XMY0"	AR!
^XMB("NETNAME"	ARN+12
^XMB(3.9 - [#3.9]	ENTA+1, ENTA+2, ARN+1, ARN+3, ARN+5!, ARN+6, ARN+9, ARN+12, IHS+2, IHS1+1

Name	Line Occurrences
ACHK	ARN+11
AQ	ENTA
AR	AQ1+1, IHS1+1
ARA	ARA+14
ARN	AR+2, AR+3, ARA+4
ARQ	ARS
ARS	ARA+2, ARA+4, ARN+3
AZ	ENTA+2, AQ+10
IHS	AQ+9
IHS1	AQ1+2
POP	ARN+13, ARS
ZIS	AR+3

Name	Field # of Occurrence
^("K"	ARN+12*
^("T"	ENTA+2
^(0	ARN+1*
^(5	ARN+12

Local Variables

Name	Field # of Occurrence
%	ARN+12*, ACHK+1~
DTIME	ARA
DUZ	ARN+6
IHS	AQ+9!, AQ1+2!, ARN+1, ARN+14, IHS+2*
IHSNET	AQ+9!, AQ1+2!, AR+2, ARA+1*, ARN+2
IHSREC	AQ+8!, AQ1+1!, AQ1+2!, ARN+10!, IHS1+1
IHSX	AQ1+2!, IHS1, IHS1+1
>> IORVOFF	ARA
>> IORVON	ARA, ZIS
U	ENTA, AQ+8, AQ+10, ARN, ARN+1, ARN+3, ARN+5, ARN+6, ARN+9
X	AQ+10, ARA, ARA+2, ARA+4, ARN+2, ARN+3, ARN+4, ARN+6, ARN+9, ARN+10 , ARN+11, ACHK, ZIS, IHS+1~, IHS+2*
XMCHAN	AQ1+1!, AR+3, ARN+1, ARN+2, ARN+11
>> XMDUZ	ENTA+1, AQ+8, ARN+6
>> XMK	ENTA, ENTA+4*
XMKD	ENTA+4*!
XMKM	ENTA+4*!
>> XMKN	ENTA+4*
>> XMKS	ENTA+4*
>> XMMG	ARN+11, ACHK*
>> XMN	ARN+6*
XMNETREC	AQ+8!, AQ+10!, ARN+1, ARQ!, IHS+2, IHS1+1
XMNETREC("XMR"	ARN+1*, POP
XMNETREC(0	ARN*, ARN+9, ARN+12, POP
>> XMR	ENTA, AQ+8, ARN, ARN+1, ARN+6, POP*
XMSUB	AQ+10!, ARN*, ARN+1, ARN+4, ARQ!
XMY	AR!
XMY0	AR!
>> XMZ	ENTA+1, ENTA+2, ARN, ARN+1, ARN+3, ARN+5, ARN+6, ARN+12, POP, IHS+2 , IHS1+1
>> Y	ENTA+1, ENTA+2, ARN+5, ARN+11, ARN+12, ACHK*
>> Y1	ARN+9, ARN+10

Customize PDF page

Package: MailMan

Routine: XMAH1CP

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
ENTA
ARQ
ARS
AQ1	;I $S('$D(XMNETREC):0,XMNETREC:1,1:0) K XMCHAN D AR ;IHS/MFD comm out
ZIS
IHS	;IHS/MFD added subroutine looking for network recipients
IHS1
POP
AQ	;Is it a network response ? (current code just checks sender)
ARA
AR
ACHK
AZ
ARN

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed