FUNCTION Hex2Dec( nVar1 AS LOGICAL ) LOCAL nVar AS NUMERIC, nVar2 AS CHARACTER, nVar3 AS LOGICAL, nNoType := 3 nVar1 := .T. nVar1 := 1 nVar := 'A' nVar := 2 nVar2 := 'B' nVar2 := 2 nVar3 := .T. nVar3 := nNoType nVar3 := nVar NondDeclared := 2 RETURN NIL