Routine: XUTMRP

Package	Total	Call Graph
Kernel	4	^%ZIS $$FMTE^XLFDT ^XUTMRP1 ENV^XUTMUTL
VA Fileman	2	^DIC ^DIR

Package	Total	Caller Graph
Kernel	3	XUTM REPNT XUTM RP XUTMRP1

Entry Points

Name	Comments	DBIA/ICR reference
OPT
FUT
DEV2	;Return Y=0 to quit
ASKD(%A,%B)	;Ask for a device
DT(MES,DEF)
DEVNAM(ARRAY)	;Build @ARRAY@(devname) from DEVNAM
REP2	;
DEV
DVARRY(II,LTA,OOS)	;Build list of devices for a LTA.
INIT	;Setup
EXIT
REPNT	;Re-queues tasks to new lta# when dsv/ports are changed
CONF
LISTIO	;List the entries in the IO queue.
D0	;
WAIT

External References

Name	Field # of Occurrence
^%ZIS	D0+1
^DIC	ASKD+3
^DIR	OPT+2, WAIT+1, FUT, REP2+2, REP2+9, DT+2, LISTIO+8
$$FMTE^XLFDT	FUT+6
^XUTMRP1	CONF+4, REPNT+4
ENV^XUTMUTL	INIT+1, REPNT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: OPT+0
Function Call: WRITE	Prompt: ! Line Location: OPT+3
Function Call: WRITE	Prompt: ! Line Location: FUT+0
Function Call: WRITE	Prompt: !,"Now give a date/time range of future tasks to change." Line Location: FUT+2
Function Call: WRITE	Prompt: ! Line Location: REP2+2
Function Call: WRITE	Prompt: !,"There are NO tasks waiting for this device.",! Line Location: REP2+4
Function Call: WRITE	Prompt: ! Line Location: REP2+6
Function Call: WRITE	Prompt: !,$C(7),$P(SRCE,";")," margin ",$P(SRCE,";",3)," page length ",$P(SRCE,";",4),$C(7) Line Location: DEV2+4
Function Call: WRITE	Prompt: !,"doesn't match ",$P(ZTIO,";")," margin ",$P(ZTIO,";",3)," page length ",$P(ZTIO,";",4) Line Location: DEV2+5
Function Call: WRITE	Prompt: !,"Please confirm target device.",!,"If I can find a matching margin/page length",!,"I'll use it for the default.",!!,$C(7) Line Location: DEV2+6
Function Call: WRITE	Prompt: @IOF Line Location: LISTIO+2
Function Call: WRITE	Prompt: !," $IO Device names",!,"_______ ____________" Line Location: LISTIO+3
Function Call: WRITE	Prompt: !,DEV,?14," => " Line Location: LISTIO+6
Function Call: WRITE	Prompt: !,?18 Condition for execution: $X+$L(Y)+2>79 Line Location: LISTIO+7
Function Call: WRITE	Prompt: Y,", " Line Location: LISTIO+7
Function Call: WRITE	Prompt: @IOF Line Location: LISTIO+8
Routine Call	DIC Line Location: ASKD+3
Routine Call	DIR Line Location: OPT+2 WAIT+1 FUT REP2+2 REP2+9 DT+2 LISTIO+8
Routine Call	%ZIS Line Location: D0+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	DVARRY+2, D0+2, LISTIO+7
^%ZTSCH("IO"	REP2+4, LISTIO+4, LISTIO+5
^TMP($J	INIT+3!, EXIT+2!, REPNT+2!

Label References

Name	Line Occurrences
$$DT	FUT+3, FUT+4, REP2+16
ASKD	DEV, DEV+2, REP2+6, DEV2+10
D0	DEVNAM+2, DVARRY+3, DEV2+1, DEV2+11
DEV2	DEV+3
DVARRY	DEV+1, DEV+5, REP2+13, DEV2+7
EXIT	INIT+5, DEV, DEV+2, DEV+4, REPNT+4
REP2	REPNT+3
WAIT	INIT+4, REP2+1

Naked Globals

Name	Field # of Occurrence
^("TYPE"	DVARRY+3
^(0	DVARRY+3, D0+2
^(90	DVARRY+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%A	ASKD~, ASKD+1
%B	ASKD~, ASKD+1
>> %ZIS	D0+1*
ARRAY	DEVNAM~, DEVNAM+2
CONFDEV	DEV+1*, DEV+5, EXIT!, DEV2+2, DEV2+3, DEV2+8
CONFDEV(	DEV+5, CONF+1, CONF+2, REP2+15*
DEF	DT~
DEFDEV	DEV2+9*, DEV2+10!
DEL	EXIT!
DEV	DEV+1, DEV+5, CONF+2, EXIT!, ASKD+4, DEV2+1, DEV2+11, LISTIO+1~, LISTIO+2, LISTIO+4 , LISTIO+5, LISTIO+6, LISTIO+7, LISTIO+8*
DEVNAM	CONF, CONF+1, CONF+2, EXIT!, DEVNAM+1, DEVNAM+2, DEV2+8*, DEV2+9, DEV2+10!
DEVNAM(	DEVNAM+2!, DEV2+8
DIC	DEV!, DEV+2!, EXIT!, ASKD+1~, ASKD+2*, REP2+7!, DEV2+10!
DIC("A"	ASKD+1*
DIC("B"	ASKD+1*
DIC("S"	ASKD+2*
DIC(0	ASKD+2*
DIR	INIT+3~, OPT+2!, WAIT+1!, FUT!, REP2+8!, DT+2!, LISTIO+1~
DIR("?"	OPT+1, REP2+2, DT+1*
DIR("A"	OPT, WAIT+1, FUT, REP2+2, REP2+8, DT
DIR("B"	OPT+1, WAIT+1, FUT, DT
DIR(0	OPT, WAIT+1, FUT, REP2+2, REP2+8, DT+1, LISTIO+8*
DIRUT	OPT+2, EXIT!, WAIT+1, FUT, REP2+1, REP2+3, LISTIO+8
DT	DVARRY+3
DUOUT	OPT+2, EXIT!, WAIT+1, FUT, REP2+1, REP2+3
DUZ	INIT+1, REPNT+1
EDATE	EXIT!, FUT+6*
EDT	EXIT!, FUT+4, FUT+5, FUT+6
EXIT	REPNT+2!, REPNT+4, REP2+1, REP2+3, REP2+4, REP2+5, REP2+7, REP2+9
FUT	INIT+3~, INIT+5, EXIT!, WAIT, FUT, FUT+1
I	EXIT!, LISTIO+1~, LISTIO+7*
II	EXIT!, DVARRY~, DVARRY+3, REP2+14, REP2+15
IO("DOC"	D0+3
IO("HFSIO"	D0+5
IO("P"	D0+3
>> IOCPU	D0+4
IOF	LISTIO+2, LISTIO+8
IOM	D0+3
ION	D0+2
>> IOP	DEVNAM+2, DVARRY+2, DEV2+1, DEV2+11
>> IOPAR	D0+5
>> IOS	D0+2
IOSL	D0+3, LISTIO+8
IOST	D0+3
>> IOT	D0+5
LTA	DEV+1, DEV+5, EXIT!, ASKD+4, DVARRY~, DVARRY+2, REP2+10, REP2+12, DEV2+7
MEFEND	INIT+3~, INIT+5, EXIT!
MES	DT~
NEWDEV	EXIT+1!
NEWDEV(	CONF+2, REP2+15
>> NEWLTA	REP2+12*, REP2+13
OLDDEV	EXIT+1!
OLDDEV(	CONF+1, CONF+2, DEV2+2, DEV2+3, DEV2+8
OLDLTA	DEV+1, EXIT+1!, REP2+5, REP2+10, REP2+13
OOS	DVARRY~, DVARRY+1*, DVARRY+3
OPT	OPT+2*, EXIT+2!
POP	EXIT+1!, D0+2
>> REPNT	REPNT+2*
SDATE	EXIT+1!, FUT+6*
SDT	EXIT+1!, FUT+3, FUT+5, FUT+6
SN	EXIT+1!, DVARRY+1~, DVARRY+2*
SRCE	EXIT+1!, DEV2+3*, DEV2+4
U	ASKD+4, DVARRY+2, DVARRY+3, D0+2, LISTIO+7
WAIT	INIT+3~, INIT+5, EXIT+1!, WAIT, WAIT+1
XQH	EXIT+1!
XUCPU	INIT+1, EXIT+1!, DVARRY+3, REPNT+1, D0+4*
XUTMDTH	INIT+3~, EXIT+2!, REP2+16*
>> XUTMUCI	INIT+1, REPNT+1
Y	OPT+2, DEV, DEV+2, DEV+4, EXIT+1!, ASKD+3, WAIT+1, FUT, REP2+4, REP2+5 , REP2+7, REP2+9, DEV2+1, DEV2+10, DT+3, LISTIO+1~, LISTIO+7
Y(0	ASKD+4
>> ZDT	FUT+5*
ZTC	EXIT+2!
ZTDH	EXIT+1!
ZTIO	EXIT+1!, DEVNAM+2, DVARRY+3, DEV2+2, DEV2+5, D0+2, D0+3
ZTIO("H"	D0+5*
ZTIO("P"	D0+5*
ZTKEY	EXIT+2!
ZTMD	EXIT+2!, DVARRY+2*, DVARRY+3
ZTNAME	EXIT+2!
ZTOPT	EXIT+2!
ZTSK	EXIT+2!
ZTUCI	EXIT+2!

Customize PDF page

Package: Kernel

Routine: XUTMRP

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: