What does thisform.text3.value contain?

Is it just a table name or does it include the full path? SELECT (thisform.text3.value) looks for an ALIAS with the same name as your fully qualified data set name. It won't find one and will put you in an empty work area.

Does it contain any characters which are legal for file names but not legal for Alias. If so, the alias will have a legal character substituted. For example MY#TABLE becomes MY_TABLE.

As Mike suggests, step through the debugger and see what happens each step along the way.




>hi all,
>any idea, help
>i try to run this code under via myform i get error message
>
>file must be opend exclusivly ?
>

>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
>

>
>but i try as under it works
>

>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
>

>
>thanks