>In response to your comments it's still a lot of typing with 250 fields but you suggestions would save some typing.
>
>Regards,
>Torrey

No it's not a lot of typing, you only need to edit ones with shortnames. ie:

use Source
copy structure extended to myMapper
use myMapper
browse

Or :
Edit your longtablename one to have shortnames in comment field for the ones that need different naming. Afields() would then have necessary mapping info.

Or :
With a select rename fields on the fly ...

Or :
Set fields global
Set fields to ShrtName1 = LongName1, ....

Or :
CursorToXML()
strtran(...)
XMLToCursor()

Or (VFP8):
insert into Target (shrt1,shrt2...) from (select long1,long2,.... )

Or let VFP type most of it for you :

m.MySource = 'SourceTable'
m.myTarget = 'TargetTable'
Select(m.mySource)
set textmerge to memvar m.lcFieldsLong noshow
set textmerge on
\\replace ;
for ix = 1 to fcount()
 \   <<m.myTarget>>.<<field(m.ix)>> with <<m.mySource>>.<<field(m.ix)>>, ;
endfor
\ in '<<m.myTarget>>'
set textmerge to
set textmerge off
_cliptext = m.lcFieldsLong

Or and or and or .... < bg >

Even if it's a lot of typing it's a one time work.

And yet for an alternative (drag&drop) check FoxyClasses importer.
Cetin