>Hi,
>
>I meet a weird problem in my code. When I'm executing this loop I get a "data type mismatch" error message on the line "SELECT curProspect". The error occurs only at the first pass and if I click on "Ignore" button then the loop goes through normaly. If I "suspend" the code then select manually the cursor and resume everything works fine.
>
>Is somebody has a solution or a clue to help?
>
>Thanks,
>
>Normand
>
>
LOCAL nContrat
>SELECT rv
>SET ORDER TO noclient
>SELECT curProspect
>SET ORDER TO 0
>
>SCAN
> cTel = telres
> nContrat = nocontrat
> SELECT rv
> SEEK cTel
> SCAN WHILE NoClient = cTel for nocontrat = nContrat AND !print
> replace print with .t. in Rv
> ENDSCAN
>ENDSCAN
See corrections to your code inside the original code.
If it's not broken, fix it until it is.
My Blog