|
pfc_replacedlg
|
|
Full name
|
pfc_n_cst_dwsrv_find.pfc_replacedlg
|
Access
|
public
|
Extend of
|
|
Return value
|
|
Prototype
|
event pfc_replacedlg()
|
Name
|
Datatype
|
li_rc
|
integer
|
event pfc_replacedlg;call super::pfc_replacedlg;//////////////////////////////////////////////////////////////////////////////
//
// Event: pfc_replacedlg
//
// (Arguments: None)
//
// (Returns: None)
//
// Description: Call the replace dialog window.
//
//////////////////////////////////////////////////////////////////////////////
//
// Revision History
//
// Version
// 5.0 Initial version
// 5.0.02 Close existing Dialog window prior to displaying the new Dlg window.
// 6.0 Enhanced with pfc_prereplacedlg capabilities.
// 6.0 Ehnanced to use new Allow Dialog attribute.
//
//////////////////////////////////////////////////////////////////////////////
//
// 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
//Make sure is allowed to open dialog.
If Not of_IsAllowReplaceDlg() Then Return
//Validate required reference.
If IsNull(idw_requestor) or Not IsValid(idw_requestor) Then Return
//Close existing Dialog window prior to displaying the new Dlg window.
If IsValid(w_replace) Then Close(w_replace)
If IsValid(w_find) Then Close(w_find)
//Set this object as the requestor.
inv_findattrib.ipo_requestor = this
//Look Options are required for Column Searches.
inv_findattrib.ib_lookvisible = True
inv_findattrib.ib_lookenabled = True
//Whole word capabilities are not supported on column searches.
inv_findattrib.ib_wholewordvisible =False
inv_findattrib.ib_wholewordenabled =False
inv_findattrib.ib_wholeword = False
//Build the Column List for the Replace operation.
//The Replace list is build everytime to catch for possible manipulation of the
//columns between visible and not visible.
li_rc = of_BuildColumnNames (True)
//Pfc_prereplacedlg capabilities.
idw_requestor.Event pfc_prereplacedlg(inv_findattrib)
//Open Replace window.
OpenWithParm(w_replace, inv_findattrib)
end event