|
of_updateprep
|
|
Full name
|
pfc_w_master.of_updateprep
|
Access
|
public
|
Override of
|
integer
|
Return value
|
integer
|
Prototype
|
public function integer of_updateprep()
|
Name
|
Datatype
|
lpo_empty
|
powerobject[]
|
lpo_pending
|
powerobject[]
|
lpo_updatearray
|
powerobject[]
|
public function integer of_updateprep ();//////////////////////////////////////////////////////////////////////////////
//
// Function:
// of_UpdatePrep
//
// Access: public
//
// Arguments: none
//
// Returns: integer
// 1 = All preparation passed
// 0 = No Action
// -1 = preparation failed
//
// Description:
// Perform an Update Preparation.
//
// Note:
// Specific updateprep logic should be coded in descendant pfc_updateprep 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_UpdatesPendingRef(lpo_updatearray, lpo_pending) < 0 Then
Return -1
End If
End If
Return this.Event pfc_updateprep(lpo_pending)
end function