Si quieres saber los nombres de todas las tablas que tiene una Base de Datos el siguiente SELECT te dará esa información:

FUNCTION ObtenerTablas
LParameters tcCursor
Local lcConsulta, lnResultado

   lcConsulta = "SELECT " ;
              + "   RDB$RELATION_NAME " ;
              + "FROM " ;
              + "   RDB$RELATIONS " ;
              + "WHERE " ;
              + "   RDB$VIEW_SOURCE IS NULL"

   lnResultado = SQLExec(gnHandle, lcConsulta, tcCursor)

   Return(lnResultado)

 ENDFUNC
 *
 *