of_IsRegistered

pfcdwsrv.pbl   >   pfc_n_cst_dwsrv_reqcolumn   >   of_IsRegistered

Name	Datatype
li_cnt	integer
li_upper	integer

public function boolean of_IsRegistered (string as_column);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_IsRegistered
//
//	Access: 			Public
//
//	Arguments:
//	as_column		Column which needs to be tested..
//
//	Returns:  		boolean
//		True / False
//
//	Description:  	
//	Determines if the passed in column is registered.
//
//////////////////////////////////////////////////////////////////////////////
//
//	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

// Check arguments.
If IsNull(as_column) or Len(Trim(as_column))=0 Then 
	Return False
End If

// Trim and Convert to lower case.
as_column = Lower(Trim(as_column))

// Determine if column is registered.
li_upper = UpperBound(is_skipcolumn)
For li_cnt = 1 to li_upper
	If is_skipcolumn[li_cnt] = as_column Then
		// Column was previously registered.
		Return True
	End If
Next

// The column is not registerd.
Return False
end function

Name	Owner
pfc_u_tabpg_dwproperty_srvreqcolumn.pfc_propertyapply	pfc_u_tabpg_dwproperty_srvreqcolumn

Name	Owner
systemfunctions.isnull	systemfunctions
systemfunctions.len	systemfunctions
systemfunctions.lower	systemfunctions
systemfunctions.trim	systemfunctions
systemfunctions.upperbound	systemfunctions