! TIMOUT.BAS:  Program to set the ESP/SIGNIN automatic logout timing used by
!  the GLUE menu system.  The default value is too low for our use.  This
!  program is necessary because we are not using the AMOS SIGNIN security
!  system (which allows the system operator to set the time-out value).
!  It is run from the system initialization file (AMOSL.INI) upon bootup.
!
! Edit History:
!  06/15/94 - CTD - creation and implementation date
!
! ---------------------------------------------------------------------------

1000    MAP1 SU'TMO,F,6,5         ! Time-out period in seconds
                                  ! (from include file SETUSR.BSI in BAS:)

     ! Set time-out variable of ESP/SIGNIN automatic logout

2000 !  XCALL SETUSR,SU'TMO,-1    ! Turn time-out off altogether

3000    XCALL SETUSR,SU'TMO,3600  ! Set time-out to 60 minutes