CVL

Converts a single-precision floating-point number or four-byte string to an 
integer (KeyPgLongLong) variable

Syntax
	KeyPgDeclareDeclare KeyPgFunctionFunction CVL ( KeyPgByvalByVal sng KeyPgAsAs KeyPgSingleSingle ) KeyPgAsAs KeyPgLongLong
	KeyPgDeclareDeclare KeyPgFunctionFunction CVL ( KeyPgByrefByRef str KeyPgAsAs KeyPgConstQualifierConst KeyPgStringString ) KeyPgAsAs KeyPgLongLong

Usage
	result = CVL( sng )
	result = CVL( str )

Parameters
	sng
		A KeyPgSingleSingle floating-point number with a binary copy of an integer 
		variable stored in it.
	str
		A KeyPgStringString at least four bytes in length with a binary copy of an 
		integer variable stored in it.

Return Value
		A KeyPgLongLong variable to copy the binary copy of a integer to.

Description
	Returns a 32-bit KeyPgLongLong integer value using the binary data contained in a 
	KeyPgSingleSingle, or a KeyPgStringString of at least four bytes in length.  A value of zero (
	0) is returned if the string is less than four bytes in length.

	CVL is used to convert 4-byte strings created with KeyPgMklMKL.

	This function can also be used to convert 32-bit integer values from a 
	memory or file buffer without the need for a KeyPgTypeType structure.  However, 
	just as with the type structure, special care should be taken when using 
	CVL to convert strings that have been read from a buffer.

Example
	Dim l As Long, s As String
	s = "ABCD"
	l = CVL(s)
	Print Using "s = ""&"""; s
	Print Using "l = &"; l

Differences from QB
	* In QB an error occurs if the string passed is less than four bytes in 
	  length.
	* QB did not support floating-point arguments.

See also
	* KeyPgMklMKL
	* KeyPgCvshortCVShort
	* KeyPgCviCVI
	* KeyPgCvlongintCVLongInt

