of_isnumerictype

pfcmain.pbl   >   pfc_u_calculator   >   of_isnumerictype

Name	Datatype
lb_numeric	boolean
ls_testtype	string

protected function boolean of_isnumerictype (string as_type);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_IsNumericType
//
//	Access: 			Protected
//
//	Arguments:		
//	 as_type			The type to test for.
//
//	Returns: 		boolean
//						True if the type is numeric. False otherwise.
//
//	Description:	Determine if the type passed in is of type numeric.
//
//////////////////////////////////////////////////////////////////////////////
//
//	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.
//
//////////////////////////////////////////////////////////////////////////////
boolean	lb_numeric
string	ls_testtype

// Check the required reference.
If IsNull(as_type) Then
	Return False
End If

ls_testtype = Lower(Left(as_type, 4))
lb_numeric = (ls_testtype='deci' Or ls_testtype='long' Or ls_testtype='numb')

Return lb_numeric
end function

Name	Owner
pfc_u_calculator.of_dropdown	pfc_u_calculator
pfc_u_calculator.of_register	pfc_u_calculator
pfc_u_calculator.of_register	pfc_u_calculator
pfc_u_calculator.of_GetRegisterable	pfc_u_calculator

Name	Owner
systemfunctions.isnull	systemfunctions
systemfunctions.left	systemfunctions
systemfunctions.lower	systemfunctions