©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
LRTASK ;SLC/RWF- QUEUE A TASK TO RUN ; 2/24/87 8:17 PM ;
Source file <LRTASK.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LOAD | ;from LROC
|
|
| SET | ||
| TSK | ||
| DEV | ||
| TIME | ||
| SAVE | ;WILL SAVE LOCAL SYMBOL TABLE IN ^%ZTSK(ZTSK,
|
|
| WAIT |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("UCI" | SET |
| ^%ZTSCH( | TSK+2*, DEV+1* |
| ^%ZTSK - [#14.4] | TSK, TSK+1*, LOAD+1 |
| ^%ZTSK(0 | TSK* |
| ^DD("OS" - [#.7] | SAVE+3 |
| Name | Line Occurrences |
|---|---|
| LRTASK | SAVE+1, DEV+1, WAIT+1 |
| SAVE | DEV+1 |
| TIME | DEV+1, WAIT+1 |
| TSK | TSK |
| Name | Field # of Occurrence |
|---|---|
| ^( | LOAD+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | LOAD+1* |
| %DT | TIME*! |
| %DT("A" | TIME* |
| >> %H | TIME+1 |
| %IS | DEV*!, WAIT* |
| >> %X | LOAD+1* |
| >> %Y | LOAD+1* |
| DUZ | TSK+1 |
| IO | SAVE+2! |
| IO(0 | DEV |
| IOF | SAVE+2! |
| IOM | SAVE+2! |
| ION | DEV+1, WAIT+1 |
| IOP | DEV*!, WAIT* |
| IOSL | SAVE+2! |
| IOST | SAVE+2! |
| LRIO | TSK+2!, DEV+1*, WAIT+1* |
| LRIOZERO | DEV*, DEV+1! |
| LRPGM | TSK+1, TSK+3! |
| LRTIME | TSK+1, TSK+2!, SAVE+1*, DEV+1*, TIME*, TIME+1*, WAIT+1* |
| >> POP | DEV, WAIT |
| U | SET*, TSK+1 |
| >> X | SAVE+3*, TIME, TIME+1* |
| >> Y | TSK+1, LOAD+1*, TIME, TIME+1 |
| >> Z | LOAD+1* |
| ZTSK | TSK*, TSK+1, TSK+2, SAVE+1, SAVE+3, LOAD+1, DEV+1! |