|
of_update
|
|
Full name
|
pfc_u_base.of_update
|
Access
|
public
|
Extend of
|
integer
|
Return value
|
integer
|
Prototype
|
public function integer of_update(boolean,boolean)
|
Name
|
Datatype
|
lpo_empty
|
powerobject[]
|
lpo_pending
|
powerobject[]
|
lpo_updatearray
|
powerobject[]
|
public function integer of_update (boolean ab_accepttext, boolean ab_resetflag);//////////////////////////////////////////////////////////////////////////////
//
// Function:
// of_Update
//
// Access: public
//
// Arguments:
// ab_accepttext When applicable, specifying whether control should perform an
// AcceptText prior to performing the update:
// ab_resetflag Value specifying whether object should automatically
// reset its update flags.
//
// Returns: Integer
// 1 = The update was successful
// 0 = No action
// -1 = The update failed
//
// Description:
// Execute the specific Update logic.
//
// Note:
// Specific Update logic should be coded in descendant pfc_Update event.
// Part of the SelfUpdatingObject(SUO) API.
// No Action will be executed, If the object is not Updateable.
//
//////////////////////////////////////////////////////////////////////////////
//
// 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.
//
//////////////////////////////////////////////////////////////////////////////
powerobject lpo_updatearray[]
powerobject lpo_pending[]
powerobject lpo_empty[]
// Make sure there is something to take action on.
If Not of_IsUpdateable() Then Return NO_ACTION
If UpperBound(ipo_pendingupdates) > 0 Then
// Should be part of a SUO unit.
lpo_pending = ipo_pendingupdates
Else
// Might not be part of an SUO unit. Need to know what objects had updatespending.
If UpperBound(ipo_updateobjects) > 0 Then
lpo_updatearray = ipo_updateobjects
Else
lpo_updatearray = This.Control
End If
If this.Event pfc_UpdatesPending(lpo_updatearray, lpo_pending) < 0 Then
Return -1
End If
End If
Return this.Event pfc_Update(lpo_pending, ab_accepttext, ab_resetflag)
end function