DO WHILE ENDDO
可以改为
SCAN ENDSCAN
使用方便，速度也快

[此贴子已经被作者于2016-8-25 08:48编辑过]

FOR ENDFOR使用的好像有问题

下载你的附件，看了后，觉得政策漏洞很大！（或者说，你的描述是有问题的）
如分给3703初中的55个名额，是哪几个招生的高中呢？如果是三所高中，20，20，15。在你的表上没体现出来，如果这个初中的上线学生前55个学生都填同一所高中，那高中的定向数又不够？
还有这定向数是按  达标高中志愿录　还是按　一般高中志愿录？

55个录取到同个学校超过55个的话就不录取，除非同分录取

3703初中，可录的前55人中，DBGZ1这个志愿中，有的是报003706的，有的是报003708的，是报什么录取到什么学校吗？

看起来，问题有点不太清楚，楼主是不是把相应表和具体要求详细描述一下。