idxcollate( ) 函数示例

下面示例先打开 testdata 数据库的 customer 表，然后使用 for ... endfor 创建一个循环，在该循环中应用idxcollate( ) 函数来显示 customer 结构索引中每个索引标识的排序序列，每个结构索引标识的名称和它的排序序列一起显示。

close databases
open database (home( ) + 'samples\data\testdata')
use customer   && 打开 customer 表
clear

for ncount = 1 to 254
if !empty(tag(ncount))  && 检查索引标识
? tag(ncount) + ' '  && 显示标识名
?? idxcollate(ncount)  && 显示排序序列
else
exit  && 在找到所有的标识之后退出循环
endif
endfor