Hi,
Thank you for your reply. The code really looked simple and readable.
I have tried the similar code :

BEGIN TRANSACTION

** Do whatever insert or ReadComm
IF Not Success
ROLLBACK
TABLEREVRT(.T.)
ENDTRANSACTION

I get an error TABLEREVERT(.T.) is not suppoprted in transaction. Am I doing some mistake here?

By the way, how could I have spaces for the messages I post in UT?

Thank you