Click above to get retro games delivered to your door ever month!

 TTSAppThresholdGet() / TTSAppThresholdSet()
------------------------------------------------------------------------------
 Purpose:
 Get or set the TTS application lock thresholds on the workstation.

 Syntax:
 iAppThr = TTSAppThresholdGet()
 iAppThr = TTSAppThresholdSet( iNewThr )

 Parameters:
 iNewThr The number of file locks.

 Returns:
 A numeric value (signed short int).

 The CA-Clipper names for these functions are:
 TTSAppThrGet() / TTSAppThrSet()

 Description:
 TTSAppThresholdGet() returns the number of record locks which may be made
 before an implicit TTS transaction is started.

 TTSAppThresholdSet() sets the number of record locks that may be made
 before an implicit TTS transaction is started and returns the previous
 value.

 Returns NOVERRINT if an error occurs.

 Example:
 // To display the number of record locks which may be made
 // before an implicit transaction is started:
 iCurrThr = TTSAppThresholdGet()
 if ( iCurrThr != NOVERRINT )
    ? "The current record lock threshold is",CurrThr
 endif
 // To set the TTS program threshold so that 3 record locks may be made
 // before a TTS transaction is started:
 iOldThr = TTSAppThresholdSet(3)
 iNewThr = TTSAppThresholdGet()
 ? "The current record lock threshold is now ", iNewThr

 Notes:
 The number of record locks returned or set using these functions is
 only valid for the requesting program and is reset to the workstation
 defaults when the program terminates.

 The workstation TTS thresholds can be set using the TTSWSThresholdSet()
 function.