clicked

pfcutil.pbl   >   pfc_u_tabpg_dwproperty_services   >   cb_property   >   clicked

Name	Datatype
ll_currrow	long
lw_parentwindow	window

event clicked;//////////////////////////////////////////////////////////////////////////////
//
//	Event:  Clicked
//
//	Description:  Open the specific Property window.
//
//////////////////////////////////////////////////////////////////////////////
//	
//	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.
//
//////////////////////////////////////////////////////////////////////////////

long		ll_currrow
window	lw_parentwindow

// Get the currently selected row.
ll_currrow = dw_services.GetRow()

If ll_currrow > 0 Then
	SetPointer (HourGlass!)
	
	// Get the information needed by the Property window.
	inv_attrib.is_objectname = dw_services.Object.servicename.Primary[ll_currrow]
	inv_attrib.is_tabpages = dw_services.Object.servicepropertypages.Primary[ll_currrow]

	// Get the parent window ref so that the new window can open in relation to it.
	of_GetParentWindow(lw_parentwindow)
	If IsValid(lw_parentwindow) Then
		inv_attrib.iw_main = lw_parentwindow
	End If
	
	// Open the Property window.
	OpenWithParm (w_dwpropertyservices, inv_attrib)
End If
end event

Name	Owner
datawindow.getrow	datawindow
systemfunctions.isvalid	systemfunctions
systemfunctions.openwithparm	systemfunctions
systemfunctions.setpointer	systemfunctions
pfc_u_cb.of_getparentwindow	pfc_u_cb

Full name
w_dwpropertyservices
pfc_u_tabpg_dwproperty_services