SCAN ... ENDSCAN 命令示例

下面的示例中，使用 SCAN ... ENDSCAN 循环来显示瑞典所有的公司。

CLOSE DATABASES
OPEN DATABASE (HOME( ) + 'samples\data\testdata')
USE customer && 打开 Customer 表
CLEAR

SCAN FOR UPPER(country) = 'SWEDEN'
? contact, company, city
ENDSCAN