在下面的示例中，使用 getexpr 命令建立适当类型的 locate 表达式。如果 locate 命令成功，将显示公司名，否则显示一条信息。
close databases
open database (home( ) + 'samples\data\testdata')
use customer && op ustomer 表
getexpr 'enter condition to locate ' to gctemp;
type 'l' default 'company = ""'
locate for &gctemp
if found( )
display
else
? 'condition ' + gctemp + ' was not found '
endif