XUTMTP ;SEA/RDS - TaskMan: ToolKit, Print, Part 1 ;04/18/2006 16:19
Source file <XUTMTP.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(XUTSK,XUINX,FLAG) | ;Print one task
|
|
TASK | ;Lookup Task File Data
|
|
SCHED | ;Lookup Task In Schedule File
|
|
SCREEN | ;Apply Screen, If Supplied
|
|
STATUS | ;Determine Status According To Lookup Data
|
|
;Go To XUTMTP1 To Print Task And Quit
|
||
TIME(%ZTT) | ;Convert $H Time To A Readable Time
|
|
ADD(MSG,FLG) | ;Add msg to list
|
|
A | ;STATUS--determine position of late task in Schedule List
|
|
IOQ | ;STATUS--determine position in Device Waiting List
|
|
I1 | ||
JL | ;STATUS--determine position in Job List
|
|
J1 | ||
LL | ;STATUS--determine position in Link Waiting List
|
|
L1 | ||
TASKUSER(TSK) | ;Return the user name for a task
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZTSCH( | SCHED+1 |
^%ZTSCH("IO" | SCHED+2, IOQ+2 |
^%ZTSCH("JOB" | SCHED+3, JL+3 |
^%ZTSCH("LINK" | SCHED+4, LL+3 |
^%ZTSCH("TASK" | TASK+7, SCHED+5 |
^%ZTSK - [#14.4] | TASK+3, TASK+5, TASK+6, SCHED+6, SCREEN+3, TASKUSER+2 |
^DIC(19.2 - [#19.2] | SCREEN+4 |
^VA(200 - [#200] | SCREEN+5, TASKUSER+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | TASK+1~, TIME+2~, TIME+4*, TIME+5 |
%D | TASK+1~ |
%H | TASK+1~, TIME+2~, TIME+4* |
%M | TASK+1~ |
%XD | TIME+2~*, TIME+3*, TIME+4, TIME+5 |
%XT | TIME+2~*, TIME+3*, TIME+5, TIME+6 |
%Y | TASK+1~ |
%ZTT | TASK+1~, TIME~, TIME+1, TIME+2, TIME+3 |
FLAG | EN~, TASK+2*, STATUS+4, STATUS+5, STATUS+6 |
FLG | ADD~, ADD+1 |
MSG | ADD~, ADD+1 |
S1 | TASKUSER+1~, TASKUSER+2*, TASKUSER+3*, TASKUSER+4, TASKUSER+5 |
S2 | TASKUSER+1~, TASKUSER+4*, TASKUSER+6 |
S3 | TASKUSER+1~, TASKUSER+5*, TASKUSER+6 |
TSK | TASKUSER~, TASKUSER+2 |
U | TASK+9, SCHED+1, STATUS+1, TASKUSER+3, TASKUSER+6 |
X | TASK+1~, TASK+7*, TASK+8, TASK+9 |
XUINX | EN~ |
XUTMT | TASK+6!, SCREEN+1! |
XUTMT("S" | SCREEN+1 |
>> XUTMUCI | EN+1 |
XUTSK | EN~, TASK+3, TASK+5, TASK+6, TASK+7, TASK+8*, SCHED+1, SCHED+2, SCHED+3, SCHED+4 , SCHED+5, SCHED+6, SCREEN+3 |
XUTSK( | TASK+5*, TASK+9*, TASK+10*, SCHED+1*, SCHED+2, STATUS+1, STATUS+3, STATUS+4, STATUS+8, ADD+1* |
XUTSK("A" | SCHED+1*, STATUS+2 |
XUTSK("CS" | STATUS+1*, STATUS+8, ADD+1* |
XUTSK("IO" | SCHED+2*, STATUS+4 |
XUTSK("JOB" | SCHED+3*, STATUS+5 |
XUTSK("LINK" | SCHED+4*, STATUS+6 |
XUTSK("TASK" | TASK+9*, SCHED+5*, STATUS+7 |
XUTSK("TASK1" | SCHED+5* |
XUTSK("UPDATE" | STATUS+1*, STATUS+7 |
XUTSK(0 | TASK+5*, TASK+9* |
Y | TASK+1~, TIME+2~, TIME+4*, TIME+5*, TIME+6*, TIME+7 |
ZT | TASK+1~, SCHED+1*, STATUS+2*, STATUS+4*, STATUS+6*, IOQ+2* |
ZT1 | TASK+1~, SCHED+1*, SCHED+2*, SCHED+3*, SCHED+4*, SCREEN+3*, SCREEN+4, STATUS+2*, STATUS+4*, STATUS+6* , IOQ+2, JL+2*, JL+3*, LL+3 |
ZT2 | TASK+1~, SCHED+1*, SCHED+2*, SCHED+4*, SCREEN+4*, SCREEN+5*, IOQ+2*, JL+3*, LL+2*, LL+3* |
ZT3 | TASK+1~, IOQ+2*, LL+3* |
ZTC | TASK+1~, TASK+2*, STATUS+8*, ADD+1* |
ZTD | TASK+1~ |
ZTF | TASK+1~ |
>> ZTFLAG | EN+1 |
ZTI | TASK+1~ |
>> ZTNAME | EN+1 |
ZTO | TASK+1~ |
ZTP | A+1~, IOQ+1~, IOQ+2*, I1, JL+1~, JL+2*, JL+3*, J1, LL+1~, LL+2* , LL+3*, L1 |
>> ZTSK | IOQ+2, JL+3, LL+3 |