Routine: XUTMTA

Information

XUTMTA ;SEA/RDS - TaskMan: ToolKit, Select ;12/12/94 15:21 [ 04/02/2003 8:29 AM ]

Source file <XUTMTA.m>

Package	Total	Call Graph
Kernel	1	^XUTMQ
VA Fileman	1	^DIR

Package	Total	Caller Graph
Kernel	1	XUTMT

Name	Comments	DBIA/ICR reference
SETUP	;SELECT--Setup Reader Input Parameters
HELP1	;SELECT--Default Help For '?'
HELP2	;SELECT--Default Help For '??'
SELECT	;Main Section--Select Task
XFORM	;SELECT--Input Transform

Name	Field # of Occurrence
^DIR	SELECT+2
^XUTMQ	HELP2+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,"Task # ",X," is not defined in this volume set's Task File." Line Location: XFORM+2
Function Call: WRITE	Prompt: !!?5,"While a record does exist for this task, most of the critical data is",!?5,"missing. Please select a different task." Line Location: XFORM+3
Function Call: WRITE	Prompt: !!?5,"You may only select a task that you created. Please select a different",!?5,"task." Line Location: XFORM+4
Function Call: WRITE	Prompt: !!?5,"Select a task by its internal number: an integer between 1 and 999999999." Line Location: HELP1+1
Function Call: WRITE	Prompt: !,"Or by the Index number." Line Location: HELP1+2
Routine Call	DIR Line Location: SELECT+2

Name	Line Occurrences (* Changed, ! Killed)
^%ZTSCH("TASK"	XFORM+2, XFORM+3, XFORM+4, XFORM+6
^%ZTSK - [#14.4]	SELECT+3, XFORM+2, XFORM+3, XFORM+4, XFORM+5, XFORM+6
^TMP($J	SELECT+3, XFORM+1, HELP1+2

Name	Line Occurrences
HELP1	HELP2+1
SETUP	SELECT+2

Name	Field # of Occurrence
^(	XFORM+4, XFORM+5
^(0	XFORM+4, XFORM+5

Name	Field # of Occurrence
>> %ZTSK(	XFORM+1
DDH	SELECT+1~, HELP2+2~
DIR	SELECT+1~, HELP2+2~
DIR("?"	SETUP+3*
DIR("??"	SETUP+4*!
DIR("A"	SETUP+2*
DIR("B"	SETUP+5*
DIR("T"	SETUP+6*
DIR(0	SETUP+1*
DIRUT	SELECT+1~, SELECT+2, SELECT+3, HELP2+2~
DTIME	SETUP+6
DTOUT	SELECT+1~, HELP2+2~
DUOUT	SELECT+1~, HELP2+2~
DUZ	XFORM+4
U	XFORM+4, XFORM+5, XFORM+6
X	SELECT+1~, XFORM+1*, XFORM+2!, XFORM+3!, XFORM+4!, XFORM+5, XFORM+6, HELP2+2~
XUTMT	SELECT+3!
XUTMT("?"	SETUP+3
XUTMT("??"	SETUP+4
XUTMT("A"	SETUP+2
XUTMT("B"	SETUP+5
XUTMT(0	XFORM+4
Y	SELECT+1~, SELECT+2, SELECT+3, HELP2+2~
ZT	SELECT+1~
>> ZTNAME	XFORM+4
ZTSK	SELECT+3!*