I am adding the following code to an editboxes afterchange event:

**RETREIVE JUST THE MEASUREMENT READING

LOCAL lcRead, lnX, lcReturnValue, lnAsc

lcReturnValue=''

lcRead=thisform.edtmy1.getvalue()

thisform.edtmy1.setvalue('')

FOR lnX=1 TO LEN(lcRead)

          lnAsc=ASC(SUBSTR(lcRead,lnX,1))

          IF lnAsc=46 OR (lnAsc>=48 AND lnAsc<=57)

                   lcReturnValue=lcReturnValue+CHR(lnAsc)

          endif

ENDFOR

SET DECIMALS TO 5

thisform.txtnumericmy1.setvalue(val(lcReturnValue))

It returns an error: allowed do nesting or expression evaluation level exceeded.



Is there a solution to this?