of_SetFindWindowClasses

pfcapsrv.pbl   >   pfc_n_cst_platform   >   of_SetFindWindowClasses

Name	Datatype
ll_idx	long
ll_upper	long

public function integer of_SetFindWindowClasses (string as_classname[]);//////////////////////////////////////////////////////////////////////////////
//
//	Function: of_SetFindWindowClasses
//
//	Access:  public
//
//	Arguments: as_className[] - An array of window class names to be used by 
//				  the service. 
//	
//	Returns:  Integer. Returns 1 if the function succeeds -1 if an error occurs.
//	
//	Description: The function sets the class window class names to be used by the
//					 the service.  of_FindWindow will use all of the class names 
//					 specified in the as_className array.
//					 The defaults are PowerBuilder window class names - 
//					 "FNWND370" and "FNWNS370".   
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	7.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.
//
//////////////////////////////////////////////////////////////////////////////

long ll_idx, ll_upper

ll_upper = UpperBound(as_className)

IF ll_upper < 1 THEN return -1

FOR ll_idx = 1 TO ll_upper
	IF IsNull(as_className[ll_idx]) THEN 
		// Nulls are allowed as wildcards
		Continue
	END IF
	
	IF Len(as_className[ll_idx]) < 1 THEN 
		return -1
	END IF
NEXT

is_className = as_className
return 1
end function

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