Information générale
Catégorie:
Codage, syntaxe et commandes
Actual this is how I fixed it according to Jim's Post
use invfl in 0 shared order orderno
use orderfl in 0 sharer order orderno
set relation to orderno into orderfl
sele invfl
Scan for shipdate=date() and empty(invfl.invno) and lines=1
lcCusnum=invfl.cuskey
lnOrdernum=invfl.orderno
lcCatkey=orderfl.catkey
If lcCatkey="CON" and orderfl.orderno=lnOrdernum
Replace hold with .T.
Wait window "Replaced Hold with True as Requested for Customer # "+lcCusnum at 15,115 timeout 0.75
Endif
Endscan
I remove the the while !eof() and the while statement that was with replace(). The replace while was what was moving my record pointer.
Thank you all for your replies.
>If I understand what you are doing, wouldn't this work?
>
>
>select orderfl
>Scan for lines=1and Catkey="CON"
> Replace invfl.hold with .T. for invfl.orderno = orderfl.orderno
> Wait window;
> "Replaced Hold with True as Requested for Customer # "+Cusnum;
> at 15,115 timeout 0.75
>Endscan
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement