*replace companyinfo.totalsurveys with numrecs
replace totalsurveys with numrecs IN companyinfo

>I had code that was working and now it doesn't. Can someone help me figure out why?
>
>The form load contains
>

>** form.load
>set deleted on
>
>use (addbs(fileloc) + "surveys\companyinfo") in 0 alias companyinfo order CompanyNam
>use (addbs(fileloc) + "surveys\history") in 0 alias tblhistory
>use (addbs(fileloc) + "bluebook\sites") in 0 alias sites order site_name
>use (addbs(fileloc) + "plans\pei") in 0 alias pei order permid
>
>set multilocks on

>= CURSORSETPROP('Buffering', 5, 'companyinfo')  && Enable table buffering
>
>select companyinfo
>set filter to yearproduced = gnSurveyYear
>dodefault()
>

>The PRG contains:
>

>select crsImport
>numrecs = reccount()
>replace companyinfo.totalsurveys with numrecs
>wait window transform(numrecs)     && confirms the proper value
>dimension errorarray(10)
>=tableupdate(0,.f.,'companyinfo','ErrorArray')
>select companyinfo
>

>but the new value for totalsurveys is NOT saved. The code runs without a hitch and I can't seem to get anything out of ErrorArray.
>
>Help please!!