lnTables = This.Parent.DBCXGetAllObjects(lcDBC + '!Table', ; @laTables, 'CBcCaption', 'SDTCanUpdate', .T.) lcDBCName = upper(padr(lcDBC, fsize('cDBCName', 'CoreMeta'))) for lnI = lnTables to 1 step -1 lcTable = upper(laTables[lnI, 2]) if not seek(lcDBCName + 'I' + lcTable + '.', 'CoreMeta', ; 'ObjectName') adel(laTables, lnI) dimension laTables[alen(laTables, 1) - 1, ; alen(laTables, 2)] endif not seek(lcDBCName ... next lnI- In SDTMgr.SelectTablesToProcess, replace this line:
lnTables = This.Parent.DBCXGetAllObjects(lcDBC + '!Table', @laTables, ; 'CBcCaption', tcProperty, tuValue)with:
if empty(taTables[1]) lnTables = This.Parent.DBCXGetAllObjects(lcDBC + '!Table', @laTables, ; 'CBcCaption', tcProperty, tuValue) else acopy(taTables, laTables) lnTables = alen(laTables, 1) endif empty(taTables[1])- Near the end of SDTMgr.SelectTablesToProcess, add the following after the OTHERWISE statement and before the ACOPY statement:
dimension taTables[alen(laTables, 1), alen(laTables, 2)]>Is there a DBCXGetProp() way to determine whether a given table has an index?