not that I know of.
we always modify the structure of an empty dbf and append the data back into it.
See if this helps any.
ofile = substr(ofile,1,7)
copy structure extended to temp
select 0
openfile("TEMP", .t.)
addrecord()
replace field_name with "D_1", field_type with "C", field_len with 2, field_dec with 0
addrecord()
replace field_name with "D_2", field_type with "C", field_len with 3, field_dec with 0
select (ofile)
use
select temp
use
create newdap.dbf from temp
if file('TEMP.DBF')
erase temp.dbf
endif
openfile('NEWDAP', .t.)
append from (ofile)
use
store (ofile)+'.DBF' to mdfile
delete file (mdfile)
rename newdap.dbf to (mdfile)
select 0
openfile(ofile,how)
Kris