>PMFJI, I'd like to propose a little modification to your code. I'm not a big fan of DO WHILE .T. ... EXIT, so, here's how I would have done it:
>
>

select DispChek		
>set order to dispchek
 seek lcDispatchNumber+DspCkItm.driver+lcdrvnum
>scan while DispatchNumber+driver+drvnum = lcDispatchNumber+DspCkItm.driver+lcdrvnum
   blank
endscan

>

There is a BLANK command in VFP, which can substitute scatter/gather construct

>I have not tested it, but from a quick look, I think it would do the same as your code.
>
>>Yes, that's what I intended to do. I just changed to program code, and it works. This is what I have now:
>>
>>select DispChek
>>set order to dispchek
>>do while .t.
>>    if seek(lcDispatchNumber+DspCkItm.driver+lcdrvnum,'Dispchek','dispchek')
>>        scatter memvar blank
>>        sather memvar
>>    else
>>        exit
>>    endif
>>enddo