>>*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 >>>>