Routine: XQ75

Information

XQ75 ;SEA/AMF,LUKE,JLI,BT - Lookup response for jumps ;6/14/2011

Source Information

Source file <XQ75.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Kernel	7	($$HDIFF,$$NOW)^XLFDT $$UP^XLFSTR (MERGE,MGPXU)^XQ12 REACT^XQ84 NEXT^XQ92 ^XQCHK ^XQSET

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

Package	Total	Caller Graph
Kernel	3	XQ XQHLP XQTOC

Entry Points

Name	Comments	DBIA/ICR reference
X	;Unless exact match is found, find all possibilities in any XQDIC
C	;Display a screen-load of 19 possibilities and ask for a choice
ASK
S	;Entry from XQ: Search primary, common, and secondary menus for XQUR
W	;Write out remaining text and return to XQ
OUT	;Exit here
FIND(XQDIC)	;The expected 0th node in ^XUTL is not here
P	;Entry point for '"' jump to XUCOMMAND options
CHCKTM(XQIEN)	;check Restriction time/date

External References

Name	Field # of Occurrence
$$HDIFF^XLFDT	S+20, S+30, S+47
$$NOW^XLFDT	CHCKTM+3
$$UP^XLFSTR	S+7, P+2
MERGE^XQ12	S+17, S+20, S+43, S+47, FIND+14
MGPXU^XQ12	S+27, S+30, FIND+13
REACT^XQ84	S+16
NEXT^XQ92	CHCKTM+3
^XQCHK	X+3, S+39
^XQSET	S+34

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: C+7
Function Call: WRITE	Prompt: !?4,XQJ,?9,$P(XQ(XQJ),U,2) Line Location: C+7
Function Call: WRITE	Prompt: !?4,XQJ,?9,$P(XQ(XQJ),U,2) Line Location: C+7
Function Call: WRITE	Prompt: !!,"Type '^' to stop, or choose a number from 1 to ",XQ," :" Line Location: ASK+0
Function Call: READ	Variable: XQJ Timeout: DTIME Line Location: ASK+1
Function Call: WRITE	Prompt: $C(7)," ??",! Line Location: ASK+3
Function Call: WRITE	Prompt: " " Line Location: ASK+10
Function Call: WRITE	Prompt: $C(7),$P(XQ(XQJ-1#20+1),U,4),! Line Location: ASK+12
Function Call: WRITE	Prompt: $C(7) Line Location: S+1
Function Call: WRITE	Prompt: $E(XQ("S",+XQY),$L(XQUR)+1,99)," ",$P(XQY0,U,2) Line Location: W+2
Function Call: WRITE	Prompt: $E($P(XQY0,U,2),$L(XQUR)+1,99) Line Location: W+3
Function Call: WRITE	Prompt: " (",XQ("S",+XQY),")" Condition for execution: $D(XQ("S",+XQY)) Line Location: W+3
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: OUT+19
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: P+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19 - [#19]	S+16, S+18, S+28, S+42, S+44, S+62, FIND+3
^VA(200 - [#200]	S+9, S+34
^XTMP("XQO"	FIND+5, FIND+8, FIND+10!, FIND+12!, FIND+17
^XUTL("XQ"	S+4, S+9, S+14
^XUTL("XQO"	X+1, X+2, ASK+8, S+17, S+18, S+27, S+28, S+34, S+38, S+39 , S+43, S+44, S+61, OUT+3, OUT+4, OUT+6, OUT+11, OUT+13, P+8

Label References

Name	Line Occurrences
$$CHCKTM	X+3
ASK	ASK+1, ASK+3
C	X+7, ASK+4, ASK+12, ASK+15, S+34, S+69, P+9
OUT	S+11, S+16, S+22, S+31, S+34, S+35, S+52, S+68, S+69, P+6 , P+8, P+9, P+10
W	S+22, S+31, S+34, S+35, S+53, S+66, P+6
X	X+2, X+3, X+8, S+22, S+31, S+35, S+49, P+6

Naked Globals

Name	Field # of Occurrence
^(	FIND+17*
^("XQM"	S+9*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	X+2, ASK+5~, ASK+6, ASK+7, S+20, S+30, S+47, S+55, S+59, OUT+2~ , OUT+4, OUT+6, OUT+8, OUT+9, OUT+11, OUT+13, OUT+15, OUT+21!, FIND+2~, FIND+3 , FIND+4, FIND+18, P+7, P+8
>> %XQOP	CHCKTM+3
DTIME	ASK+1
DUZ	S+9, S+16, S+34, S+38
I	OUT+21!
J	OUT+21!
U	X+2, X+4, X+5, X+6, C+7, ASK+1, ASK+2, ASK+3, ASK+7, ASK+8 , ASK+12, ASK+16, S+34, S+38, S+39, S+59, S+61, S+62, S+64, W+2 , W+3, OUT+15, P+1, P+8
X	S+58~, S+61, S+62, S+63, S+64, OUT+21!, CHCKTM+1~, CHCKTM+3
XQ	X+6, C+7, ASK, ASK+2, ASK+9, ASK+14, ASK+16!, S+6, S+55!, S+57 , S+68, S+69, OUT+1!, OUT+2, OUT+9, OUT+10, OUT+18, OUT+22!, P+4, P+7!* , P+8, P+9
XQ(	X+6, C+7, ASK+4, ASK+6, ASK+9!, ASK+10, ASK+12, ASK+15, S+55, S+68 , OUT+15, P+7
XQ("S"	X+4, C+7, S+55, W+2, W+3, P+7*
XQ("X"	X+2, X+6, S+55, P+7*
XQ(1	S+59, P+8
XQ1	X+6, X+7, C+7, ASK+13, ASK+14, S+6, S+55, OUT+21!, P+4
XQAP	OUT+21!
XQCY	X+3, S+39, OUT+21!
XQCY0	X+3*, OUT+21!
XQD	ASK+5~, ASK+7*, ASK+8, ASK+10
XQDIC	X+1, X+2, X+5, X+6, ASK+10, ASK+16, S+2, S+3, S+14, S+16 , S+17, S+18, S+20, S+25, S+27, S+28, S+34, S+41, S+43, S+44 , S+47, S+60, S+61, S+62, OUT+3, OUT+4, OUT+6, OUT+11, OUT+13, FIND~ , FIND+1, FIND+3, FIND+5, FIND+8, FIND+10, FIND+12, FIND+13, FIND+17, P+6, P+8
XQDIC19	S+18, S+19, S+20, S+28, S+29, S+30, S+44*, S+45, S+46, S+47 , OUT+21!
XQFLG	FIND+6~, FIND+7, FIND+13, FIND+14
XQI	C+7, S+55, OUT+10, OUT+11, OUT+13, OUT+15, OUT+21!, P+7
XQIEN	CHCKTM~, CHCKTM+2
XQJ	C+7, ASK+1, ASK+2, ASK+3, ASK+4, ASK+6, ASK+9, ASK+10, ASK+12, ASK+13 , ASK+14, ASK+15, ASK+16, S+6, OUT+21!, P+4
XQJMP	S+6, OUT+21!, P+4
>> XQJS	S+11
XQK	S+38*, S+39, S+41, OUT+21!
XQO	X+1, X+2, X+4, X+5, S+7, S+8, S+31, S+34, S+41, OUT+21! , P+2, P+3, P+5
XQO1	S+8, S+31, S+34, S+41, OUT+21!, P+5
XQP	ASK+5~, ASK+7*, ASK+10
>> XQPSM	ASK+10, S+2, S+17, S+20, S+43, S+47, S+59, S+60, P+8*
XQS	X+5, C+7, ASK+13, S+6, S+57, S+68, OUT+21!, P+4*, P+8
XQSAVE	S+17, S+20, S+40~, S+43, S+47
XQSFLG	S+64*, S+66!
XQST	S+41*, OUT+21!
XQT1	FIND+2~, FIND+6~, FIND+7*, FIND+10, FIND+11
XQT2	FIND+2~, FIND+6~, FIND+8*, FIND+9, FIND+10, FIND+11
>> XQTT	S+4*
XQUD	X+5, X+6, S+38*, S+39, OUT+21!
>> XQUR	X+1, X+5, X+8, ASK+10, ASK+16, S+1, S+7, S+8, S+22, S+31 , S+34, S+35, S+38, S+49, S+53, W+2, W+3, P+1, P+2, P+3 , P+5, P+6
XQXT	X+5, X+7, S+6, S+34, S+55, OUT+21!, P+4*, P+7, P+9
XQXT(	X+5*, S+55, P+7
XQXT("S"	X+5*, S+55, P+7
XQXT("X"	X+5*
XQXUTL	S+18, S+19, S+20, S+28, S+29, S+30, S+44, S+46, S+47, OUT+21!
>> XQY	X+2, X+3, X+4, X+5, X+6, X+8, ASK+2, ASK+10, ASK+14, ASK+16 , S+1, S+2, S+6, S+16, S+22, S+31, S+34, S+35, S+38, S+49 , S+52, S+59, S+61, S+62, S+68, S+69, W+2, W+3, OUT+3, OUT+4 , OUT+6, OUT+11, OUT+13, P+1, P+4, P+6, P+8, P+9
>> XQY0	X+2, X+3, X+5, X+6, ASK+8, ASK+9, S+64, W+2, W+3, P+8
XQYY	X+2*, X+4, X+5, OUT+21!
Y	ASK+5~, ASK+6, ASK+8, ASK+10, OUT+21!, CHCKTM+1~, CHCKTM+2

Customize PDF page

Package: Kernel