What this code has to do with your previous question?
>>>I have no settings on SET NEAR and the default value must be "OFF"
>>>
>>>Where is the error.
>
>With the debug the Sys(2001,"NEAR") return OFF
>In my program i have:
>
>If Seek( nKey, "MyTable1", "KEY")
>nNumero = Val(PrimaNota->NUMERO)
> If Seek(Pagate->K_PAG, "Giornale", "PNOTA")
> Set Order To PNOTA In Giornale
> DO While !Eof("Giornale") And Giornale->K_PNOTA = Pagate->K_PAG
> Delete In Giornale
> Skip In Giornale
> EndDo
> Set Order To (cOrder1) In Giornale
> EndIf
--sb--