©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
LREXEC ; IHS/DIR/FJE - EXECUTE CODE EXPANSION 6/2/86 7:54 AM ;
Source file <LREXEC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETVAL | ;Set value in X into LRSB for test in X1.
|
|
| SETUTL | ;Set ^TMP("LR",$J,"VTO",test) so that a test in X will be verified.
|
|
| LR2 | ||
| LR4 | ||
| DELTA | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(60 - [#60] | SETVAL+1, SETUTL+1 |
| ^LAB(62.07 - [#62.07] | LR2, LR2+1 |
| ^LAB(62.1 - [#62.1] | LR4, LR4+1 |
| ^TMP("LR" | SETUTL+1* |
| Name | Line Occurrences |
|---|---|
| LR2 | LREXEC+4 |
| LR4 | DELTA+1 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LR2+1 |
| ^(0 | SETVAL+1 |
| ^(1 | LR4+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| LREX1 | LREXEC+4*, LREXEC+5!, DELTA+1*, DELTA+2! |
| LREX2 | LREXEC+4*, LREXEC+5!, LR2*, LR2+1, DELTA+1*, DELTA+2!, LR4*, LR4+1 |
| >> LREXEC | LREXEC+4, DELTA+1 |
| >> LRSB( | SETVAL+2* |
| >> Q1 | SETVAL+1*, SETVAL+2 |
| >> Q2 | SETVAL+1*, SETUTL+1* |
| U | LREXEC+4, DELTA+1 |
| >> X | SETVAL+1, SETVAL+2 |
| >> X1 | SETVAL+1, SETUTL+1 |