Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 10-10-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Firebird / IBDataSet: no modifica

Hola.

Después de haber agotado todas las pruebas y buscado sin encontrar respuesta, los vengo a molestar...
Me sucede algo extraño al querer modificar una columna con TIBDataSet,tanto con Firebird 2.1 como con 2.5.
Instalé este último por haber leído que solucionaba algunos problemas que el anterior tenía con IBX.

La declaración SQL es:
Código SQL [-]
  ANULADO SMALLINT DEFAULT 0 NOT NULL
El nombre del IBDataSet es tbRef y el campo almacena el valor cero o uno, cuando es igual a uno, el registro
se considera anulado.

El problema es que estando ya asignado el valor uno en el campo, no aplica la modificación.

Ya verifiqué que tbMaster, tbDetalle y tbRef entran al código que adjunto con State = dsEdit,
y tbRefANULADO.Value = 1.

La transacción:
Cita:
readcommitted
rec_version
nowait

Pongo el código donde debería efectuarse la modificación:
Código Delphi [-]
procedure TfrMasterMod.btAceptaClick(Sender: TObject);
begin
  if MessageBox(Handle,'¿Desea aplicar los cambios?','CONSULTA', MB_YESNO +
     MB_ICONQUESTION + MB_DEFBUTTON1 + MB_APPLMODAL) = mrYes then
  begin
    ShowMessage(tbRefANULADO.AsString); (* valor mostrado: 1 *)
    if tbRef.State = dsEdit then
      tbRef.Post;
    tbDetalle.DataSource:= nil;   
    IBDatabase.ApplyUpdates([tbMaster, tbDetalle]);
    tbDetalle.DataSource:= dsMaster;
    IBTransaction.CommitRetaining;
    ShowMessage(tbRefANULADO.AsString); (* valor mostrado: 1 *)
    Close; 
  end;
end;

Cuando salgo de la aplicación y compruebo el valor de tbRefANUALDO, es igual a 0, es decir que no modificó el valor,
lo cuál es extraño por que muestra el valor 1 antes y después del CommitRetaining...
Sin embargo las modificaciones echas en tbMaestro o tbDetalle se efectúan sin problema.

No sé si atribuirlo a que tbMaestro/tbDetalle usan CachedUpdates (aunque no veo por que daría problemas),
o que haya algún problema con Firebird y los componentes IBX...

Si hay alguién a quién le haya sucedido lo mismo o pueda sugerirme algo, lo agradecería mucho.

Desde ya gracias por tomarse el tiempo de leer estas líneas.

Saludos.

Última edición por ecfisa fecha: 10-10-2010 a las 11:05:35.
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
Ejecucion:No modifica los campos de un Query (Delphi) sizne OOP 7 13-03-2010 17:24:31
Firebird: IBDataSet ó IBTable MichelH Firebird e Interbase 9 10-03-2009 04:53:56
Post, Crea o modifica? krilea Conexión con bases de datos 20 02-08-2006 17:55:53
IBDataset no modifica istradlin Conexión con bases de datos 2 19-04-2005 23:44:22
No me inserta un registro nuevo, me modifica el anterior vhirginia Conexión con bases de datos 10 11-05-2004 13:04:38


La franja horaria es GMT +2. Ahora son las 07:43:40.


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