还是这个问题!!!
create cursor test (vname c(8),n1 N(10,2))&&自己根据a1~a8确定字段属性
insert into test values ("a1",a1)
insert into test values ("a2",a2)
...
insert into test values ("a7",a7)
select * from test order by n1 desc into cursor test2
scan
?vname
endscan
use in test2
use in test