of_GetRegistered

pfcdwsrv.pbl   >   pfc_n_cst_dwsrv_reqcolumn   >   of_GetRegistered

Name	Datatype
li_cnt	integer
li_regcnt	integer
li_upper	integer
ls_empty	string[]

public function integer of_GetRegistered (ref string as_regcolumns[]);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_GetRegistered
//
//	Access: 			Public
//
//	Arguments:
//	as_regcolumns[] by reference.   Registered columns.
//
//	Returns:  		Integer
//						The number of registered columns.
//
//	Description:  	
//	Gets all the registered SkipColumns.
//
//////////////////////////////////////////////////////////////////////////////
//
//	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_upper
integer	li_cnt
integer	li_regcnt = 0
string	ls_empty[]

// Initialize
as_regcolumns = ls_empty

// Loop around the entire array.
li_upper = UpperBound(is_skipcolumn)
For li_cnt = 1 to li_upper
	If Len(is_skipcolumn[li_cnt]) > 0 Then
		// Found a registered column.
		li_regcnt ++
		as_regcolumns[li_regcnt] = is_skipcolumn[li_cnt]
	End If
Next

Return UpperBound(as_regcolumns[])
end function

Name	Owner
pfc_u_tabpg_dwproperty_srvreqcolumn.pfc_propertypopulate	pfc_u_tabpg_dwproperty_srvreqcolumn

Name	Owner
systemfunctions.len	systemfunctions
systemfunctions.upperbound	systemfunctions