RollbackTrans - Fetch Type out of range

I have ON ERROR in my Procedure and I am using dbconn.BeginTrans to start a Transaction.
I have some select statements (open recordset, selecting sequence # from dual in ORACLE) and some update statements inside the transactions.
When I get some error on Updates the control is coming to ON ERROR block, I have dbconn.RollbackTrans there to rollback all changes. On executing dbconn.RollbackTrans I get the following error

Runtime Error 40002
S1106[Microsoft][ODBC Cursor Library]Fetch type out of range

Please advise me how to execute RollbackTrans without getting the above error.