Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 02-11-2022
novato_erick novato_erick is offline
Miembro
 
Registrado: ago 2010
Ubicación: Panamá
Posts: 396
Poder: 14
novato_erick Va por buen camino
DBXEXPRESS no actualiza en ciertas ocaciones campos

Hola chicos:

Es un gran placer saludarlos por este medio.

ultimamente me habian comunicado algunos usuarios que al realizar una actualización en un campo llamado cantidad en ocasiones no afecta dicho campo la actualización.

Código Delphi [-]
 trnActualizaStock := dmConecta.FBLINUXCONECTION.BeginTransaction;
    try
    cdsAgregaProductos.First;
    while not cdsAgregaProductos.Eof do
    begin
        cantdataset := cdsAgregaProductosCANTIDAD.AsFloat;
        // Consulta la cantidad de cada articulo para aumentarlo
        stockactual := cantidadDisponibleinv
          (cdsAgregaProductosID_PRODUCTO.AsInteger);
        // aumentar cantidad al stock
        nuevacantStock := AumentaCantArticulos(cantdataset, stockactual);
            with dmComprar.qAumentaStock do
            begin
              sql.Clear;
              sql.Text := 'UPDATE ARTICULOS SET CANTIDAD = :CANTIDAD, ' +
              'FECHA_INGRESOART= :FECHA_INGRESOART WHERE ID_ARTICULO = :ID_ARTICULO';
              ParamByName('FECHA_INGRESOART').AsDateTime :=
                dtpFechaIngresoCompra.DateTime;
              ParamByName('CANTIDAD').AsFloat := nuevacantStock;
              ParamByName('ID_ARTICULO').AsInteger :=
                cdsAgregaProductosID_PRODUCTO.AsInteger;
              Execsql;
            end;
        cdsAgregaProductos.Next;
    end;
    dmConecta.FBLINUXCONECTION.CommitFreeAndNil(trnActualizaStock);
    Except
    On e: exception do
    begin
      dmconecta.FBLINUXCONECTION.RollbackFreeAndNil(trnActualizaStock);
      ShowMessage('Error Encontrado' + e.Message);
      dmConecta.RegistraLog(Variables.Usuario + ' CON ERROR AL ACTUALIZAR CANTIDADES: ' +
      e.Message);
      Exito := False;
      Raise;
    end;

cabe aclarar que esto normalmente no sucede a diario es algo que puede ser 1 de 1000 transacciones por decir algo.

pero aún así sucede. alguien sabe el porqué puede pasar o cómo evitar orque el sistema no manda ningún error en transacción.

Saludos;

novato_erick
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
ADOQuerys con campos "If(..." no se actualiza en un DbGrid Walterio SQL 5 14-04-2012 23:18:11
Deshabilitar ciertas filas TDBGrid natalinuyo OOP 8 04-06-2010 16:06:38
Cargar ciertas paginas en quickreport rufo Impresión 6 17-02-2010 22:54:32
DBXExpress y mysql linux remota madera Conexión con bases de datos 6 03-04-2008 20:10:26
No depurar ciertas units marto Varios 3 22-06-2004 18:09:38


La franja horaria es GMT +2. Ahora son las 14:45:18.


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