XQ74 ;SEA/MJM - Phantom Jump processor ; ;4/26/91 3:18 PM
Source file <XQ74.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LEGAL | ;See if this a legal option for this user
|
|
| SET | ;Save the "XQ" stack in XQMM("OLD")
|
|
| SETJ | ;Set up the variables for a jump
|
|
| CONVERT | ;Convert option names to their internal #'s an add -1 for return
|
|
| MESS1 | ||
| ERR | ;Error message for locks, out-of-order, etc.
|
|
| RESET | ;Reset ^XUTL to what it was before we started
|
|
| OUT |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(19 - [#19] | LEGAL+6, ERR+2, RESET+1 |
| ^VA(200 - [#200] | LEGAL+3 |
| ^XUTL("XQ" | LEGAL+1, SET+1, RESET+1*, RESET+3*, RESET+4* |
| ^XUTL("XQO" | LEGAL+1, LEGAL+2, LEGAL+3, LEGAL+4, LEGAL+5, SETJ+1, RESET+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIC | CONVERT+1*, CONVERT+4! |
| DIC(0 | CONVERT+1* |
| DUZ | LEGAL+3, LEGAL+5 |
| U | XQ74+5, LEGAL+3, LEGAL+5, LEGAL+6, SET+1, SET+2, SETJ+1, SETJ+2, ERR+2, RESET+2 , RESET+3, RESET+4 |
| X | XQ74+6*, CONVERT+2*, CONVERT+4!, MESS1 |
| XQA | SETJ+3!, OUT! |
| XQD | OUT! |
| >> XQDIC | XQ74+5, LEGAL+1*, LEGAL+2*, LEGAL+4*, SET+2, SETJ+1, RESET+1*, RESET+2* |
| XQI | LEGAL+5*, SET+1*, SETJ+3!, CONVERT+2*, CONVERT+4!, RESET+4*, OUT! |
| XQJ | CONVERT+4!, RESET+4*, OUT! |
| XQK | SETJ+3!, RESET+4*, OUT! |
| >> XQMM("J" | XQ74+2!, XQ74+3, XQ74+5!, XQ74+7*, OUT! |
| >> XQMM("OLD" | SET+1*, RESET+1, RESET+3, RESET+4, OUT! |
| >> XQMMF | SETJ+2* |
| XQMMK | XQ74+5*, XQ74+6, LEGAL+1, LEGAL+2, LEGAL+4, LEGAL+5, LEGAL+6, SETJ+1, SETJ+3!, CONVERT+3* , ERR+1 |
| XQMMS | XQ74+6*, XQ74+8! |
| XQMMSAV | SET+2*, RESET+1, RESET+2, OUT! |
| XQMMX | XQ74+5*, XQ74+7, XQ74+8!, CONVERT+2, CONVERT+3* |
| XQMMY | CONVERT+1*, CONVERT+2*, CONVERT+3, CONVERT+4! |
| XQNO | ERR+2, OUT! |
| XQNO1 | ERR+2, OUT! |
| >> XQPSM | LEGAL+1*, LEGAL+2*, LEGAL+3*, LEGAL+4, LEGAL+5*, SET+2, RESET+2* |
| XQRBJ | OUT! |
| XQST | OUT! |
| >> XQSV | XQ74+5* |
| XQUD | LEGAL+5*, SETJ+3! |
| >> XQY | XQ74+5, SET+2, SETJ+1*, ERR+1*, ERR+2, RESET+1*, RESET+2* |
| >> XQY0 | XQ74+5, SET+2, SETJ+1*, SETJ+2, RESET+1*, RESET+2* |
| XQZ | OUT! |
| Y | CONVERT+2, CONVERT+4! |