>Hi everybody,
>
>I have a database with about 200 tables in it. I'd like to create a program that would check if we have orphans and create a report. Do we already have something available for this purpose or how should I create such program?
>
>Thanks a lot in advance.

This should get you started

local aa[1], i, n
n =  adbobjects(aa, 'Relation') && look in the help for the contents

for i = 1 to m.n
  ...
    use table1
    && + ataginfo()
   use table2
  && + ataginfo()
  
 && construct select statement
&& execute select statement

  use in table1
  use in table2

endfor