FOR lni=1 to lnTableCount lcCommand=lcCommand+; "SELECT '"+laTables[lni]+"' AS TABLE,"+; "GROUP,FIELD_NAME,HEADER,"+; "ALLTRIM(DEFINITION) AS DESCR,"+; "FIELD_TYPE,FIELD_LEN,FIELD_DEC,FIELD_NULL,"+ ; laTables[lni] +" AS FIELD_ORDER FROM DATADICT WHERE "+laTables[lni]+">0 "+; "INTO CURSOR cur"+alltrim(str(lni)) if lni=lnTableCount lcCommand=lcCommand+" ORDER BY 1,10" endif &lcCommand lcCommand="SELECT * FROM cur" +alltrim(str(lni))+" UNION " ENDFOR ******************************Here lcTableCount=11.