*COMDECK CONSTUSR 
_$J+ PAGE EJECT ? 
_********************************** 
*                                 * 
*   USER CONSTANTS CALL DECK      * 
*                                 * 
*********************************** 
? 
*CALL SECURITY
*CALL CONSTR4 
*CALL CONBLK
*CALL IPCON 
*CALL SVMCONST
*CALL,PERFCON 
*IF DEF,OLDSYS,1
*CALL CONOLD
*CALL CONHIP
*IF DEF,MODE4,1 
*CALL CONMD4
*CALL CONIVTC 
*IF DEF,HASPTIP,1 
*CALL HASPCONST 
*IF DEF,ASYNC,1 
*CALL CONASYNC
*IF DEF,HLIP,1
*CALL CONHLIP 
*CALL CONSTX25
*IF DEF,USERTIP1,1
*CALL UT1CON
*IF DEF,USERTIP2,1
*CALL UT2CON
*IF DEF,USERTIP3,1
*CALL UT3CON
*CALL,CONSYNA 
_**********************************************************************?
_?
