of_RollBack

pfcmain.pbl   >   pfc_n_tr   >   of_RollBack

Name	Datatype
ll_rc	long
ls_name	string

public function long of_RollBack ();//////////////////////////////////////////////////////////////////////////////
//	Public Function:  of_RollBack
//	Arguments:  	None
//	Returns:  		long - The SQLCode return value from the rollback statement.
//								 -10 if there is no connection to the database.
//	Description:  	Issues a rollback
//////////////////////////////////////////////////////////////////////////////
//	Rev. History	Version
//						5.0   Initial version
//////////////////////////////////////////////////////////////////////////////
//	Copyright © 1996-1999 Sybase, Inc. and its subsidiaries.  All rights reserved.  Any distribution of the 
// PowerBuilder Foundation Classes (PFC) source code by other than Sybase, Inc. and its subsidiaries is prohibited.
//////////////////////////////////////////////////////////////////////////////
long	ll_rc = -10
string ls_name

if of_IsConnected() then
	
	// If SQLSpy is available, add to the history
	if IsValid (gnv_app) then
		if IsValid (gnv_app.inv_debug) then
			ls_name = this.is_Name
			if Len (ls_name) = 0 then
				ls_name = this.ClassName()
			end if
			if IsValid (gnv_app.inv_debug.inv_sqlspy) then
				gnv_app.inv_debug.inv_sqlspy.of_SQLSyntax ("Rollback using " + ls_name)
			end if 
		end if
		rollback using this;
		ll_rc = this.SQLCode
	end if
	
end if

return ll_rc
end function

Name	Owner
pfc_n_cst_luw.of_begintran	pfc_n_cst_luw
pfc_n_cst_luw.of_endtran	pfc_n_cst_luw
pfc_n_tr.destructor	pfc_n_tr

Name	Owner
powerobject.classname	powerobject
systemfunctions.isvalid	systemfunctions
systemfunctions.len	systemfunctions
pfc_n_tr.of_IsConnected	pfc_n_tr
pfc_n_cst_sqlspy.of_sqlsyntax	pfc_n_cst_sqlspy

Full name
demopfc