ZU ;SF/JLI,RWF - For GT.M, TIE ALL TERMINALS TO THIS ROUTINE!! ;11/24/2003 11:34
Source file <ZUGTM.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| JOBEXAM(%ZPOS) | ; | |
| UNWIND | ;Unwind the stack | |
| EN | ;See that escape processing is off, Conflict with Screenman | |
| HALT | ||
| ERR | ;Come here on error ; handle stack overflow errors specifically | |
| CTRLC2 | ||
| CTRLC | ||
| ERR2 | ; | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^%ZTSCH("LOGRSRC" | EN+4, HALT+2 | 
| ^XUTL("XQ" | CTRLC2, CTRLC2+1*, HALT | 
| ^XUTL("XUSYS" | JOBEXAM+2*, JOBEXAM+3*, JOBEXAM+4!, JOBEXAM+5, JOBEXAM+6, JOBEXAM+7 | 
| Name | Line Occurrences | 
|---|---|
| CTRLC2 | UNWIND+1 | 
| HALT | ERR2+4, ERR2+20, CTRLC2+2 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(1 | CTRLC2+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %ZPOS | JOBEXAM~, JOBEXAM+2, JOBEXAM+3 | 
| %ZT | ERR2+6! | 
| %reference | JOBEXAM+1~* | 
| DUZ | ERR2+20, HALT | 
| IO | ERR2+8, ERR2+9 | 
| IO(0 | ERR2+11, ERR2+12 | 
| IO(1 | ERR2+8 | 
| IOF | ERR2+10 | 
| IOST | ERR2+8 | 
| >> NOCENABLE | EN+1, ERR2+2 | 
| >> NOESCAPE | EN+1, CTRLC2+6 | 
| >> XQPSM | CTRLC2+3* | 
| >> XQY | CTRLC2+1*, CTRLC2+3*, CTRLC2+4 | 
| >> XQY0 | CTRLC2+1*, CTRLC2+2 | 
| >> XUERF | ERR2+23* | 
| Name | Field # of Occurrence | 
|---|---|
| $T(@%ZPOS | JOBEXAM+3 |