*COMDECK X25LCCB
_$J+? 
                                                       _ 03/01/83 ? 
                _#X25 LOGICAL CHANNEL CONTROL BLOCK#? 
_ 
          LL            CCCCCC      CCCCCC    BBBBBBBB
          LL           CCCCCCCC    CCCCCCCC   BBBBBBBBB 
          LL          CC      CC  CC      CC  BB      BB
          LL          CC          CC          BB      BB
          LL          CC          CC          BBBBBBBBB 
          LL          CC          CC          BBBBBBBBB 
          LL          CC          CC          BB      BB
          LL          CC      CC  CC      CC  BB      BB
          LLLLLLLLLL   CCCCCCCC    CCCCCCCC   BBBBBBBBB 
          LLLLLLLLLL    CCCCCC      CCCCCC    BBBBBBBB
? 
LCCBLK = PACKED RECORD
         LCTCBPTR   : B0BUFPTR;  _WD $0 TCB POINTER                    ?
         LCNXTLCCB  : B0BUFPTR;  _WD $1 NEXT LCCB IN CHAIN             ?
         LCPVC      : BOOLEAN;   _WD $2 T : PVC,  F : SVC              ?
         LCW        : B03BITS;         _PACKET LEVEL WINDOW            ?
         LCDPL      : B012BITS;        _DATA PACKET LENGTH             ?
         LCCNTYPE   : B04BITS;   _WD $3 CONNECTION TYPE                ?
         LCHN       : B012BITS;        _LOGICAL CHANNEL NUMBER         ?
         LCPHPSTATE : B04BITS;   _WD $4 PACKET HANDLER PRIMARY STATE   ?
         LCPHPEVENT : B04BITS;         _PKT HANDLER PRIMARY EVENT CODE ?
         LCPHSSTATE : B04BITS;         _PACKET HANDLER SECONDARY STATE ?
         LCPHSEVENT : B04BITS;         _PKT HANDLER SECONDARY EVENT CD ?
         LCSP4      : B04BITS;   _WD $5 SPARE                          ?
         LCDCEW     : BOOLEAN;         _DCE CLEAR DELAYED FOR DCE WAIT ?
         LCDTEW     : BOOLEAN;         _DTE CLEAR DELAYED FOR DCE WAIT ?
         LCNOBUF    : BOOLEAN;         _NO BUFFER FOR DOWNLINE PACKETS ?
         LCDCEC     : BOOLEAN;         _DCE CLEARING                   ?
         LCDTEC     : BOOLEAN;         _DTE CLEARING                   ?
         LCREGULON  : BOOLEAN;         _SUB TIPS REGULATION IN EFFECT  ?
         LCDXMITON  : BOOLEAN;         _DATA XMISSION ENABLED          ?
         LCDWLOCK   : BOOLEAN;         _DOWNLINE WINDOW CLOSED         ?
         LCUBRK     : BOOLEAN;         _UPLINE BREAK SENT              ?
         LCDBRK     : BOOLEAN;         _DOWNLINE BREAK RECEIVED        ?
         LCDTER     : BOOLEAN;         _RESET REQUEST SENT             ?
         LCDCER     : BOOLEAN;         _RESET IND/CONF RECEIVED        ?
         LCSP5      : B02BITS;   _WD $6 NOT IN USE                     ?
         LCDFRGCNT  : B010BITS;        _DOWNLINE FRG COUNT             ?
         LCPSNTYPE  : B04BITS;         _PSN TYPE                       ?
         LCINVCLR   : BOOLEAN;   _WD $7 DTE INITIATED CALL CLEARING    ?
         LCLPRR     : B03BITS;         _LAST P(R) RECEIVED             ?
         LCSP8      : B01BITS;         _SPARE                          ?
         LCLPRS     : B03BITS;         _LAST P(R) SENT                 ?
         LCSP10     : B01BITS;         _SPARE                          ?
         LCVR       : B03BITS;         _PKT LVL V(R) = NEXT P(S) RCV   ?
         LCSP12     : B01BITS;         _SPARE                          ?
         LCVS       : B03BITS;         _PKT LVL V(S) = NEXT P(S) SENT  ?
         LCDPQR     : B0BUFPTR;  _WD $8 DOWNLINE PACKET READ POINTER   ?
         LCDPQW     : B0BUFPTR;  _WD $9 DOWNLINE PACKET WRITE  POINTER ?
         LCSPQR     : B0BUFPTR;  _WD $A SUPERVISORY READ POINTER       ?
         LCSPQW     : B0BUFPTR;  _WD $B SUPERVISORY WRITE POINTER      ?
         LCLCBPTR   : BZLCBP;    _WD $C LCB POINTER INCOMING CALL      ?
         LCSP13     : B08BITS;   _WD $D SPARE                          ?
         LCHNODE    : B08BITS;         _HOST NODE INCOMING A-A CALL    ?
         LCTMRPKT   : B0BUFPTR;  _WD $E INV. TO CLEAR TIMER PACKET PTR ?
         LCACCTPTR  : B0BUFPTR;  _WD $F LOGIN ACCOUNTING INFO BUFFER   ?
         END;                          _LCCB DEFINITION                ?
