Routine: XUTMONH1

Information

XUTMONH1 ;SEA/RDS - TaskMan: Option, XUTMON, Part 4 (Help Modules) ;5/12/94 12:11

Name	Comments	DBIA/ICR reference
PRINT	;Subroutine--Print A Task
OUT	;Tag for breaking FOR scope to exit early
SCHED	;Display Schedule List
WAIT	;Display Waiting Lists
W0	;WAIT Subroutine--Extending IO Loop
WAIT1	;Display One Waiting List
W1	;WAIT1 Subroutine--Extending Loop
W2	;WAIT1--prompt user for a device
W3	;W2--?? help for device selection
WCNT	;W3--count tasks waiting for each device

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PRINT+2
Function Call: WRITE	Prompt: @IOF Line Location: PRINT+2
Function Call: WRITE	Prompt: !!,"The Schedule List is empty." Line Location: SCHED+3
Function Call: WRITE	Prompt: ! Line Location: SCHED+4
Function Call: WRITE	Prompt: !!,"The Device Waiting Lists are empty." Line Location: WAIT+3
Function Call: WRITE	Prompt: ! Line Location: WAIT+4
Function Call: WRITE	Prompt: ! Line Location: W1+3
Function Call: WRITE	Prompt: $C(7) Line Location: W2+7
Function Call: WRITE	Prompt: !!?5,"These are the devices with waiting tasks:",! Line Location: W3+2
Function Call: WRITE	Prompt: !?5,ZT2 Line Location: W3+3
Function Call: WRITE	Prompt: ?40,ZTC," task",$S(ZTC=1:"",1:"s") Line Location: W3+3