LAXSYMU ;MLD/ABBOTT/SLC/RAF - AxSYM INTERFACE Utility Routine; 6/12/96 0900
Source file <LAXSYMU.m>
| 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 | 
  |