©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
%ZTLOAD5 ;SEA/RDS-TaskMan: P I: Task Status ;1/18/08 14:29
Source file <ZTLOAD5.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SEARCH | ;search ^%ZTSCH for task
|
|
| OPTION | ;Find tasks with matching option names
|
|
| RTN | ;Find tasks with matching routines
|
|
| SKIP() | ;Screen on ZTKEY, UCI, DUZ, return: 0=OK, 1=Skip
|
|
| FLAG | ;If we didn't find it in a list, use status flag
|
|
| JOB | ;Return JOB # for running task. Called from JOB^ZTLOAD (*339)
|
|
| ENV | ;Setup
|
|
| INPUT | ;check input parameters for error conditions
|
|
| DESC | ;Find tasks with matching description.
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("UCI" | ENV+2 |
| ^%ZTSCH( | SEARCH+7 |
| ^%ZTSCH("C" | SEARCH+17 |
| ^%ZTSCH("IO" | SEARCH+9, SEARCH+10 |
| ^%ZTSCH("JOB" | SEARCH+12 |
| ^%ZTSCH("LINK" | SEARCH+14, SEARCH+15 |
| ^%ZTSCH("TASK" | SEARCH+1, SEARCH+4, JOB+2 |
| ^%ZTSK - [#14.4] | INPUT+5, INPUT+6, INPUT+7, FLAG+1, FLAG+2, DESC+5, DESC+7, RTN+5, OPTION+5 |
| ^XUSEC("ZTMQ" | ENV+1 |
| Name | Line Occurrences |
|---|---|
| $$SKIP | DESC+6, RTN+6, OPTION+6 |
| ENV | DESC+3, RTN+3, OPTION+2 |
| SEARCH | INPUT+7 |
| Name | Field # of Occurrence |
|---|---|
| ^( | SEARCH+10, SEARCH+12, SEARCH+15, SEARCH+17 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | INPUT+1~, INPUT+3* |
| >> DESC | DESC+2, DESC+7 |
| DUZ | SKIP+3, ENV+1 |
| FLG | OPTION+2~, OPTION+3*, OPTION+4, OPTION+7 |
| >> LST | DESC+4*, DESC+7, RTN+4*, RTN+7, RTN+8, OPTION+3*, OPTION+7, OPTION+8 |
| >> OPNM | OPTION+2, OPTION+3, OPTION+4, OPTION+7, OPTION+8 |
| >> RTN | RTN+2, RTN+4*, RTN+7, RTN+8 |
| U | FLAG+2, SKIP+2, SKIP+3, ENV+1* |
| X | DESC+3~, DESC+5*, RTN+3~, RTN+5*, RTN+7, RTN+8, OPTION+2~, OPTION+5*, OPTION+7, OPTION+8 , SKIP+2, SKIP+3 |
| >> Y | ENV+2 |
| Z1 | JOB+1~*, JOB+2*, JOB+3 |
| Z2 | JOB+1~, JOB+2* |
| >> ZT | FLAG+2*, FLAG+3, FLAG+4, FLAG+5 |
| ZT1 | INPUT+1~, SEARCH+6*, SEARCH+7*, SEARCH+8*, SEARCH+9*, SEARCH+10, SEARCH+11*, SEARCH+12*, SEARCH+13*, SEARCH+14* , SEARCH+15, SEARCH+16*, SEARCH+17* |
| ZT2 | INPUT+1~, SEARCH+9*, SEARCH+10*, SEARCH+14*, SEARCH+15* |
| ZT3 | INPUT+1~ |
| >> ZTKEY | SKIP+1, ENV+1* |
| >> ZTM | JOB+2 |
| ZTSK | INPUT+2*, INPUT+3!*, INPUT+5, INPUT+6, INPUT+7, SEARCH+1, SEARCH+4, SEARCH+7, SEARCH+10, SEARCH+12 , SEARCH+15, SEARCH+17, FLAG+1, FLAG+2, DESC+3~, DESC+4*, DESC+5*, DESC+7, RTN+3~, RTN+4* , RTN+5*, RTN+7, RTN+8, OPTION+2~, OPTION+3*, OPTION+5*, OPTION+7, OPTION+8 |
| ZTSK(0 | INPUT+4*, SEARCH+2*, SEARCH+6, SEARCH+7*, SEARCH+8, SEARCH+9, SEARCH+10*, SEARCH+11, SEARCH+12*, SEARCH+13 , SEARCH+14, SEARCH+15*, SEARCH+16, SEARCH+17*, FLAG+2* |
| ZTSK(1 | INPUT+4*, SEARCH+2*, SEARCH+4*, SEARCH+7*, SEARCH+10*, SEARCH+12*, SEARCH+15*, FLAG+3*, FLAG+4*, FLAG+5* , FLAG+6* |
| ZTSK(2 | INPUT+4*, INPUT+6*, SEARCH+2*, SEARCH+4*, SEARCH+7*, SEARCH+10*, SEARCH+12*, SEARCH+15*, SEARCH+17*, FLAG+3* , FLAG+4*, FLAG+5*, FLAG+6* |
| >> ZTUCI | SKIP+2, ENV+2* |