Buscar coincidencia datos con dos tablas Paradox BCB6

[lmpadron]

Empezado por Yugo

(...)y me salta la siguiente excepción: 'Invalid field name.BSIC'

Hola Yugo ... por lo que veo, me imagino el error este en que no haces referencia a la tabla2 para abrirla, por lo que al llamarla en el WHERE te dice q el campo BSIC no existe.

Prueba lo siguiente

Código SQL [-]
Query1->Close();
  Query1->SQL->Clear();

  Query1->SQL->Add("SELECT * ");
  Query1->SQL->Add("FROM tabla1, tabla2 "); // AKI AGREGAMOS LA TABLA2 !!!
  Query1->SQL->Add("WHERE tabla1.BSIC = tabla2.BSIC ");  
  //He renombrado el campo Id1 de la tabla1 a BSIC y el campo Id2.1 de la tabla2 tambien a BSIC por simple comodidad.
  //Los campos BSIC de ambas tablas son del mismo tipo (A) y mismo tamaño (6). 
  Query1->SQL->Add("AND tabla1.Frec1 = tabla2.Frec2.1 ");
  Query1->SQL->Add("ORDER BY Nombre1");

  Query1->Open();

Tambien puedes probar con un JOIN

Código SQL [-]
Query1->Close();
  Query1->SQL->Clear();

  Query1->SQL->Add("SELECT tabla1.* ");
  Query1->SQL->Add("FROM tabla1 ");
  Query1->SQL->Add("INNER JOIN tabla2 ON tabla2.BSIC = tabla1.BSIC ");  
  //He renombrado el campo Id1 de la tabla1 a BSIC y el campo Id2.1 de la tabla2 tambien a BSIC por simple comodidad.
  //Los campos BSIC de ambas tablas son del mismo tipo (A) y mismo tamaño (6). 
  Query1->SQL->Add("AND tabla1.Frec1 = tabla2.Frec2.1 ");
  Query1->SQL->Add("ORDER BY Nombre1");

  Query1->Open();

... Claro esto también podrías hacerlo así

Código SQL [-]
  Query1->Close();
  Query1->SQL->Clear();
  Query1->SQL->Add("SELECT tabla1.* FROM tabla1, tabla2"
                                  " WHERE tabla1.BSIC = tabla2.BSIC"
                                  " AND tabla1.Frec1 = tabla2.Frec2.1 "
                                  " ORDER BY tabla1.Nombre1");
   Query1->Open();

... o

Código SQL [-]
  Query1->Close();
  Query1->SQL->Clear();
  Query1->SQL->Add("SELECT * FROM tabla1"
                                  " INNER JOIN tabla2 ON tabla2.BSIC = tabla1.BSIC"
                                  " AND tabla1.Frec1 = tabla2.Frec2.1 "
                                  " ORDER BY tabla1.Nombre1");
   Query1->Open();

... o incluso una mejor

Código SQL [-]
  Query1->Close();
  Query1->SQL->Clear();
  Query1->SQL->Add("SELECT t1.* FROM tabla1 t1, tabla2 t2"
                                  " WHERE t1.BSIC = t2.BSIC"
                                  " AND t1.Frec1 = t2.Frec2.1 "
                                  " ORDER BY t1.Nombre1");
   Query1->Open();

... o

Código SQL [-]
  Query1->Close();
  Query1->SQL->Clear();
  Query1->SQL->Add("SELECT * FROM tabla1 t1"
                                  " INNER JOIN tabla2 t2 ON t2.BSIC = t1.BSIC"
                                  " AND t1.Frec1 = t2.Frec2.1 "
                                  " ORDER BY t1.Nombre1");
   Query1->Open();

un poco mas limpio verdad !!!