>i have new and old both records in buffer.
>
>can i do like this
>
>

>SELECT YourTable
>SCAN for code=101
>   if recno()<0  && buffered new records
>      IF Id == [101-1]
>         IF TABLEUPDATE(0,.t.,[YourTable])
>            ***
>         ENDIF
>      ELSE
>         TableRevert(.f.,[YourTable])
>      ENDIF
>   else && buffered old records
>      IF Id == [101-1]
>         IF TABLEUPDATE(0,.t.,[YourTable])
>            ***
>         ENDIF
>      ELSE
>         delete
>         IF TABLEUPDATE(0,.t.,[YourTable])
>            ***
>         ENDIF
>      ENDIF
>   endif
>ENDSCAN
>

>
>
>warm regards,
>mk.


:-)) (Deja vu)

DELETE FROM MyTable WHERE Id # [101-1]
TABLEUPDATE(1, .t., [MyTable])