Routine: XQT4

Package	Total	Call Graph
Kernel	3	HOME^%ZIS ^XQDATE FIND^XQT
VA Fileman	3	^DIC ^DIE ^DIK

Package	Total	Caller Graph
Kernel	1	XQT

Entry Points

Name	Comments	DBIA/ICR reference
WRITE	;Write the Entry Action, Menu text, and Exit Action for an option
SHO1	;Write out template name and the first two options in it
WAIT	;That's a screen load hold it here for a minute
LIST	;List all of the options in a particular Menu Template
RNAM	;Rename an exsisting Menu Template
ASKE
K2
K1
KILL	;Remove a template from the New Person File
KIL
ASK
DEED	;Decode the word processing field where templates are stored
SHO	;Show a user his or her template names
OUT	;Clean up and quit

External References

Name	Field # of Occurrence
HOME^%ZIS	SHO+4
^DIC	RNAM+1
^DIE	RNAM+2
^DIK	K1+1
^XQDATE	SHO+4
FIND^XQT	ASKE+4, KILL+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,XQUSER," doesn't have any Templates stored in the New Person File." Line Location: SHO+3
Function Call: WRITE	Prompt: @IOF,!,?10,"The menu templates of ",XQUSER," ",%Y Line Location: SHO+5
Function Call: WRITE	Prompt: @IOF Line Location: SHO1+2
Function Call: WRITE	Prompt: !!,"Template name: ",XQN Line Location: SHO1+3
Function Call: WRITE	Prompt: !,?3,"1st option: ",$S($D(^DIC(19,%1,0))#2:$P(^(0),U,2),1:"* Missing Option *") Line Location: SHO1+4
Function Call: WRITE	Prompt: !,?6,"2nd option: ",$S($D(^DIC(19,%2,0))#2:$P(^(0),U,2),1:"* Missing Option *") Line Location: SHO1+5
Function Call: WRITE	Prompt: !,?9,"Etc." Line Location: SHO1+6
Function Call: READ	Prompt: "Which template? ('^' to quit) ^// " Formatting: !! Timeout: DTIME Variable: XQUR Line Location: ASK+1
Function Call: WRITE	Prompt: !!," Enter the name of one of your templates, 'ALL' to list them all,",!?5,"or '??' to get a list of all your templates." Line Location: ASK+1
Function Call: READ	Prompt: "Are saying you want to print out all your templates? (Y/N) Y// " Formatting: ! Timeout: DTIME Variable: % Line Location: ASK+3
Function Call: WRITE	Prompt: !,"Please answer 'Y' or 'N' to this question." Line Location: ASK+3
Function Call: READ	Prompt: "Show Entry and Exit Actions? (Y/N) N// " Formatting: ! Timeout: DTIME Variable: % Line Location: ASKE+0
Function Call: WRITE	Prompt: !!,"'Y' means you'll see the MUMPS code (if any) executed",!?3,"before and after the option is run. 'N' means you won't" Line Location: ASKE+1
Function Call: WRITE	Prompt: @IOF,!?20,"Menu Template ",XQUR,!! Line Location: DEED+2
Function Call: WRITE	Prompt: !?XQLM,"Entry Action: ",^DIC(19,+XQY,20) Line Location: WRITE+1
Function Call: WRITE	Prompt: !?XQLM,"Header: ",^DIC(19,+XQY,26) Line Location: WRITE+2
Function Call: WRITE	Prompt: !?XQLM,$P(XQY0,U,2)_" ("_$P(XQY0,U)_")" Line Location: WRITE+3
Function Call: WRITE	Prompt: !!?XQLM,"* Fatal Error * Option missing from Option File ***",!?XQLM,"This template will not run. Delete and/or rebuild it." Line Location: WRITE+4
Function Call: WRITE	Prompt: !?XQLM,"Exit Action: ",^DIC(19,+XQY,15) Line Location: WRITE+5
Function Call: WRITE	Prompt: @IOF,?10,"Template ",XQUR," continued..." Line Location: WRITE+6
Function Call: READ	Timeout: DTIME Variable: X Line Location: WAIT+1
Function Call: READ	Prompt: "Which template should be deleted ? " Formatting: !! Timeout: DTIME Variable: XQUR Line Location: KILL+2
Function Call: WRITE	Prompt: !,"Enter a template name, '??' to get a list of your templates",!," or '^' to quit." Line Location: KILL+2
Function Call: WRITE	Prompt: !! Line Location: KILL+3
Function Call: READ	Timeout: DTIME Variable: % Line Location: K1+0
Function Call: WRITE	Prompt: !,"I will remove the Menu Template ",XQUR," permanently. OK? (Y/N) N// " Line Location: K1+0
Function Call: WRITE	Prompt: !,"Please answer 'Y' or 'N' or '^' to quit." Line Location: K1+0
Routine Call	%ZIS Line Location: SHO+4
Routine Call	DIE Line Location: RNAM+2
Routine Call	DIC Line Location: RNAM+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19 - [#19]	SHO1+4, SHO1+5, DEED+3, WRITE+1, WRITE+2, WRITE+5
^VA(200 - [#200]	SHO+1, SHO+3, SHO+6, SHO1+1, ASKE+2, DEED+1, DEED+3, K1+1

Label References

Name	Line Occurrences
ASK	ASK+1, ASK+2, ASK+3, ASKE+4, ASKE+5
ASKE	ASKE+1
DEED	ASKE+2, ASKE+4
K1	K1
K2	K1
KIL	SHO+3
KILL	KILL+2, KILL+3, K1
OUT	ASK+1, ASKE, ASKE+3
SHO	ASK+2, KILL+3
SHO1	SHO+6
WAIT	SHO1+2, ASKE+2, WRITE+6
WRITE	DEED+3

Naked Globals

Name	Field # of Occurrence
^(0	SHO+1, SHO1+4, SHO1+5, DEED+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	KIL!, SHO1+1, SHO1+6, OUT+2!, ASK+3, ASKE, ASKE+1, DEED+3, K1*, RNAM+1!
%1	KIL!, SHO1+1*, SHO1+4, OUT+2!
%2	KIL!, SHO1+1*, SHO1+5, OUT+2!
%Y	SHO+5, KIL!, RNAM+1!
CD	RNAM+1!, RNAM+3!
D	RNAM+3!
D0	RNAM+3!
DA	K1+1, K2!, RNAM+1!, RNAM+2, RNAM+3!
DA(1	K1+1, RNAM+1
DI	RNAM+3!
DIC	RNAM+1*!, RNAM+2, RNAM+3!
DIC("A"	RNAM+1*
DIC("P"	RNAM+1*, RNAM+2
DIC(0	RNAM+1*
DIE	RNAM+2*, RNAM+3!
DIE("P"	RNAM+2*
DIK	K1+1*, K2!
DISYS	RNAM+3!
DQ	RNAM+3!
DR	RNAM+2*, RNAM+3!
DTIME	ASK+1, ASK+3, ASKE, WAIT+1, KILL+2, K1
DUZ	SHO+1, SHO+3, SHO+6, SHO1+1, ASKE+2, DEED+1, DEED+3, K1+1, RNAM+1
FUN	RNAM+1!, RNAM+3!
IOF	SHO+4, SHO+5, SHO1+2, DEED+2, WRITE+6
IOST	SHO1+2, WRITE+6
U	XQT4+3, SHO+1, SHO+2, SHO1+1, SHO1+4, SHO1+5, SHO1+6, OUT+1, LIST+1, ASK+1 , ASK+3, ASKE, DEED+1, DEED+3, WRITE+1, WRITE+2, WRITE+3, WRITE+5, WAIT+1, KILL+1 , KILL+2, K1, RNAM+1*
X	OUT+2!, WAIT+1*
XQ	OUT+2!, DEED+3*, KILL+4!, K2!
XQALL	OUT+2!, ASK, ASK+3, ASKE+2, ASKE+3
>> XQDIC	OUT+1*, LIST+1
XQE	OUT+2!, ASK, ASKE, ASKE+1, WRITE+1, WRITE+2, WRITE+5
XQEX	OUT+2!, DEED+3*
XQI	SHO+2, SHO+6, KIL!, SHO1+1, OUT+2!, DEED+3, KILL+4!, K2!
XQII	OUT+2!, ASKE+2*
XQIT	SHO+2, SHO+6, KIL!, SHO1+2, OUT+2!, ASK, ASK+2~, ASKE+2, DEED+3, WRITE+4* , WRITE+6, WAIT+1*
XQJ	OUT+2!, DEED+1*, DEED+3, KILL+4!, K2!
XQK	ASKE+4, DEED+3*, KILL+4!, K2!
XQLM	OUT+2!, DEED+2, DEED+3, WRITE+1, WRITE+2, WRITE+3, WRITE+4, WRITE+5, WAIT+1*
XQLN	KIL!
XQN	SHO+2, SHO+3, SHO+6, KIL!, SHO1+1, SHO1+3, OUT+2!, DEED+1, DEED+3
XQTSV	OUT+1, OUT+2!, LIST+1*
XQUR	OUT+2!, ASK+1, ASK+2, ASK+3, ASKE+2, DEED+1, DEED+2, WRITE+6, KILL+2*, KILL+3 , K1, K1+1
XQUSER	SHO+1*, SHO+3, SHO+5, KIL!
XQV	SHO+2, SHO+5, KIL!, SHO1+2, SHO1+3, SHO1+4, SHO1+5, SHO1+6, DEED+2, WRITE+1* , WRITE+2, WRITE+3, WRITE+5, WRITE+6
>> XQY	OUT+1, LIST+1, DEED+3, WRITE+1, WRITE+2, WRITE+5
>> XQY0	OUT+1, LIST+1, DEED+3, WRITE+1, WRITE+2, WRITE+3, WRITE+5
Y	OUT+2!, RNAM+1, RNAM+2
>> ZTQUEUED	SHO1+2

Customize PDF page

Package: Kernel

Routine: XQT4

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: