Ver Mensaje Individual
  #29  
Antiguo 20-01-2015
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Reputación: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
Pero si lo tienes hecho. De la BD1 extraes los proyectos:
Código SQL [-]
select proyectos from froyectmanager where proyectm= : parametro
Luego puedes crear un string con el resultado, mediante un bucle, algo similar a:
Código Delphi [-]
cProyectos:=''
while not query1.eof do
  cProyectos = cProyectos + query.fields[0].asstring + ','
  query1.next
end;
Ahora tienes en cProyectos algo así: 1,2,3,
Quitas la última coma, que sobra.
Ahora montas una sql para la BD2
ibquery2.selectsql.text='select proyecto,factura,importe where proyecto in (' + cProyectos + ')'
Y la ejecutas.
Ya tienes los resultados en el ibquery2, que si lo enlazas mediantes un datasource a un dbgrid... ya está.
Responder Con Cita