*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?
>** 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.