Consulta en dos tablas distintas

[orioncomputer]

Saludos Alej.villa

No soy muy experto en programación en delphi, pero si se como se realiza la consulta SQL que deseas, te detallo un ejemplo y luego tu lo condicionas al DM que desees, ahora bien no entiendo el porque tienes que hacer la consulta por etapas, pero bueno yo te mostrare un ejemplo de como consultas directamente preguntando a la tabla por las tres variables de una vez, pienso que si tu objetivo final es la ultima consulta porque no reducir las 2 o 3 consultas previas a una sola.

Acá te detallo la Consulta

Código SQL [-]
SELECT  A.Cedula, B.Cedula
FROM  Empleado AS A INNER JOIN
    Turno_Temporal AS B ON A.Cedula = B.Cedula AND A.Turno = B.Turno_Temp
GROUP BY A.Cedula, B.Cedula
HAVING  (A.Cedula = 'CCCC') AND (B.Estado = 'EEEEE') AND (B.Turno_Temp = 'TTTTT')

Como veras los Campos con las "C", "E" y "T", deben ser reemplazados en tu consulta por las variables que tienes.
Bueno de no entender, por acá estamos a la orden

[alej.villa]

Empezado por orioncomputer

Saludos Alej.villa
pienso que si tu objetivo final es la ultima consulta porque no reducir las 2 o 3 consultas previas a una sola.

Acá te detallo la Consulta

Código SQL [-]
SELECT    A.Cedula, B.Cedula 
FROM    Empleado AS A INNER JOIN         
Turno_Temporal AS B ON A.Cedula = B.Cedula AND A.Turno = B.Turno_Temp 
GROUP BY A.Cedula, B.Cedula 
HAVING    (A.Cedula = 'CCCC') AND (B.Estado = 'EEEEE') AND (B.Turno_Temp = 'TTTTT')

Como veras los Campos con las "C", "E" y "T", deben ser reemplazados en tu consulta por las variables que tienes.
Bueno de no entender, por acá estamos a la orden

Buen día orioncomputer
quiero hacer exáctamente eso que tu dices en tu mensaje, en vez de realizar 2 ó 3 consultas quiero hacer una sola.
Según entiendo de tu código SQL el me filtraría todas las cédulas que sean iguales en las dos tablas (Empleados y Turno_Temporal) cierto? de ser esto cierto la consulta no es la correcta puesto que necesito todas las cédulas de la tabla empleados y de la tabla tabla Turno_Temporal que coincidan con el turno (Que es seleccionado por el usuario).

[alej.villa]

Buen día amigos del clubdelphi

he intentado hacer de todo tipo de consulta que me resuelva mi problematica, pero no logró dar con la solución
¿será que alguien puede ayudarme?

PD: Es lo único que me falta para terminar mi sistema.

¡Gracias de antemano!

[Casimiro Notevi]

¿Y cual es el problema?

[alej.villa]

Que quiero consultar dos tablas cuyo campo en común es la cédula, pero necesito todas las cédulas de las dos tablas cuándo el turno sea igual al indicado por el usuario.

[Casimiro Notevi]

Sí, ¿pero no te sirve la ayuda que te han dado?, ¿no hacen lo que quieres?, exactamente ¿en qué difieren de lo que necesitas?.
Si lo ves necesario escribe aquí nombres de las tablas y campos y con valores de ejemplo para que esté todo bien claro. Así será más fácil que consigas la ayuda. Es que si simplemente dices que no funciona, no sale, necesitas ayuda... Tienes que ayudar a que te ayuden. Te recuerdo nuestra guía de estilo.
Ten la seguridad de que si no has conseguido más ayuda es, simplemente, porque no está bien clara la exposición de tu duda. Por favor, esfuérzate un poco más, gracias por tu colaboración.

[alej.villa]

Bien vuelvo a explicar mi motivo principal de este mensaje para buscar una solución.

Tengo dos tablas la primera es:
Empleados Que tiene estos campos:

1. Cédula (Primary key)
2. Nombres
3. Apellidos
4. Sexo
5. Turno
6. Cargo
7. Fecha de ingreso
8. Patología

Y la segunda es:
Turno_Temporal que tiene estos campos:

1. Cédula
2. FechaIni
3. FechaFin
4. Estado
5. Turno_Temp
6. usuario
7. fecha
8. status

Ahora bien mi problemática consiste en que debo óbtener todas las cédulas de las dos tablas indicadas.

y como parámetros debo evalúar que en la tabla
Empleados el turno indicado sea igual al campo turno de la tabla así: (empleado.turno = Indicado por el usuario)

y en la tabla Turno_Temporal el turno indicado por el usuario sea igual al campo Turno_Temp y el campo estado sea igual a activo
(Turno_Temporal.turno_temp=Indicado por el usuario) and (Turno_Temporal.estado='activo')

Intente hacer esto pero no me funciona, es decir, no me arroja ningún resultado la consulta

Código Delphi [-]
begin   
dm.Query.Close;   
dm.Query.SQL.Clear;   
dm.Query.SQL.Add('Select a.cedula, b.cedula From Empleados a, Turno_Temporal b');   
dm.Query.SQL.Add('Where a.turno = :turno and ((b.turno_temp = :turno) and (b.estado =:estado))');   
dm.Query.SQL.Add('Group by a.cedula, b.cedula');   
DM.Query.Parameters.ParamByName('estado').DataType:=ftString;   
dm.Query.Parameters.ParamByName('estado').Value:='activo';   
DM.Query.Parameters.ParamByName('turno').DataType:=ftString;   
DM.Query.Parameters.ParamByName('turno').Value:=ComboBox1.Text;   
dm.Query.Open;     
while not dm.Query.Eof do       
Begin         
SetLength(Arreglo, n+1);         
Arreglo[n]:=dm.Query.fieldbyname('cedula').AsString;         
Inc(n);         
dm.Query.Next;       
end;   
end;