The SCAN...ENDSCAN loop is better.

SCAN FOR custno=ncustno  
...
ENDSCAN

Makes code simplier and faster (with appropriate indexes in place).

>To copy more that one record with conditon :
>
>clos data
>sele 0
>USE xldata
>sele 0
>use nan
>delete all && or zap if file is used exclusive
>sele xldata
>nCustno=thisfrom.text1.value && conditional to custno field on the form (numeric)

>go top
>do whil not eof()
>   if custno=ncustno  && append only in custno is = nCustno
>      scatter to mxx
>      sele nan
>      append blank
>      gather from mxx
>      sele xldata
>   endif
>   sele xldata
>   skip
>enddo

>clos data