©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
ZISX ;SF/GFT,AC - PROGRAM THAT XECUTES NODES IN ^%ZIS GLOBAL. ;10/26/2011
Source file <ZISX.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| X31 | ;X ^%ZIS(2,+IOST(0),3.1) Q ;Old code
|
|
| XECUTE(NODE) | ;
|
|
| CLOSE | ;
|
|
| XS | ||
| XW | ||
| XPOX(X) | ;Execute pre-open execute code.
|
|
| PREOPEN(X) | ;
|
|
| X11 | ||
| X10 | ||
| X3 | ||
| XPCX |
| Name | Field # of Occurrence |
|---|---|
| $$REPLACE^XLFSTR | XECUTE+5 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(1 - [#3.5] | XPCX, XPOX+1 |
| ^%ZIS(2 - [#3.2] | X3, X10, X11 |
| Name | Line Occurrences |
|---|---|
| XECUTE | X3, X10, X11, XPCX, XPOX+1, %Y |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %Y | %Y |
| >> %ZIS("S" | XS |
| >> %ZIS("W" | XW |
| >> %ZTYPE | XECUTE+1 |
| IO("S" | X10, X11! |
| >> IOS | XPCX |
| IOST(0 | X3 |
| >> IOT | XECUTE+1 |
| NODE | XECUTE~, XECUTE+5*, XECUTE+6, XECUTE+8 |
| REPLACE | XECUTE+2~, XECUTE+5 |
| REPLACE("CLOSE^NVSPRTU" | XECUTE+4* |
| REPLACE("PREOPEN^NVSPRTU" | XECUTE+3* |
| X | XPOX~, XPOX+1, PREOPEN~, PREOPEN+1 |