To test:

CLEAR
LOCAL lnTest
lnTest = 0
lnTest = TEST1() / TEST2()  &&  <= returns a numeric value with value  ****** and does not fire an error
?lnTest
llBadData = VARTYPE(m.lnTest) = 'N' and STR(m.lnTest) = REPLICATE('*',10)
?llBadData
? 1/0 && Doesn't give error either
lnTest  = (1/0)

FUNCTION TEST1

  RETURN(1)

ENDFUNC

FUNCTION TEST2

  RETURN(0)

ENDFUNC

>Hi All,
>
>Interesting problem:
>
>

>CLEAR
>
>? TEST1() / TEST2()  &&  <= returns a numeric value with value  ****** and does not fire an error
>
>FUNCTION TEST1
>
>  RETURN(1)
>
>ENDFUNC
>
>FUNCTION TEST2
>
>  RETURN(0)
>
>ENDFUNC
>

>
>The calling of two user functions which results in a division by zero does not cause an error and instead returns a numeric value containing asterisks. Q. How to trap for this problem? How to test for result = *****?