>>>>thisform.text11.Value=GETFILE('xls') >>>> >>>>IMPORT FROM (thisform.text11.value) TYPE xls >>>> >>>>use JUSTSTEM(thisform.text11.value) >>>>tt=JUSTSTEM(thisform.text11.value) >>>>USE (tt) excl >>>> >>>> >>>>ALTER TABLE (TT) ADD COLUMN TXPNO C(19) >>>>ALTER TABLE (TT) ADD COLUMN YEARe C(6) >>>>ALTER TABLE (TT) ADD COLUMN INFTYPE C(2) >>>>ALTER TABLE (TT) ADD COLUMN INFDATE C(12) >>>>ALTER TABLE (TT) ADD COLUMN OFFCODE C(6) >>>>ALTER TABLE (TT) ADD COLUMN ENTRYID C(15) >>>>ALTER TABLE (TT) ADD COLUMN ENTDATE C(12) >>>>ALTER TABLE (TT) ADD COLUMN CONFFLAG C(3) >>>>ALTER TABLE (TT) ADD COLUMN CONFID C(12) >>>>ALTER TABLE (TT) ADD COLUMN CONFDATE C(12) >>>> >>>>replace TXPNO WITH THISFORM.TEXT1.Value >>>>replace YEARe WITH THISFORM.TEXT2.Value >>>>replace INFTYPE WITH THISFORM.TEXT3.Value >>>>replace INFDATE WITH THISFORM.TEXT4.Value >>>>replace OFFCODE WITH THISFORM.TEXT5.Value >>>>replace ENTRYID WITH THISFORM.TEXT6.Value >>>>replace ENTDATE WITH THISFORM.TEXT7.Value >>>>replace CONFFLAG WITH THISFORM.TEXT8.Value >>>>replace CONFID WITH THISFORM.TEXT9.Value >>>>replace CONFDATE WITH THISFORM.TEXT10.Value >>>> >>>>USE (tt) excl >>>> >>>>FOR gnCount = 1 TO FCOUNT( ) >>>> m.OldName = FIELD(gnCount) >>>> m.NewName = ALLTRIM(EVALUATE(FIELD(gnCount))) >>>> >>>> ******************************************************* >>>> ALTER TABLE (tt) RENAME COLUMN (m.OldName) TO (m.NewName)&& syntax error >>>>next >>>>>>>>