of_isregistered

pfcdwsrv.pbl   >   pfc_n_cst_dwsrv_resize   >   of_isregistered

Name	Datatype
li_cnt	integer
li_count	integer

public function boolean of_isregistered (string as_control);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_IsRegistered
//
//	Access:  		public
//
//	Arguments:
//	as_control		Object to test if registered.
//
//	Returns:  		boolean
//	 True if the object is registered.
//	 False if not.
//
//	Description:
//	 Determine if the passed in object is registered.
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	6.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1999 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_count
integer		li_cnt

// Check arguments
If IsNull(as_control) Or Len(Trim(as_control))=0 Then 
	Return False
End If

// Loop to find entry.
li_count = UpperBound(inv_registered)
For li_cnt = 1 to li_count
	If inv_registered[li_cnt].s_control = as_control Then
		Return True
	End If
Next

Return False
end function

Name	Owner
pfc_n_cst_dwsrv_resize.of_isregistered	pfc_n_cst_dwsrv_resize
pfc_u_tabpg_dwproperty_srvresize.pfc_propertyapply	pfc_u_tabpg_dwproperty_srvresize

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