在下面的示例中，统计所有德国顾客的数量。
set talk off
close databases
open database (home( ) + 'samples\data\testdata')
use customer && 打开 customer 表
store 0 to gncount
locate for upper(country) = 'germany'
do while found( )
gncount = gncount + 1
continue
enddo
wait window 'total customers from germany: ' ;
+ ltrim(str(gncount)) nowait