Routine: XQT2

Information

XQT2 ;SEA/Luke - Define a path template ;06/07/99 11:23

Source Information

Source file <XQT2.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Kernel	6	HOME^%ZIS (EN,LIST)^XQ2 DIC^XQ71 EN^XQH ^XQSET ^XQT3

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
Kernel	2	XQT3 XQTNEW

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Entry point for Create a Template Option.
INF
ASK	;Show user the choices and get the next option, if any
RD1
CHK
STORE	;Continued in the program ^XQT3
OUT	;Clean up and quit
O1
BACK	;Back up to last menu-type option and put it on the stack
SET	;Rebuild display nodes if neccissary

External References

Name	Field # of Occurrence
HOME^%ZIS	EN+8
EN^XQ2	RD1+3
LIST^XQ2	ASK+1
DIC^XQ71	RD1+6, RD1+9, RD1+10
EN^XQH	INF+1
^XQSET	SET+1
^XQT3	STORE+2

Interaction Calls

Name	Line Occurrences
Function Call: READ	Variable: XQUR Timeout: DTIME Line Location: INF+0
Function Call: WRITE	Prompt: !?3,"Answer 'Y' if you want some instructions, 'N' if you don't." Line Location: INF+0
Function Call: WRITE	Prompt: @IOF,?18,"CREATING A MENU TEMPLATE",!!?5,"Choose an option, type RETURN to back up one level,",!?5,"'+' to store the completed template, or '^' to quit.",! Line Location: ASK+1
Function Call: READ	Variable: XQUR Timeout: DTIME Line Location: RD1+0
Function Call: WRITE	Prompt: *7,!?3,"Sorry, no jumping." Line Location: RD1+1
Function Call: WRITE	Prompt: !?3,"Enter an option, '+' to store the template,",!?3,"'??' for more help, or '^' to forget the whole thing." Line Location: RD1+2
Function Call: WRITE	Prompt: " ??",*7 Line Location: RD1+11
Function Call: READ	Variable: % Timeout: DTIME Line Location: CHK+0
Function Call: WRITE	Prompt: !!,"A menu template that contains only your log-on menu? Sorry, that's not",!?5,*7,"allowed. Use '^^' to return to your log-on menu instead." Line Location: STORE+1
Routine Call	%ZIS Line Location: EN+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19 - [#19]	EN+2, EN+3, SET+1
^XUTL("XQ"	EN+2, OUT+2
^XUTL("XQO"	SET+1

Label References

Name	Line Occurrences
ASK	RD1+4, RD1+11, RD1+20, CHK, CHK+4, CHK+12
BACK	RD1+4, CHK+7
CHK	CHK
INF	INF
OUT	INF, RD1, STORE+1
RD1	RD1+1, RD1+2, RD1+3
SET	EN+10, CHK+9, CHK+14
STORE	RD1

Naked Globals

Name	Field # of Occurrence
^(	OUT+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+1~, CHK, BACK+1~, BACK+8, BACK+17, BACK+24, BACK+31*
D0	O1!
DA	O1!
DI	O1!
DIC	O1!
DQ	O1!
DR	O1!
DTIME	INF, RD1, CHK
DUZ	RD1+9
IOF	EN+8, INF, ASK+1
IOSL	EN+8
U	XQT2+2, EN+2, EN+4, EN+6, INF, RD1, RD1+14, RD1+16, CHK, CHK+1 , CHK+4, CHK+12, CHK+15, OUT+1, OUT+2, BACK+3, BACK+6, BACK+12, BACK+21, BACK+22 , BACK+24, BACK+25, BACK+29, BACK+30, BACK+31, BACK+33, SET+1
XQA	O1!
XQAA	EN+6, RD1, CHK+15, O1!, BACK+22, BACK+30, BACK+33*
XQCOM	EN+1~, EN+3*, RD1+10
>> XQDIC	XQT2+2, EN+2, EN+4, EN+5, RD1+3, RD1+4, RD1+5, RD1+9, RD1+10, RD1+11 , RD1+16, CHK+1, CHK+8, CHK+13, OUT+1, OUT+2, BACK+6, BACK+22, BACK+24, BACK+25 , BACK+30, BACK+31, SET+1
XQDR	O1!
XQFLAG	O1+1!, BACK+3*
XQFLG	BACK+1~, BACK+2, BACK+7, BACK+10
XQH	INF+1*, O1!
XQH1	O1!
XQH2	O1!
XQI	EN+1~, EN+2, O1!, BACK+21, BACK+22, BACK+24, BACK+28, BACK+29*, BACK+30, BACK+31
XQJ	O1!, BACK+13, BACK+15, BACK+17, BACK+18, BACK+21, BACK+28, BACK+29
XQK	O1!
XQL	O1+1!
XQLIST	O1!
XQLIST(	EN+4, RD1+16, CHK+1, CHK+6, BACK+5, BACK+12, BACK+13, BACK+16, BACK+21, BACK+22 , BACK+23, BACK+24, BACK+25, BACK+29, BACK+30*, BACK+31
XQLIST(0	BACK+5, BACK+6, BACK+22, BACK+30
XQLK	O1!
XQLN	O1+1!
XQMNTMP	EN+1~, EN+2*
XQN	O1!
XQNM	O1!
XQOO	O1!
XQOPN	EN+1~, EN+2, EN+4, RD1+16, CHK+1, CHK+6, STORE+1, O1!, BACK+5, BACK+12 , BACK+13, BACK+15, BACK+16, BACK+22, BACK+23, BACK+25, BACK+30
XQRD	O1!
XQRL	O1!
XQSAV	O1!
XQSAVE	RD1+5*, O1+1!
XQSL	EN+1~
XQSN	O1!
XQT	O1+1!
XQT1	O1+1!, BACK+12, BACK+13, BACK+16, BACK+17
XQTBK1	EN+1~, CHK+4!, CHK+5*
XQTF	EN+1~, EN+2, CHK+2, O1!
XQTF1	EN+1~, EN+2*, O1!
XQTM	O1!
XQTREE	EN+1~
XQTREE(	EN+5*
XQTREN	EN+1~, EN+2, EN+5
XQTRPT	O1!
XQTSAV	RD1+3*, O1+1!
XQTSB	RD1+17*, RD1+20!
XQTSV	XQT2+2, RD1+9, RD1+11, OUT+1, OUT+2, OUT+3!, O1!
XQTT	EN+1~, EN+2, CHK+2, O1!, BACK+17
XQTXT	O1!
XQUR	EN+2, INF, INF+1, RD1, RD1+1, RD1+2, RD1+3, RD1+4, O1!
XQVN	EN+1~, EN+2, EN+4, CHK+1, BACK+25
>> XQY	XQT2+2, EN+2, EN+4, RD1+4, RD1+9, RD1+10, RD1+11, RD1+14, RD1+16, CHK+1 , CHK+2, CHK+8, CHK+13, OUT+1, OUT+2, BACK+6, BACK+22, BACK+24, BACK+25, BACK+30 , BACK+31*
>> XQY0	XQT2+2, EN+2, EN+4, EN+6, RD1+14, RD1+16, CHK, CHK+1, CHK+4, CHK+12 , CHK+15, OUT+1, OUT+2, BACK+3, BACK+22, BACK+24, BACK+25, BACK+30, BACK+31, BACK+33

Customize PDF page

Package: Kernel