*COMDECK BSCLCBL2 
_***********************************************************************
*                                                                      *
*     BSC EXTENSION TO LCB                                             *
*                                                                      *
***********************************************************************?
      S0LCBEXT = PACKED RECORD
        BZS3DUM     : ARRAY[0..7] OF        _BSC MAIN LEVEL FIELD      ?
                      INTEGER;
                                            _BSC ML AND L2 SHARES THE  ?
                                            _LCB EXTENSION.   THE BSC  ?
                                            _ML USES THE UPPER 8 WORDS ?
                                            _AND THE BSC L2 USES THE   ?
                                            _LOWER 8 WORDS             ?
                                            _CHANGES THAT AFFECT THE 8 ?
                                            _WORD BOUNDARY WILL REQUIRE?
                                            _MODIFICATIONS TO BOTH THE ?
                                            _BSC MAIN LEVEL AND LEVEL 2?
        BZS2PRIMARY : BOOLEAN;              _PRIMARY STATION           ?
        BZS2ACK     : BOOLEAN;              _ACK SENSE                 ?
        BZS2ETX     : BOOLEAN;              _ETX DATA RECEIVED         ?
        BZS2D1      : BOOLEAN;              _DUMMY FIELD 1             ?
        BZS2D2      : B02BITS;              _DUMMY FIELD 2             ?
        BZS2ERTYPE  : S0ET;                 _FIRST ERROR SEEN          ?
        BZS2D6      : B03BITS;              _DUMMY FIELD               ?
        BZS2STATE   : S0STST;               _CURRENT STATE             ?
        BZS2MINOR   : B08BITS;              _MINOR PROTOCOL ERROR COUNT?
        BZS2RETRY   : B08BITS;              _ERROR RECOVERY RETRY COUNT?
        BZS2INRETRY : B08BITS;              _INPUT TIMEOUT RETRY COUNT ?
        BZS2LIMIT   : B08BITS;              _ERROR RECOVERY RETRY LIMIT?
        BZS2OUTDATA : B0BUFPTR;             _POINTER TO OUTPUT DATA    ?
        BZS2TTD     : B04BITS;              _OUTPUT DELAY COUNT        ?
        BZS2TMCODE  : B07BITS;              _REASON FOR LVL2 TIMER     ?
        BZS2MLACT   : S0MLRQ;               _INDEX TO ML WORKLIST ARRAY?
        BZS2MMIBP   : B0BUFPTR;             _SAVED BUFF PTR FROM WL    ?
        BZS2D8      : INTEGER;              _DUMMY                     ?
        BZS2D9      : INTEGER;              _DUMMY                     ?
        END;
