>I am using into a form:
>
>
> select mytable
> go bottom
> cod = mytable.cod + 1
> appe blank
> replace mytable.cod with cod
>
>
> I think this rotine is not suitable because some costumers complain
>that for some reason the code become repetead
>Is there a more eficient way to do it ?
>
>Regards
>
>Moises
I think a better way would be:
select max(cod) from mytable ;
into array lctemp
lctemp[1] = lctemp[1] + 1
appe from array lctemp fields cod
HTH
Beth