CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'Data\testdata')
USE customer && Opens Customer table
SET TALK ON
SET FILTER TO SUBSTR(cust_id,1) = 'B'
CLEAR
? FILTER( ) && Display filter expression
STORE FILTER('customer') TO gcOldFilter && Save filter expression
SET FILTER TO country = 'USA'
? FILTER( ) && Display filter expression
SET FILTER TO &gcOldFilter && Restore filter expression
? FILTER( ) && Display filter expression
LIST FIELDS cust_id, contact && Demonstrate filter condition