Disculpas Hilmar, te estaba escribiendo un ejemplo de transacciones con SQL y sin querer pulse el 'Enviar', mas o menos seria así:

nHandle = SQLCONNECT("odbc_driverSQLServer")
*-- Setting las transacciones en forma manual
SQLSETPROP(nHandle, 'Transactions', 2)

BEGIN TRANSACTION
*-- Codigo... 

IF Confirma_Grabar()
    IF SQLCOMMIT(nHandle) >= 0
        *-- Grabo Ok.
        END TRANSACTION	   
    ENDIF
ELSE
    SQLROLLBACK(nHandle)
    ROLLBACK
ENDIF   

>Dentro de VFP, para los números de documento, sólo los asigno en el momento >de guardar, y uso una transacción. Si no se puede guardar (TableUpdate() >falla), anulo la transacción. Pero no sé cómo serían las transacciones con >SQL Server.
>Hilmar.

Ricardo._