Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 22-07-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
Este qry no me funciona, porque?

hola a todos,
Amigos: quiero modificar un campo de una tabla llamada Catalogo con el resultado de una variable en mi reporte y tengo lo siguiente:
en el on print de mi variable tengo esto.
Código PHP:
procedure TFrm_Sumar_Balance.ppVariable2Print(SenderTObject);
begin
qry_DetalleDetalleNumero_Transacion
.Value;
if (
qry_detalleOrigen.Value 'AC') or
   (
qry_detalleOrigen.Value 'GO'then begin
    ppVariable2
.Value := (ppVariable1.Value ppDBCalc2.Value) -  ppDBCalc3.Value;
end;
if (
qry_detalleOrigen.Value 'PA') or
   (
qry_detalleOrigen.Value 'PT') or
   (
qry_detalleOrigen.Value 'IN'then begin
    ppVariable2
.Value := (ppVariable1.Value ppDBCalc3.Value) - ppDBCalc2.Value;
end;

with Qry_Catalogo do
Begin
qry_catalogo
.close;
Qry_Catalogo.sql.Clear;
qry_catalogo.SQL.add('update Tbl_Catalogo');  
qry_catalogo.SQL.Add('set balance := ppVariable.Value');
qry_catalogo.SQL.add('Where Cuenta = Detalle.Cuenta');
qry_catalogo.ExecSQL;
end;
end
gracias mil, por la ayuda que me puedan brindar

Alcides
Rep.Dom.
Responder Con Cita
 



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 22:54:30.


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