of_update

pfcmain.pbl   >   pfc_n_ds   >   of_update

Name	Datatype
li_rc	integer

public function integer of_update (boolean ab_accepttext, boolean ab_resetflag, boolean ab_insert, boolean ab_update, boolean ab_delete);//////////////////////////////////////////////////////////////////////////////
//
//	Function:
//	of_Update
//
//	Arguments:  
//	ab_accepttext	Value specifying whether the DataWindow control should perform an
//						AcceptText prior to performing the update:
//	ab_resetflag	Value specifying whether DWControl should automatically 
//						reset the update flags.
//	ab_insert		Boolean stating if Inserts should be performed.
//	ab_update		Boolean stating if Updates should be performed.
//	ab_delete		Boolean stating if Deletes should be performed.
//
//	Returns: Integer
//	 1 = The update was successful
//	-1 = The update failed
//
//	Description:  	
//	Perform the Specific Update logic, but only perform the requested
//	SQL (insert, update, delete) statements.
//
//////////////////////////////////////////////////////////////////////////////
//	
//	Revision History
//
//	Version
//	6.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1997 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.
//
//////////////////////////////////////////////////////////////////////////////

integer	li_rc

// Verify passed arguments.
IF IsNull(ab_accepttext) Or IsNull(ab_resetflag) &
	Or IsNull(ab_insert) Or IsNull(ab_update) Or IsNull(ab_delete) Then 
	Return -1 
End If

// Set the variable which determines which updates are allowed.
is_updatesallowed = ''
If ab_insert Then is_updatesallowed += 'I'
If ab_update Then is_updatesallowed += 'U'
If ab_delete Then is_updatesallowed += 'D'

// Perform the update.
li_rc = this.Event pfc_update (ab_accepttext, ab_resetflag)

// Reset the variable which determines which updates are allowed.
is_updatesallowed = "IUD"

Return li_rc
end function

Name	Owner
pfc_n_cst_tvsrv_levelsource.of_update	pfc_n_cst_tvsrv_levelsource

Name	Owner
systemfunctions.isnull	systemfunctions
pfc_n_ds.pfc_update	pfc_n_ds