The rollback work statement rolls back (or undoes) a transaction.
Syntax
|
rollback work {then|else statement.block} |
Description
This operation automatically undoes all updates made since the last begin work statement. All locks acquired within the transaction are released.
Example(s)
|
open "myfile" to f1 open "mylog" to f2 begin work write total on f2,timedate();* create synchronized log readu total from f1,"total" if total = 0 then rollback work;* Cannot do anything end else total = total - 1 write total on f1,"total" commit work else print "Could not update" end |
See Also