*COMDECK ZVARUSR
_*************************************
*                                    *
*  THE FOLLOWING IS THE SOURCE INPUT *
*  FOR APPLICATION UNIQUE VARIABLES  *
*  DEFINITION FOR THIS SYSTEM        *
*                                    *
*************************************?
_?
*CALL SVMZAPV 
*IF DEF,BSC 
      /BYCNTLCHAR;                          _BSC CONTROL CHAR          ?
                                            _DEFAULT VALUE             ?
*CALL BSCC2 
*ENDIF
*IF DEF,UTIP1,1 
*CALL UT1ZVAR 
*IF DEF,UTIP2,1 
*CALL UT2ZVAR 
*IF DEF,UTIP3,1 
*CALL UT3ZVAR 
_**********************************************************************?
_*END APPLICATION UNIQUE VARIABLE SOURCE*?
_**********************************************************************?
