Select invhist
Append from invtemp

>Hi all, I make a temporary database when making an invoice which stores invoice details like product number, desc, price, qty and total etc. At the end of the invoice, I add this database records to a permanent database which I call it invhist.dbf. For some reason, one out of every 100 odd invoice lines are not saved to invhist.dbf. My code is :
>

>sele invtemp  && temporary database
>go top
>do while not eof()
>  scatter to x1
>  sele invhist
>  append blank
>  gather from x1
>  sele invtemp
>  skip
>enddo 
>

>
>Is there a better way to do this ???? TIA
>Shafid