>*do form SetFilter with saveDS,theTable,localStr,.name &&to localStr > loSetFilter=newobject('SetFilter','wg.vcx','',saveDS,theTable,localStr,.name) > else >* do form SetFilterNew with saveDS,theTable,localStr,.name &&to localStr > loSetFilter=newobject('SetFilterNew','wg.vcx','',saveDS,theTable,localStr,.name) > endif > if type('loFilter')='O' > loSetFilter.Show(1) > endif >>