StrataFrame Forum » StrataFrame Application Framework - V1 » Business Objects and Data Access (How do I?) » Rollback fail...

Rollback fail...

Tiong Diu King — Wed, 14 Jul 2010 21:56:21 GMT

Hi all,

Below is my code which fail to rollback. Please advice

Public Sub thread()
Dim locblock As New BOprdyrec
Dim lnnumber As Integer

lnnumber = 1

Try
MicroFour.StrataFrame.Business.BusinessLayer.TransactionBegin("", Data.IsolationLevel.ReadCommitted)
Do While lnnumber > 0
lnnumber = lnnumber + 1
locblock.Add()
locblock.cpdrrefdoc = lnnumber.ToString
locblock.Save()
Loop
MicroFour.StrataFrame.Business.BusinessLayer.TransactionCommit("")
Catch ex As Exception
MicroFour.StrataFrame.Business.BusinessLayer.TransactionRollback("")

End Try

End Sub

RE: Rollback fail...

Tiong Diu King — Wed, 14 Jul 2010 21:56:21 GMT

Thanks Edhy Rijo for ur help

RE: Rollback fail...

Edhy Rijo — Wed, 14 Jul 2010 20:52:22 GMT

Hi Tiong,

Look at the StrataFrame documentation under the "Using Transactional Processing" topic for more explanation.

You are missing a parameter in the Save() method to use the transaction:
locblock.Save([b]True[/b])

One of the nice feature of StrataFrame is that it will allow you to save a BO with or without a transaction at any point.