Routine: A4A7B

Package	Total	Call Graph
Kernel	2	^%ZTLOAD (,NODE,PARTIAL)^A4A7B0

Package

Total

Call Graph

^%ZTLOAD (,NODE,PARTIAL)^A4A7B0

Package	Total	Caller Graph
Kernel	1	A4A7B0

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"TASK",?20,$G(ZTSK) Line Location: TASK+0

Name	Line Occurrences (* Changed, ! Killed)
^DD(	DATADIC+2, DATADIC+4, DATADIC+6, DATADIC+8, FILE, FILE+1
^DIC - [#1]	DATADIC+8
^UTILITY("A4A7B"	A4A7B+2, DATADIC+1, DATADIC+2, DATADIC+15, DATADIC+16, DIE+1, DIE+6, DIE+7, DIE+8, DIE+10* , ROU+3, ROU+4, Q, NEEDLE, STOP, RESTART, TASK
^UTILITY("A4A7B0"	DIE+10!, ROU+4!

Name	Line Occurrences
@(	RESTART
DIE	DIE+8
FILE	DATADIC+4
HORSE	DATADIC+8, DATADIC+9, DATADIC+10, DATADIC+12, DATADIC+14, DIE+5, FILE, FILE+1
NAIL	DATADIC+12, DATADIC+14
NEEDLE	HORSE+1, HORSE+2
Q	A4A7B+2, DATADIC+2

Name	Field # of Occurrence
A4A7B	DATADIC+6, DATADIC+14, Q!
A4A7B("A"	DATADIC+2, DATADIC+3, DATADIC+4, DATADIC+6, DATADIC+8, DIE+2, FILE, FILE+1, NEEDLE
A4A7B("B"	DATADIC+4, DATADIC+5, DATADIC+6, DATADIC+8, DIE+4, FILE, FILE+1, NEEDLE
A4A7B("C"	DATADIC+8, DATADIC+11, DATADIC+13, FILE, FILE+1, NAIL
A4A7B("D"	DATADIC+11, DATADIC+12, DATADIC+13
A4A7B("DIE"	DIE+1*, DIE+2, DIE+3, DIE+4, DIE+5, DIE+6, DIE+9!
A4A7B("E"	DATADIC+13*
A4A7B("FIND"	ROU+1*, ROU+4
A4A7B("FIRST"	ROU+3*
A4A7B("HAY"	DATADIC+8, DATADIC+9, DATADIC+10, DATADIC+12, DATADIC+14, DIE+5, FILE, FILE+1, HORSE+1, HORSE+2 , HORSE+3!, NEEDLE
A4A7B("HORSE"	HORSE*, HORSE+1, HORSE+2, HORSE+3!, NEEDLE
A4A7B("IND"	DATADIC+11, DATADIC+12, DATADIC+13, DATADIC+14
A4A7B("LAST"	ROU+3*
A4A7B("LINE"	ROU+2*, ROU+4
A4A7B("NAIL"	DATADIC+8, DATADIC+9, DATADIC+10, DATADIC+14, DIE+3, FILE, FILE+1, HORSE+3!, NEEDLE, NAIL
A4A7B("NEEDLE"	HORSE+2*, HORSE+3!
A4A7B("NODE"	NAIL
A4A7B("START"	DATADIC+1*, DATADIC+2
A4A7B("STOP"	DATADIC+1*, DATADIC+2
A4A7B("STRING"	ROU*, ROU+3
A4A7B("TEST"	DIE+1*, DIE+2, DIE+3, DIE+8, DIE+9!
A4A7B(0	DATADIC+6!*, DATADIC+7, DATADIC+8, DATADIC+9, DATADIC+10
>> ANS	A4A7B+2
>> X	DIE+8*
>> Z	ROU+3*
>> ZTDESC	TASK*
>> ZTIO	TASK*
>> ZTPRI	TASK*
>> ZTRTN	TASK*
>> ZTSAVE("*"	TASK*
>> ZTSK	TASK

Information

Name	Comments	DBIA/ICR reference
NAIL
HORSE
DATADIC	;start looping though the data dictionary
DIE	;
NEEDLE
STOP
Q
TASK
FILE
ROU
RESTART