Estou usando o CA e SQL Server, e querendo executar um ROLLBACK

Mesmo emitindo um

SET MULTLOCKS ON
=CURSORSETPROP('Buffering,5)
Begin Transaction

   Comandos...
   lUp = TableUpdate(.T.)
   comandos..
   lUp = TableUpdate(.T.)
   update
   lUp = TableUpdate(.T.)
   replacae
   lUp = TableUpdate(.T.)
   etc...

ROLLBACK  && Não executa

Quando este mesmo codigo em tabelas do VFP funciona, perfeitamente. O SQL Server não trabalha com as transações do VFP ?

Para funcionar estou guardando o Objecto Connection do meu CA, em uma propriedade da _screen

e usando :

_screen.oConn.BeginTrans
   Comandos...
   lUp = TableUpdate(.T.)
   comandos..
   lUp = TableUpdate(.T.)
   update
   lUp = TableUpdate(.T.)
   replacae
   lUp = TableUpdate(.T.)
   etc...

_screen.oConn.RollbackTrans

Esta é a forma correta de se trabalhar ?