of_IsInArray

pfcwnsrv.pbl   >   pfc_n_cst_menu   >   of_IsInArray

Name	Datatype
li	integer
li_arraysize	integer

protected function boolean of_IsInArray (integer ai_barindexarray[], integer ai_barindex);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_IsInArray
//
//	Access:  		protected
//
//	Arguments:		
//	ai_barindexarray[]	Array on which to test.
//	ai_barindex				Index that needs to be searched for on the array.
//
//	Returns:  		boolean
//						True if the entry is already in the array.
//						False if the entry is not in the array.
//
//	Description:  	Determine if the new ToolbarItemBarIndex is already in the
//						array.
//
//////////////////////////////////////////////////////////////////////////////
//
//	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
integer li_arraysize

li_arraysize = UpperBound(ai_barindexarray[])

For li = 1 to li_arraysize
	If ai_barindex = ai_barindexarray[li] Then
		Return True
	End If
Next

Return False

end function

Name	Owner
pfc_n_cst_menu.of_getalltoolbarindex	pfc_n_cst_menu

Name	Owner
systemfunctions.upperbound	systemfunctions