Syntax 1 For OLETxnObject objects

Description

Declares that the current transaction should be rolled back.

Controls

OLETxnObject objects

Syntax

<span>oletxnobject</span>.<span>SetAbort</span> ( <span> </span>)

1	<span>oletxnobject</span>.<span>SetAbort</span> ( <span> </span>)

Argument	Description
oletxnobject	The name of the OLETxnObject variable that is connected to the COM object

Return Values

Integer. Returns 1 if it succeeds and
-1 if an error occurs.

Usage

Call the SetAbort function from the client
to force a COM+ transaction to be rolled back. The default
is to complete the transaction if all participants in the transaction
on the COM+ server have called SetComplete or EnableCommit.

Examples

The following example shows the use of SetAbort in
a component method that performs database updates:

integer li_rc

1	integer li_rc

OleTxnObject lotxn_obj

1	OleTxnObject lotxn_obj

lotxn_obj = CREATE OleTxnObject

1	lotxn_obj = CREATE OleTxnObject

li_rc = lotxn_obj.ConnectToNewObject("pbcom.n_test")

1	li_rc = lotxn_obj.ConnectToNewObject("pbcom.n_test")

IF li_rc &lt;&gt; 0 THEN

1	IF li_rc <> 0 THEN

    Messagebox( "Connect Error", string(li_rc) )

1	Messagebox( "Connect Error", string(li_rc) )

   // handle error

1	// handle error

END IF

END IF

lotxn_obj.f_dowork()

1	lotxn_obj.f_dowork()

lotxn_obj.f_domorework()

1	lotxn_obj.f_domorework()

IF /* test for client satisfaction */ THEN

1	IF /* test for client satisfaction */ THEN

        lotxn_obj.SetComplete()

1	lotxn_obj.SetComplete()

ELSE

ELSE

        lotxn_obj.<span>SetAbort</span>()

1	lotxn_obj.<span>SetAbort</span>()

END IF

END IF

lotxn_obj.DisconnectObject()

1	lotxn_obj.DisconnectObject()

August 13, 2023

Was this article helpful?

Syntax 1 For OLETxnObject objects – PB Docs 126