Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Tablas planas (https://www.clubdelphi.com/foros/forumdisplay.php?f=20)
-   -   ayuda con where anidado? (https://www.clubdelphi.com/foros/showthread.php?t=86204)

maxi915 30-06-2014 19:35:39

ayuda con where anidado?
 
hola gente una vez mas problemitas de sintaxis. Aunque esta vez no se si es posible realizar esto.

necesito obtener un campo, cuando 2 variablas sean iguales a esos 2 campos, esto es lo que intente hacer, creo que se entiende mas la idea leyendo el codigo, gracias!!

Código Delphi [-]
Procedure capturar_Turno (Queryturno:TADOQuery; horario:string; dia:string; var id_turno:Integer; var disponibilidad:Integer);

begin
  with Queryturno do
   begin
     SQL.Clear;
     SQL.Add('Select * From turnos Where horario='+QuotedStr(horario)+',dia=' +QuotedStr(dia));
     Open;
     id_turno:=FieldByName('Id_turno').AsInteger;
     disponibilidad:=FieldByName('disponibilidad').AsInteger;
   end;
end;

maxi915 30-06-2014 19:41:19

Solucionado!

Código Delphi [-]
Procedure capturar_Turno (Queryturno:TADOQuery; horario:string; dia:string; var id_turno:Integer; var disponibilidad:Integer);

begin
  with Queryturno do
   begin
     SQL.Clear;
     SQL.Add('Select * From turnos Where horario='+QuotedStr(horario)+'and '+'dia=' +QuotedStr(dia));
     Open;
     id_turno:=FieldByName('Id_turno').AsInteger;
     disponibilidad:=FieldByName('disponibilidad').AsInteger;
   end;
end;


La franja horaria es GMT +2. Ahora son las 06:46:36.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi