SET( ) example

The following example stores the value of a setting at the beginning of a function, and restores it at the end.

function findMatch( xArg )

   local lRet 

   private cExact // Can't be local for macro substitution 

   cExact = set( "EXACT" ) // Store "ON" or "OFF" to character variable 

   set exact on 

   lRet = seek( xArg ) // Does exact match exist? 

   set exact &cExact // Either "set exact ON" or "set exact OFF" 

return lRet