Rollback no xHarbour

[porter]

ola pessoal, gostaria de saber se no xHarbour, trabalhando com DBF, DBFCDX, existe o Rollback ou algo parecido

obrigado.

[vagucs]

da uma olhada neste topico no forum de fivewin.

http://fivewin.com.br/index.php?/topic/ ... do-em-dbf/

[Kapiaba]

Olá, teste este exemplo para ver se funciona:

Código: Selecionar todos

 BEGIN TRANSACTION [<path>]
        ROLLBACK [<tablename>]
         RESET [IN <alias>]
        END TRANSACTION

         ROOLBACK( [<tablename>] )
        ISMARKED()
         COMPLETED()

        Example of use:

      USE Vendors
      BEGIN TRANSACTION <path>
          REPLACE hold_pay WITH "XXX"
      END TRANSACTION

      IF .NOT. COMPLETED()
        IF .NOT. ROLLBACK()
          ? "transaction fail to restore file
          ? INKEY(0)
        ENDIF
      ENDIF

https://www.mail-archive.com/xharbour-d ... 02403.html

abs.