******************************************************************** * Description.......: LookupDFLT - Default lookup action in XForm * Calling Samples...: * Parameter List....: * Created by........: Nadya Nosonovsky 10/10/2000 10:27:12 AM * Modified by.......: ******************************************************************** private pcCurDir && Current directory, make it private to be visible in hierarhy local lcTableMaintDir lcTableMaintDir='\redp\appl\TableMaintenance\' && Table Maintenance default directory pcCurDir=curdir() && Save current directory cd (lcTableMaintDir) do TableMaintenance && Without parameters cd (pcCurDir) && change back to current directory returnUnfortunately, this does not work, because program continues its execution without stoping on do TableMaintenance (there I have only non-modal forms).