|
selectionchanged
|
|
Full name
|
pfc_u_tabpg_dwproperty_srvmultitable.ddlb_table.selectionchanged
|
Access
|
public
|
Extend of
|
|
Return value
|
|
Prototype
|
event selectionchanged()
|
Name
|
Datatype
|
li_rc
|
Integer
|
event selectionchanged;call super::selectionchanged;//////////////////////////////////////////////////////////////////////////////
//
// Event: selectionchanged
//
// Arguments:
// index
//
// Returns: Integer
// 1 if it succeeds.
// -1 if an error occurs.
//
// Description:
// A table has been selected.
//
//////////////////////////////////////////////////////////////////////////////
//
// 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
// Determine if there has been a table previously selected.
If ii_selectedindex > 0 Then
If ii_selectedindex <> index Then
// Validate that changing is ok.
li_rc = Parent.Event pfc_PropertyValidation()
If li_rc <= 0 Then
// Prevent going to a new table.
this.SelectItem(ii_selectedindex)
this.Event selectionchanged(ii_selectedindex)
Return
End If
End If
End If
If ii_selectedindex <> index Then
// Get the newly selected index / table.
ii_selectedindex = index
is_selectedtable = this.Text
// Using the newly selected table.
Parent.Event pfc_propertyloadtable(is_selectedtable)
// Enable or Disable the appropriate controls.
Parent.Event pfc_propertycontrols()
End If
end event