> >> This, I am doing because I want to get lengths of fields from diff.
> >files,
> >> If it will be in one array, then I can issue 1 ascan command and get
> the
>
> Thanks for the Idea.. But don't you think its a very long method to do such
> a simple thing. Anyother suggestions ??
n=aused(aUse)
Create cursor FStruct (field_name c(10), Field_type c(1), field_len i,
field_dec i)
for j=1 to n
sele (ause(j)
=afields(astru)
sele fstruct
appe from array astru
endf
now you have the structure of all of your tables in this array. You may
need some few lines more to add the aliases into this cursor, if you
want it. Then you can even copy this cursor into your array, but I think
a Locate for "N"=trim(file_name) will surely find it, while
Ascan(alArray, "N") will stop at the first numeric field's _type_.