pfc_propertyinitialize


pfcutil.pbl   >   pfc_u_tabpg_dwproperty_buffers   >   pfc_propertyinitialize   

Full name pfc_u_tabpg_dwproperty_buffers.pfc_propertyinitialize
Access public
Extend of
Return value
Prototype event pfc_propertyinitialize()

Name Datatype
No Data

Name Datatype
li_rc integer
ls_dataobject string

event pfc_propertyinitialize;call super::pfc_propertyinitialize;//////////////////////////////////////////////////////////////////////////////
//
//	Event:  pfc_PropertyInitialize
//
//	Arguments:  
//	 anv_attrib   The datawindow property attributes.
//
//	Returns: Integer
//	 1 = successful
// -1 = Error
//
//	Description:
//	 Initializes the object.
//
//////////////////////////////////////////////////////////////////////////////
//	
//	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
string 	ls_dataobject

// Determine which Dataobject to try first.
If Len(Trim(inv_attrib.is_dataobjectbuffer)) > 0 Then
	ls_dataobject = Trim(inv_attrib.is_dataobjectbuffer)
Else
	ls_dataobject = idw_requestor.DataObject
End If

// Set/Validate the dataobject on the RequestorView used for the Primary view.
dw_requestorview.DataObject = ls_dataobject
li_rc = idw_requestor.ShareData ( dw_requestorview )
If li_rc <= 0 Then
	// Try the Dataobject associated with the Requestor.
	ls_dataobject = idw_requestor.DataObject
	dw_requestorview.DataObject = ls_dataobject
	li_rc = idw_requestor.ShareData ( dw_requestorview )
	If li_rc <= 0 Then	
		Return -1
	End If
End If

// Make all the columns available. 
li_rc = dw_requestorview.Event pfc_propertyunprotect()

// Set the new dataobject on the DuplicateDW used for Filter and Delete views.
// Make sure that the DuplicateDW is readonly.
dw_requestorduplicate.DataObject = ls_dataobject
dw_requestorduplicate.Object.DataWindow.ReadOnly = "Yes"

Return 1
end event

     
Name Owner
No Data

     
Name Owner
datawindow.sharedata datawindow
systemfunctions.len systemfunctions
systemfunctions.trim systemfunctions
pfc_u_tabpg_dwproperty_base.pfc_propertyinitialize pfc_u_tabpg_dwproperty_base
pfc_u_tabpg_dwproperty_buffers.dw_requestorview.pfc_propertyunprotect dw_requestorview

     
Full name
pfc_u_tabpg_dwproperty_buffers

     
Name Scope
No Data