Routine: XQ21

Package	Total	Call Graph
Kernel	2	^%ZIS (LIST,M6)^XQ2
MailMan	1	EN^XMA7

Entry Points

Name	Comments	DBIA/ICR reference
USERN	;
HOW
DISP	;Code brought over from old XQ2. Not called anywhere that I know of.
USER	;This routine is called by the XUUSERDISP option.
OUT	;Clean up

External References

Name	Field # of Occurrence
^%ZIS	USERN+1, USERN+5
EN^XMA7	HOW+1
LIST^XQ2	DISP+1
M6^XQ2	DISP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,@IORV,$P(^VA(200,DUZ,0),U,1),@IORVX," (#",DUZ,")",?30,"DEVICE: ",@IORV,ION,@IORVX," ($I: ",$I,")",?65,"JOB: ",@IORV,$J,@IORVX Line Location: USERN+6
Function Call: WRITE	Prompt: !!,"ENVIRONMENT",?40,"ATTRIBUTES",!,$E(XQDSH,1,11),?40,$E(XQDSH,1,11) Line Location: USERN+7
Function Call: WRITE	Prompt: !?3,"Site ........ ",^DD("SITE"),?43,"Type-ahead ....... ",XQX Line Location: USERN+9
Function Call: WRITE	Prompt: !?3,"UCI ......... ",Y,?43,"Time-out ......... ",DTIME Line Location: USERN+11
Function Call: WRITE	Prompt: !?3,"Signed on ... ",$E(XQX,1,2)_":"_$E(XQX,3,4),?43,"Fileman code(s) .. ",DUZ(0) Line Location: USERN+13
Function Call: WRITE	Prompt: !?3,"Terminal type ",IOST Line Location: USERN+14
Function Call: WRITE	Prompt: !!,"KEYS HELD",!,$E(XQDSH,1,9) Line Location: USERN+15
Function Call: WRITE	Prompt: ?(%#5*15+3),$P(^DIC(19.1,XQX,0),U,1) Line Location: USERN+15
Function Call: WRITE	Prompt: !!,"MENU PATH",!,$E(XQDSH,1,9) Line Location: HOW+0
Function Call: WRITE	Prompt: !,?XQX-1*2,$P(^(XQX),U,3)," (",$P(^(XQX),U,2),")" Line Location: HOW+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: HOW+1
Function Call: WRITE	Prompt: !!,"'^' to escape, <CR> to view Mailman user info: " Line Location: HOW+1
Function Call: WRITE	Prompt: @IOF Line Location: HOW+1
Function Call: WRITE	Prompt: !,"Menu: " Line Location: DISP+1
Function Call: WRITE	Prompt: ! Line Location: DISP+1
Function Call: WRITE	Prompt: !?3,X,! Line Location: DISP+2
Function Call: WRITE	Prompt: !?3,X,! Line Location: DISP+3
Function Call: WRITE	Prompt: !?3,X,! Line Location: DISP+4
Function Call: WRITE	Prompt: !?3,X,! Line Location: DISP+5
Routine Call	%ZIS Line Location: USERN+1 USERN+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	USERN+4
^%ZIS(2 - [#3.2]	USERN+3
^%ZOSF("UCI"	USERN+10
^DD("SITE"	USERN+9
^DIC(19 - [#19]	DISP+1, DISP+2, DISP+3, DISP+4, DISP+5
^DIC(19.1 - [#19.1]	USERN+15
^VA(200 - [#200]	USERN+4, USERN+6, USERN+8, USERN+12, USERN+15
^XTV(8989.3 - [#8989.3]	USERN+4
^XUTL("XQ"	HOW

Naked Globals

Name	Field # of Occurrence
^(	HOW
^("T"	HOW
^("UCI"	USERN+10
^("XUS"	USERN+4
^(1.1	USERN+12
^(20	DISP+2
^(200	USERN+4, USERN+8
^(25	DISP+3
^(5	USERN+3
^(50	DISP+4
^(60	DISP+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	USERN+15*, OUT+1!
>> %ZIS	USERN+5*
D	DISP+1!
>> D0	DISP+1, DISP+2, DISP+3, DISP+4, DISP+5
DTIME	USERN+4*, USERN+11, HOW+1
DUZ	USERN+4, USERN+6, USERN+8, USERN+12, USERN+15, HOW+1
DUZ(0	USERN+13
IOF	USERN+1, USERN+6, HOW+1
ION	USERN+5, USERN+6
IOP	USERN+1!, USERN+5
>> IORV	USERN+3*, USERN+6
>> IORVX	USERN+3*, USERN+6
IOST	USERN+14
IOST(0	USERN+3
U	USERN+3, USERN+4, USERN+6, USERN+8, USERN+15, HOW, HOW+1, DISP+1, DISP+2, DISP+3 , DISP+4, DISP+5
>> X	HOW+1, DISP+1, DISP+2, DISP+3, DISP+4, DISP+5
>> XQDIC	DISP+1*
XQDSH	USERN+2*, USERN+7, USERN+15, HOW, OUT+1!
XQI	USERN+3*, OUT+1!
>> XQL	DISP+1*
>> XQUR	DISP+1*
XQX	USERN+8, USERN+9, USERN+12, USERN+13, USERN+15, HOW, OUT+1!
Y	USERN+10, USERN+11, HOW+1, OUT+1!

Customize PDF page

Package: Kernel

Routine: XQ21

Information

Source Information

Call Graph

Call Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: