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 |