| [613] | 1 | XUTMTP0 ;SEA/RDS - TaskMan: ToolKit, Print, Part 2 ;12/16/94 15:47
|
|---|
| 2 | ;;8.0;KERNEL;;Jul 10, 1995
|
|---|
| 3 | ;
|
|---|
| 4 | Q
|
|---|
| 5 | STATUS ;
|
|---|
| 6 | S %=$P(XUTSK(.1),U) I %]"",$T(@%)]"" D @% Q
|
|---|
| 7 | TRAP S XUTSK(.15,ZTC)="This task has an irregular status code." Q
|
|---|
| 8 | ;
|
|---|
| 9 | CODES ;Messages For The Various Status Codes
|
|---|
| 10 | 0 S XUTSK(.15,ZTC)="Incomplete or still being created." Q
|
|---|
| 11 | 1 S XUTSK(.15,ZTC)="Stopped irregularly while scheduled." Q
|
|---|
| 12 | 2 S XUTSK(.15,ZTC)="Being inspected by Task Manager." Q
|
|---|
| 13 | 3 S XUTSK(.15,ZTC)="Stopped irregularly while waiting for a partition." Q
|
|---|
| 14 | 4 S XUTSK(.15,ZTC)="Being prepared." Q
|
|---|
| 15 | 5 S XUTSK(.15,ZTC)="Started running "_XUTSK("UPDATE")_" and stopped irregularly." Q
|
|---|
| 16 | 6 S XUTSK(.15,ZTC)="Completed "_XUTSK("UPDATE")_"." Q
|
|---|
| 17 | A S XUTSK(.15,ZTC)="Stopped irregularly while waiting for a device." Q
|
|---|
| 18 | B S XUTSK(.15,ZTC)="Rejected.",XUTSK(.15,ZTC+1)=$P(XUTSK(.1),U,3),ZTC=ZTC+1 Q
|
|---|
| 19 | C S XUTSK(.15,ZTC)="Error "_XUTSK("UPDATE")_".",XUTSK(.15,ZTC+1)=$P(XUTSK(.1),U,3),ZTC=ZTC+1 Q
|
|---|
| 20 | D S XUTSK(.15,ZTC)="Stopped by "_$S(ZTNAME'=$P(XUTSK(.1),U,10):$P(XUTSK(.1),U,10)_".",1:"you.") Q
|
|---|
| 21 | E S XUTSK(.15,ZTC)="Interrupted while running." Q
|
|---|
| 22 | F S XUTSK(.15,ZTC)="Unscheduled by "_$S(ZTNAME'=$P(XUTSK(.1),U,3):$P(XUTSK(.1),U,3)_".",1:"you.") Q
|
|---|
| 23 | G S XUTSK(.15,ZTC)="Stopped irregularly while waiting for a link." Q
|
|---|
| 24 | H S XUTSK(.15,ZTC)="Edited without being scheduled." Q
|
|---|
| 25 | I S XUTSK(.15,ZTC)="Discarded by Task Manager because its record was incomplete." Q
|
|---|
| 26 | J S XUTSK(.15,ZTC)="Currently being edited." Q
|
|---|
| 27 | K S XUTSK(.15,ZTC)="Created without being scheduled." Q
|
|---|
| 28 | L S XUTSK(.15,ZTC)="Preparing this task caused the submanager an error "_XUTSK("UPDATE")_".",XUTSK(.15,ZTC+1)=$P(XUTSK(.1),U,3),ZTC=ZTC+1 Q
|
|---|
| 29 | ;
|
|---|
| 30 | ;
|
|---|
