Desfazer as últimas atualizações de um banco de dados.
UNDO
Quando em uma transação for necessário desfazer as atualizações já efetuadas.
Para utilizar este recurso, no banco de dados a opção ARQRECUP, deve estar presente.
Este comando é utilizado em conjunto com os comando LOCK e UNLOCK.
O exemplo a seguir mostra-nos como desfazer as transações caso ocorra algum erro numa das operações.
LOCK && Bloqueia o banco de dados.
IF DBERR() # 0
erro = .T.
ELSE
SELECT c
REPLACE AUTOMEM
INSERT
IF DBERR() # 0
erro = .T.
ENDIF
ENDIF
IF erro
UNDO && Desfaz as atualizações anteriores.
ENDIF
UNLOCK
$FILES, FIND, LOCK, SEEK, SET LOCKLOOP, SET MESSAGE, UNLOCK DBERR( ).