XUTMTP ;SEA/RDS - TaskMan: ToolKit, Print, Part 1 ;04/18/2006 16:19
Source file <XUTMTP.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| STATUS | ;Determine Status According To Lookup Data | |
| A | ;STATUS--determine position of late task in Schedule List | |
| TASK | ;Lookup Task File Data | |
| SCHED | ;Lookup Task In Schedule File | |
| I1 | ||
| SCREEN | ;Apply Screen, If Supplied | |
| EN(XUTSK,XUINX,FLAG) | ;Print one task | 
 
 | 
| J1 | ||
| IOQ | ;STATUS--determine position in Device Waiting List | |
| JL | ;STATUS--determine position in Job List | |
| TIME(%ZTT) | ;Convert $H Time To A Readable Time | |
| ADD(MSG,FLG) | ;Add msg to list | |
| L1 | ||
| ;Go To XUTMTP1 To Print Task And Quit | ||
| TASKUSER(TSK) | ;Return the user name for a task | |
| LL | ;STATUS--determine position in Link Waiting List | 
| 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 | 
| Name | Line Occurrences | 
|---|---|
| $$TIME | STATUS+1, STATUS+2 | 
| ADD | SCREEN+5, STATUS+2, STATUS+3, STATUS+4, STATUS+5, STATUS+6, STATUS+7, I1, J1, L1 | 
| I1 | IOQ+2 | 
| IOQ | STATUS+4 | 
| J1 | JL+3 | 
| JL | STATUS+5 | 
| L1 | LL+3 | 
| LL | STATUS+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | TASK+5, SCHED+1, SCHED+2, SCHED+3, SCHED+4, SCHED+5 | 
| ^(1 | SCHED+5 | 
| >> | 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 |