©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
ZU ;SF/JLI,RWF - For DSM, TIE ALL TERMINALS TO THIS ROUTINE!! ;07/09/2001 13:31 [ 07/29/2004 9:01 AM ]
Source file <ZUVXD.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 5 | (LOGRSRC,SETENV,SHARELIC)^%ZOSV ^%ZTER M1^XQ ^XUS (,BYE,KILL1)^XUSCLEAN |
| Uncategorized | 4 | ^$&ZLIB.%CRELOG ^$&ZLIB.%DISABLCTRL ^$&ZLIB.%GETDVI ^$&ZLIB.%GETSYM |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SLOT | ;Entry point from ZSLOT
|
|
| UNWIND | ;Unwind the stack
|
|
| EN | ;See that escape processing is off, Conflict with Screenman
|
|
| CONT | ;
|
|
| G | ;Entry point for GUI device.
|
|
| ERR | ;Come here on error
|
|
| LOG | ;Define some nessary Logical names for ZSLOT
|
|
| CTRLC2 | ||
| CTRLC | ||
| ERR2 | ||
| HALT |
| Name | Field # of Occurrence |
|---|---|
| ^$&ZLIB.%CRELOG | LOG+1, LOG+2, LOG+3 |
| ^$&ZLIB.%DISABLCTRL | EN+1 |
| ^$&ZLIB.%GETDVI | CONT+8 |
| ^$&ZLIB.%GETSYM | CONT+4, CONT+6 |
| LOGRSRC^%ZOSV | EN+2, HALT+4, CONT+2 |
| SETENV^%ZOSV | CONT+11 |
| SHARELIC^%ZOSV | EN+6 |
| ^%ZTER | ERR2+5 |
| M1^XQ | CTRLC2+6 |
| ^XUS | EN+7 |
| ^XUSCLEAN | CTRLC2, CTRLC2+4 |
| BYE^XUSCLEAN | HALT |
| KILL1^XUSCLEAN | CTRLC+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZTSCH("LOGRSRC" | EN+2, HALT+4, CONT+2 |
| ^XUTL("XQ" | CTRLC2, CTRLC2+1*, HALT |
| Name | Line Occurrences |
|---|---|
| CONT | UNWIND+1, HALT+1 |
| CTRLC2 | UNWIND+1, CTRLC2+2 |
| EN | SLOT+2 |
| HALT | ERR2+2 |
| LOG | SLOT+2 |
| Name | Field # of Occurrence |
|---|---|
| ^(1 | CTRLC2+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | CONT+8*, LOG+1*, LOG+2*, LOG+3* |
| %ZT | ERR2+5! |
| >> %ZTERROR | ERR2+6 |
| DUZ | ERR2+8, HALT |
| IO | ERR2+3, CTRLC* |
| IO(0 | ERR2+4, CTRLC |
| IO(1 | ERR2+3 |
| IOF | ERR2+3 |
| IOST | ERR2+3 |
| >> NOCENABLE | EN+1, ERR2 |
| >> NOESCAPE | EN+1, CTRLC2+6 |
| >> X | EN+1*, CONT+11* |
| >> XQPSM | CTRLC2+3* |
| >> XQXFLG("HALT" | CONT+8, CONT+10 |
| >> XQY | CTRLC2+1*, CTRLC2+3*, CTRLC2+4 |
| >> XQY0 | CTRLC2+1*, CTRLC2+2 |
| >> XUERF | ERR2+5* |
| ZIO | SLOT+1~ |
| ZTIME | SLOT+1~ |
| >> ZUGUI1 | EN+3* |
| >> ZUGUI2 | EN+3* |