Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-01-2005
Avatar de alcides
alcides alcides is offline
Miembro
 
Registrado: dic 2003
Ubicación: Republica Dominicana
Posts: 204
Poder: 21
alcides Va por buen camino
Validar dos campos

Hola a todos,
estoy utilizando delphi 7 y mis tablas estan en access
el campo fecha esta definido como texto y el campo codigo_establecimiento
definido tambien de texto, y trato de realizar la siguiente consulta:

procedure TFrm_Mov_Huespedes.Tbl_Mov_HuespedesFecha_HuespedesChange(
Sender: TField);
var
ls_Fecha : string;
ls_Codigo : string;
begin
ls_Fecha := Tbl_Mov_Huespedes.FieldbyName('fecha_huespedes').AsString;
ls_Codigo := Tbl_Mov_Huespedes.FieldbyName 'codigo_establecimiento').AsString;
Qry_Busca_Fecha.Close;
with qry_Busca_Fecha do begin
with sql do begin
clear;
add ('select * from Mov_Huespedes');
add ('where fecha_huespedes = ');
add (''''+ls_Fecha+'''');
add ('where codigo_establecimiento =');
add (''''+ls_Codigo+'''');
open;
if not(Dts_Mov_Huespedes.State in [dsinsert]) then Exit;
if recordcount <> 0 then
begin
ShowMessage('Esta Fecha en Movimiento Huespedes, esta asignada !!!!!!');
Abort;
end;
end;
end;
end;


nota: compila bien, pero cuando lo corro y va a ejecutar el qry dice
- error en qry -
si por favor me pueden echar una mano

alcides
Rep.Dom.
Responder Con Cita
  #2  
Antiguo 28-01-2005
[basti] basti is offline
Miembro Premium
 
Registrado: ago 2004
Posts: 388
Poder: 20
basti Va por buen camino
Hola

El problema es que usas dos where en la misma consulta, supongo que lo que quieres hacer es lo siguiente:
Código Delphi [-]
 add ('select * from Mov_Huespedes');
 add ('where fecha_huespedes = ');
 add (''''+ls_Fecha+'''');
 add ('and codigo_establecimiento ='); // sustituye el where por and
 add (''''+ls_Codigo+'''');

un saludo
Responder Con Cita
  #3  
Antiguo 28-01-2005
Avatar de alcides
alcides alcides is offline
Miembro
 
Registrado: dic 2003
Ubicación: Republica Dominicana
Posts: 204
Poder: 21
alcides Va por buen camino
Gracias basti

funciono perfectamente


Alcides
Rep.Dom.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 20:27:55.


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
Copyright 1996-2007 Club Delphi