LAXSYMU ;MLD/ABBOTT/SLC/RAF - AxSYM INTERFACE Utility Routine; 6/12/96 0900
Source file <LAXSYMU.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 |
---|---|---|
UPDT | ; To LA global ($TR used to remove CTRL chars from LAFRAM)
|
|
CKSUM(S,MOD) | ; convert string (S) to decimal num (N) then to
; hex modulo 16**MOD (def=2=256) |
|
SEND(N) | ; Send reply msg (ACK, NAK, etc.)
|
|
DEBG(A,B) | ; DEBuG tool - capture all data going in & out. (Def=OFF)
; A=data that went out/came in B="I"=IN; "O"=OUT |
|
NAK(M) | ; send NAK and retry (M = error 'type', EOT, STX, etc.)
|
|
LA1INIT | ; Init vars only for LAXSYM
|
|
INIT | ; initialize various parameters for the AxSYM
|
|
ZIS | ||
BKGND | ; Entry point to start ANY bi-directional background job /mld
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TRAP" | LA1INIT+1, INIT+3 |
^LA( | UPDT+1, UPDT+2, UPDT+3*, UPDT+4, UPDT+7, DEBG+4*, NAK+1*, INIT+6, INIT+7, INIT+8* , INIT+9!, INIT+13*, ZIS+1*, ZIS+11!, ZIS+12!*, ZIS+13* |
^LA("LOCK" | INIT+9!, ZIS+13*, BKGND+18! |
^LAB(62.4 - [#62.4] | UPDT+2, INIT+5, BKGND+7 |
Name | Line Occurrences |
---|---|
@( | NAK+3 |
DEBG | SEND+2 |
SEND | NAK+3, NAK+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | BKGND+8* |
A | DEBG~, DEBG+3 |
>> ACK | ZIS+4* |
>> ALPHA | LA1INIT+2* |
B | DEBG~, DEBG+3 |
>> BASE | INIT+4* |
>> CNT | UPDT+4*, ZIS+5* |
>> CR | ZIS+4*, ZIS+6 |
CT | DEBG+2~, DEBG+4* |
>> DEB | DEBG+4, INIT+4*, ZIS+12 |
>> DEBUG | SEND+2, ZIS+5* |
DIC | BKGND+1~, BKGND+4*! |
DIC("S" | BKGND+4* |
DIC(0 | BKGND+4* |
DIR | BKGND+1~, BKGND+16! |
DIR("A" | BKGND+15* |
DIR("B" | BKGND+15* |
DIR(0 | BKGND+15* |
DIRUT | BKGND+1~ |
DIV | CKSUM+2~*, CKSUM+4*, CKSUM+5 |
DUZ | INIT+3* |
>> ENQ | ZIS+4* |
>> EOT | NAK+3, ZIS+4* |
>> ETB | ZIS+4* |
>> ETX | ZIS+4*, ZIS+6 |
>> HOME | INIT+2* |
HX | CKSUM+2~, CKSUM+5*, CKSUM+6* |
HXN | CKSUM+2~, CKSUM+6* |
I | CKSUM+2~, CKSUM+3*, CKSUM+4*, LA1INIT+1*, LA1INIT+3*, LA1INIT+4*, ZIS+7*, ZIS+9* |
>> INST | UPDT+1, UPDT+2, UPDT+3, UPDT+4, UPDT+7, NAK+1, INIT+2*, INIT+4, INIT+5, INIT+6 , INIT+7, INIT+8, INIT+9, INIT+13, ZIS+1, ZIS+11, ZIS+13 |
IOM | BKGND+3 |
>> IOP | INIT+5*, BKGND+2*, BKGND+8* |
>> LACRETX | ZIS+6* |
>> LACRLF | ZIS+6* |
>> LADEV | INIT+5*, INIT+12, ZIS+1 |
LAFRAM | UPDT+4, UPDT+5!, NAK+5! |
>> LAFRAME | UPDT+6*, NAK+1, NAK+2* |
>> LAFRNM | NAK+4*, ZIS+5* |
>> LALINK | UPDT+6*, NAK+4 |
>> LANM | NAK+3, LA1INIT+1, INIT+2, INIT+3 |
>> LANOCTL1 | UPDT+4, LA1INIT+1*, LA1INIT+4*, INIT+2*, ZIS+7* |
>> LANOCTL2 | INIT+3*, ZIS+9* |
>> LARETRY | UPDT+6*, NAK+2*, NAK+3, ZIS+5* |
>> LATEST( | LA1INIT+3* |
>> LATOUT | ZIS+5* |
>> LF | ZIS+4*, ZIS+6 |
LRCHK | INIT+7*, INIT+8!, INIT+9! |
LRCHK1 | INIT+7*, INIT+8!, INIT+9! |
LRDASH | BKGND+1~, BKGND+3* |
LRJOB | BKGND+1~, BKGND+6*, BKGND+17 |
LRJOBIO | BKGND+1~, BKGND+7*, BKGND+11, BKGND+17 |
LRJOBN | BKGND+1~, BKGND+6*, BKGND+7, BKGND+17, BKGND+18 |
LRJOBNM | BKGND+1~, BKGND+6*, BKGND+11, BKGND+15, BKGND+20 |
M | NAK~, NAK+1 |
MOD | CKSUM~, CKSUM+2*, CKSUM+4, CKSUM+7 |
MSG | DEBG+2~, DEBG+3*, DEBG+4 |
N | CKSUM+2~*, CKSUM+3*, CKSUM+5*, CKSUM+6*, CKSUM+7*, CKSUM+8, SEND~, SEND+1, SEND+2 |
>> NAK | NAK+6, ZIS+4* |
>> NUL | ZIS+4* |
>> OK | INIT+4*, ZIS+5* |
>> OUT | INIT+4* |
>> POP | ZIS, BKGND+9 |
S | CKSUM~, CKSUM+3 |
>> SOH | ZIS+4* |
>> STX | ZIS+4* |
T | INIT+2*, BKGND+1~ |
>> TC( | LA1INIT+3 |
>> TOUT | INIT+5* |
>> TSK | INIT+2* |
U | INIT+5* |
X | UPDT+5!, NAK+5!, LA1INIT+1*, INIT+3*, BKGND+1~, BKGND+7*, BKGND+8 |
Y | BKGND+1~, BKGND+5, BKGND+6, BKGND+16 |
>> ZTDESC | BKGND+17* |
>> ZTDTH | BKGND+17* |
>> ZTIO | BKGND+17* |
>> ZTRTN | BKGND+17* |
ZTSK | BKGND+1~, BKGND+20, BKGND+21 |