Routine: ZU

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

ZU ;SF/RWF - For Open M for NT and Cache! ;03/21/2002 13:46

Source Information

Source file <ZU.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Kernel	5	($$AVJ,LOGRSRC,SHARELIC)^%ZOSV ^%ZTER M1^XQ ^XUS (,BYE,KILL1)^XUSCLEAN

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	1	XUSCLEAN
Survey Generator	1	QAPUTIL2

Entry Points

Name	Comments	DBIA/ICR reference
EN
JOBCHK
ERR	;Come here on error
ERR2
CTRLC
UNWIND	;Unwind the stack
CTRLC2
HALT

External References

Name	Field # of Occurrence
$$AVJ^%ZOSV	JOBCHK
LOGRSRC^%ZOSV	EN+1, HALT+1
SHARELIC^%ZOSV	JOBCHK+2
^%ZTER	ERR2+2
M1^XQ	CTRLC2+5
^XUS	JOBCHK+3
^XUSCLEAN	ERR2+6, CTRLC2, CTRLC2+4
BYE^XUSCLEAN	HALT
KILL1^XUSCLEAN	CTRLC+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!," TROUBLE - CALL IRM NOW! " Line Location: JOBCHK+0
Function Call: WRITE	Prompt: @$S($D(IOF):IOF,1:"#") Line Location: ERR2+3
Function Call: WRITE	Prompt: !!,"RECORDING THAT AN ERROR OCCURRED ---",!!?15,"Sorry 'bout that",!,*7,!?10,"$ZERROR=",$ZERROR Line Location: ERR2+4
Function Call: WRITE	Prompt: !,"--Interrupt Acknowledged",! Line Location: CTRLC+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("PROGMODE"	ERR2+5
^%ZTSCH("LOGRSRC"	EN+1, HALT+1
^XUTL("XQ"	CTRLC2, CTRLC2+1*, HALT

Label References

Name	Line Occurrences
CTRLC2	UNWIND+1, CTRLC2+2
HALT	JOBCHK

Naked Globals

Name	Field # of Occurrence
^(1	CTRLC2+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
IO	ERR2+3, CTRLC
IO(0	ERR2+4, CTRLC
IO(1	ERR2+3
IOF	ERR2+3
IOST	ERR2+3
>> XQPSM	CTRLC2+3*
>> XQY	CTRLC2+1, CTRLC2+3, CTRLC2+4
>> XQY0	CTRLC2+1*, CTRLC2+2
>> XUERF	ERR2+6*
>> Y	ERR2+5