Pablo;

You might try the following as a start:

SET DEFA TO c:\psv
use mydet
SELE DIST tabla FROM cconfbase WHERE UPPER(LEFT(nombre,3))=="COD" INTO CURSOR MyRelTables NOFILTER
SELE MyRelTables


SELECT tabla, nombre, tipo, ancho, decimales FROM cconfbase ;
WHERE MyRelTables.tabla = cconfbase.tabla ;
ORDER BY tabla, nombre INTO CURSOR MyDetTemp NOFILTER

SELE MyDetTemp
REPORT FORM c:\psv\cconfbase.FRX TO PRINTER PREVIEW


Tom