CLOSE ALL m.a=ALLTRIM(thisform.text3.value) *USE ALLTRIM(thisform.text3.value) exclusive use (m.a) exclusive index on (thisform.text1.value) TAG (thisform.text1.value) select sys(2015) as SortOrder,* from (m.a) ; order by 1 descending ; into cursor crsTemp nofilter SELECT alltrim(m.a) zap &&file is in use select crsTemp scan if !seek((thisform.text1.value),'(m.a)','(thisform.text1.value)')&&alias is not found scatter memvar memo insert into m.a from memvar endif endscan brow>I see a couple of problems. The line
>>CLOSE ALL >>USE (thisform.text3.value) exclusive >>index on (thisform.text1.value) TAG(thisform.text1.value) >>select sys(2015) as SortOrder,* from (thisform.text3.value) ; >> order by 1 descending ; >> into cursor crsTemp nofilter >> SELECT (thisform.text3.value)&&& error message above >> BROW >>zap >>select crsTemp >>scan >> if !seek(thisform.text1.value,'(thisform.text3.value)','(thisform.text1.value)') >> scatter memvar memo >> insert into (thisform.text3.value) from memvar >> endif >>endscan >>brow >>>>
>>CLOSE all >>*use AMMAN_REGION exclusive >>*USE alldat exclusive >>USE ADSL_ALL exclusive >>index on CLIENT tag CLIENT >>select sys(2015) as SortOrder,* from ADSL_ALL ; >> order by 1 descending ; >> into cursor crsTemp nofilter >>select ADSL_ALL >>zap >>select crsTemp >>scan >> if !seek(CLIENT,'ADSL_ALL','CLIENT') >> scatter memvar memo >> insert into ADSL_ALL from memvar >> endif >>endscan >>brow >>>>