*COMDECK TYPETCB
_************************************** 
*                                     * 
* TCB DEFN FOR RELEASE 4              * 
*                                     * 
*************************************** 
? 
*CALL TYPEIVT 
*IF DEF,MODE4,1 
*CALL TMD4D1
*IF DEF,USERTIP1,1
*CALL UT1TCB
*IF DEF,USERTIP2,1
*CALL UT2TCB
*IF DEF,USERTIP3,1
*CALL UT3TCB
*IF DEF,ASYNC,1 
*CALL TASYNC
*IF DEF,HASPTIP,1 
*CALL HASPTCB 
*IF DEF,BSCDEBUG,1
*CALL NTSTCB
*IF DEF,BSC,1 
*CALL BSCTCB
*IF DEF,3270TIP,1 
*CALL 3270TCB 
*IF DEF,X25,5 
*IF DEF,X25DEBUG,2
*IF -DEF,BSCDEBUG,1 
*CALL NTSTCB
*CALL X25TCB
*CALL X25AATCB
