>Does anyone know of a way to extract a database of its tables structures such as table name, table index, table field datatype?


I do that to print a struct listing of tables

SET SAFETY OFF
OPEN DATABASE (lcSource)  NOUPDATE
lnNumSourceTables=ADBOBJECTS(la1,"TABLE")
ASORT(la1)
....

and

...
lnNumSourceFields=AFIELDS(la3)
...

and

		lnNumTags=ATAGINFO(la2)

Hope this helps

Peter