>Hi everybody,
>
>I decided to fix one old application of mine (received it recently from colleague and found bunch of bugs/problems). I am having a numeric overflow error on this piece of code
>
>

>for i=1 to m.lCount
>	lnSum = evaluate('curtemp.' + sumfields[m.i,1]) + evaluate('m.'+sumfields[m.i,1])
>	replace ('curtemp.' + sumfields[m.i,1]) with m.lnSum in curtemp
>endfor

>
>it bombs on the field NumBldgs, which is N(1) and lnSum = 10.
>
>I'm thinking what would be the best method to deal with this problem? Using try / catch and in case of error substitute lnSum with the max value allowed for the field? What's the simplest way to determine field's max size?
>
>Could you please help me here?
>
>Thanks a lot in advance.

I am trying to use try/catch block, but I must be doing something wrong, because I am getting unhandled errors instead. Here is my new code:

*---- Summarizing should be here
			for i=1 to m.lCount
				lnSum = evaluate('curtemp.' + sumfields[m.i,1]) + evaluate('m.'+sumfields[m.i,1])
				try
					replace ('curtemp.' + sumfields[m.i,1]) with m.lnSum in curtemp
					llReplace = .t.
				catch to oError when .t.
					=messagebox("Error replacing!" + chr(13) + ;
                  oError.Message + chr(13) + ;
                  "Error #:"+Transform(oError.ErrorNo)+chr(13)+;
                  "Line #:"+Transform(oError.LineNo)+chr(13)+;
                  "Error #:"+Transform(oError.LineContents),48,"Error")
					llReplace = .f.
				finally
					if type(m.oError)="O" and m.oError.ErrorNo = 39 && Numeric overflow
* we need to find maximum allowed for the field and use it instead of a sum
						messagebox("lnSum = " + transform(m.lnSum) + " for field " + sumfields[m.i,1])
					endif
				endtry
			endfor

which gives me unhandled error 11. How can I solve this problem?

Thanks in advance.