set safety off
close all
select distinct xymc from 示例表格 into cursor xx
scan select * from 示例表格 where alltrim(xymc) == alltrim(xx.xymc) into table alltrim(xx.xymc)
endscan
close all
quit
******************************************************
如何修改,生成xymc+人数的dbf
如财务部15,采购部55,人力资源部8