>LOCAL lcfile, lcalias, lcreclen, lafields >#DEFINE MAX_CLAUSES 20 >IF NOT USED('schema') > USE schema IN 0 SHARED >ENDIF > >CREATE TABLE OhioStreets(fieldnum I(4)) > >IF NOT used('OhioStreets') > USE OhioStreets IN 0 EXCLUSIVE >ENDIF >SELECT schema > >GO top >lcClause = "" lnCount=0 > >lcfields = "" >SELECT schema >SCAN > lnCount=m.lnCount +1 > lcFieldName = schema.desc > lnLength = schema.length > lcType = schema.type > lcClause = m.lcClause+ " ADD Column "+ ; m.lcFieldName+" "+ m.lcType+'('+transform(m.lnLenght)+')' if m.lnCount>= MAX_CLAUSES alter table OhioStreets &lcClause > lnCount=0 lcClause ="" endif >ENDSCAN if !empty(m.lcClause) && Remainder alter table OhioStreets &lcClause endifSee the changes, I made in code.