pfc_postopen

pfcdwsrv.pbl   >   pfc_w_filtersimple   >   pfc_postopen

Name	Datatype
li_i	integer
li_newrow	integer
li_numcols	integer
li_rc	integer
lnv_string	n_cst_string
ls_filter	string

event pfc_postopen;call super::pfc_postopen;//////////////////////////////////////////////////////////////////////////////
//
//	Object Name:  pfc_postopen
//
//	Description:  Add the column names to the dropdownlist
//
//////////////////////////////////////////////////////////////////////////////
//	
//	Revision History
//
//	Version
//	5.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_newrow, li_numcols, li_i, li_rc
string	ls_filter
n_cst_string lnv_string

// Turn off re-drawing until all done.
dw_filter.SetReDraw (FALSE)

// Make the original filter visible.
ls_filter = inv_filterattrib.is_filter
If Pos(ls_filter, "~~~~'") > 0 And  Pos(ls_filter, "~~~~~~'") = 0 Then
	ls_filter = lnv_string.of_GlobalReplace(ls_filter, "~~~~'", "~~'")	
End If
mle_originalfilter.text = ls_filter

// Insert a new row.
li_newrow = dw_filter.Event pfc_AddRow()

// Get the Column Name childdatawindow reference.
li_rc = dw_filter.GetChild ( "colname", idwc_cols ) 

// Get the Column Value childdatawindow reference.
li_rc = dw_filter.GetChild ( "colvalue", idwc_values ) 

// Populate the childdatawidow column with the column names.
li_numcols = UpperBound ( inv_filterattrib.is_columns ) 
FOR li_i = 1 to li_numcols
	// Insert new row.
	li_newrow = idwc_cols.InsertRow ( 0 ) 

	// Populate the values for the new row.
	idwc_cols.SetItem ( li_newrow, "columnname", inv_filterattrib.is_columns[li_i] )
 	idwc_cols.SetItem ( li_newrow, "display_column", inv_filterattrib.is_colnamedisplay[li_i] ) 
NEXT

// Turn off re-drawing until all done.
dw_filter.SetReDraw (TRUE)
end event

Name	Owner
dragobject.setredraw	dragobject
datawindow.getchild	datawindow
datawindowchild.insertrow	datawindowchild
datawindowchild.setitem	datawindowchild
systemfunctions.pos	systemfunctions
systemfunctions.upperbound	systemfunctions
pfc_n_cst_string.of_globalreplace	pfc_n_cst_string
pfc_u_dw.pfc_addrow	pfc_u_dw
w_master.pfc_postopen	w_master

Full name
pfc_w_filtersimple