>************************
>PROCEDURE Hex2Dec
>************************
>* Convert Hex 00 - FF to decimal 0 - 255
>PARAMETER hexvalue2
>RETURN (DECIVALUE(LEFT(hexvalue2,1))*16)+DECIVALUE(RIGHT(hexvalue2,1))
>
>************************
>PROCEDURE DECIVALUE
>************************
>* Convert single hex number into decimal
>
>PARAMETER hexvalue1
>RETURN AT(hexvalue1,'0123456789ABCDEF')-1
>
>PROCEDURE abortall
>llabortall = .T.
>RETURN
Cant you just do instead of using Hex2Dec and decivalue:
EVALUATE("0x" + hexvalue)
I will bet thats much faster than calling a function that calls another function 2 times.
Also, from the Help File:
"VARTYPE( ) is similar to the TYPE( ) function, but VARTYPE( ) is faster and does not require quotation marks to enclose the expression for which the data type is returned."
Just my 2 cents.
Carlos