*COMDECK  COMSTAD - CCG COMMUNICATION DYNAMIC TABLES. 
 COMSTAD  CTEXT              DEFINE TABLES SHARED WITH CCG. 
  
***       COMSTAD CONTAINS A "TABSH" MACRO CALL FOR EACH TABLE
*         WHICH IS SHARED WITH CCG. 
* 
* FEN     TABSH  RATE,INIT,CGN
* 
*         WHERE  *FEN* = FRONT END NAME (SUFFIX) FOR THE TABLE. 
*                *RATE* = PARAMETER FOR FRONT END DECLARATION.
*                *INIT* = PARAMETER FOR FRONT END DECLARATION.
*                *CGN* = CCG NAME (SUFFIX) FOR TABLE. 
*                IF *CGN* IS OMITTED, THE CCG SUFFIX IS SAME AS *FEN*.
  
  
 CLW      TABSH              I/O CHAR. ARRAY ITEM LENGTH (MUST BE FIRST)
 CAC      TABSH              CHARACTER ADDRESS CONSTANTS (CLEN, BCP AND 
 APL      TABSH  3,,,EXU     ACTUAL PARAMETER LISTS 
 IOA      TABSH  3,,,EXU     I/O APLISTS (MUST FOLLOW APL)
 API      TABSH  1,,APT      APLIST INIDICES
 IOI      TABSH  1,,IOT      I/O APLIST INDICES (MUST FOLLOW API) 
 GL       TABSH  2,,GLT      GENERATED LABELS 
 ASG      TABSH  1           ASSIGN STATEMENT INFO
 CON      TABSH  3,,CVT      CONSTANT VALUES
 CUT      TABSH  0           CON. BIASES FOR PASS 3 
  
 COMSTAD  ENDX
