>hi,
>
>thank you,
>but i get error message(Table has no index order set )
That is because the wrong table is selected. As I mentioned in a reply to myself, I forgot the command to go back to the first table. This can be at the beginning, or at the end, of the loop.
CLOSE all
use aliq
INDEX ON no TO no
set order to "no"
for i = 1 to 20
select aliq
seek i
copy next 5 to temp while no = i
use aliq1
append from temp
next
Difference in opinions hath cost many millions of lives: for instance, whether flesh be bread, or bread be flesh; whether whistling be a vice or a virtue; whether it be better to kiss a post, or throw it into the fire... (from Gulliver's Travels)