|
pfc_propertyapply
|
|
Full name
|
pfc_u_tab_dwproperty_srv.pfc_propertyapply
|
Access
|
public
|
Extend of
|
integer
|
Return value
|
integer
|
Prototype
|
event integer pfc_propertyapply()
|
Name
|
Datatype
|
la_rc
|
Any
|
li_cnt
|
Integer
|
li_rc
|
Integer
|
li_upper
|
Integer
|
event pfc_propertyapply;call super::pfc_propertyapply;//////////////////////////////////////////////////////////////////////////////
//
// Event: pfc_PropertyApply
//
// Arguments: None
//
// Returns: Integer
// 1 = successful
// -1 = Error
//
// Description:
// Perform Apply functionality.
//
//////////////////////////////////////////////////////////////////////////////
//
// 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
Any la_rc
Integer li_upper
Integer li_cnt
// Loop through all the tab pages.
li_upper = Upperbound(iuo_tappage)
For li_cnt = 1 to li_upper
la_rc = iuo_tappage[li_cnt].Dynamic Event pfc_PropertyApply()
If ClassName(la_rc) = 'integer' or ClassName(la_rc)='long' Then
// The pfc_PropertyApply was found, validate the return code.
If la_rc < 0 Then Return -1
End If
Next
Return 1
end event