Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-09-2011
negrokau negrokau is offline
Miembro
NULL
 
Registrado: abr 2011
Posts: 210
Poder: 16
negrokau Va por buen camino
Talking

yo de vuelta, me anduvo una vez pero ahora me salta este error:
CANNOT PERFORM THIS OPERATION ON A CLOSED DATASET
ya le di muchas vueltas y no encuentro el problema
Responder Con Cita
  #2  
Antiguo 07-09-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.015
Poder: 22
oscarac Va por buen camino
eso pasa cuando la base de datos o la tabla esta cerrada
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
  #3  
Antiguo 07-09-2011
negrokau negrokau is offline
Miembro
NULL
 
Registrado: abr 2011
Posts: 210
Poder: 16
negrokau Va por buen camino
Talking

aca mi salta el error
Imágenes Adjuntas
Tipo de Archivo: jpg error.jpg (28,2 KB, 12 visitas)
Responder Con Cita
  #4  
Antiguo 08-09-2011
negrokau negrokau is offline
Miembro
NULL
 
Registrado: abr 2011
Posts: 210
Poder: 16
negrokau Va por buen camino
Talking

que puedo hacer? cuando llega a:
Código Delphi [-]
procedure TF_REMISION.GUARDARClick(Sender: TObject);
begin
DM.Q_REMISION.Post;
DM.Transaction.CommitRetaining;
////////////////////////////////////////
//////actualiza cantidad////////////////
Q_GUARDAR1.CLOSE;
Q_GUARDAR1.ParamByName('ParCOD_REMI').AsString:=COD_REMI.Text;
Q_GUARDAR1.ParamByName('ParCODIGO').AsString:=DM.Q_DET_REMISION.FieldValues['CODIGO'];
Q_GUARDAR1.Open;
while not(Q_GUARDAR1.Eof)do
begin
Q_GUARDAR_RESTO.CLOSE;
Q_GUARDAR_RESTO.ParamByName('ParCODIGO').AsString:=DM.Q_DET_REMISION.FieldValues['CODIGO'];
Q_GUARDAR_RESTO.ParamByName('ParCANTIDAD').AsFloat:=Q_GUARDAR1.FieldValues['CANTIDAD'];
Q_GUARDAR_RESTO.ExecSQL;
Q_GUARDAR_RESTO.Next;
end;
me salta el mensaje
Q_GUARDAR_RESTO:CANNOT PERFORM THIS OPERATION ON A CLOSED DATASET
alguna sugerencia?
Responder Con Cita
  #5  
Antiguo 08-09-2011
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.670
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
Post

Es por lo que te ha dicho oscarac, está cerrado, así que tendrás que abrirlo.
Código Delphi [-]
procedure TF_REMISION.GUARDARClick(Sender: TObject); begin
  DM.Q_REMISION.Open;
  ...
  etc...
Responder Con Cita
  #6  
Antiguo 08-09-2011
negrokau negrokau is offline
Miembro
NULL
 
Registrado: abr 2011
Posts: 210
Poder: 16
negrokau Va por buen camino
Talking

lo probe, como me sugeriste, pero lo mismo pasa, inclusive hice asi:
Código Delphi [-]
while not(Q_GUARDAR1.Eof)do
begin
Q_GUARDAR_RESTO.CLOSE;
Q_GUARDAR_RESTO.ParamByName('ParCODIGO').AsString:=DM.Q_DET_REMISION.FieldValues['CODIGO'];
Q_GUARDAR_RESTO.ParamByName('ParCANTIDAD').AsFloat:=Q_GUARDAR1.FieldValues['CANTIDAD'];
Q_GUARDAR_RESTO.ExecSQL;
Q_GUARDAR_RESTO.Next;
Q_GUARDAR_RESTO.open;
end;
lo marque con F5 paraver paso a paso el proceso y ahi ya no para mas
Responder Con Cita
  #7  
Antiguo 08-09-2011
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.670
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
Tendría que ver todo el código para visualizar como lo haces, pero por lo poco que veo, el problema estará en otro lado.
¿Cuando llega a ese procedure está abierto el query?, pon un punto de ruptura y lo compruebas.
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
actualizar registros stand Conexión con bases de datos 2 29-07-2010 10:10:24
actualizar registros pabloloustau Conexión con bases de datos 3 19-06-2010 20:40:39
actualizar 100 registros al tiempo Camilo Varios 2 22-06-2007 19:08:29
Actualizar Registros drkvergil Firebird e Interbase 3 12-09-2006 18:33:54
Como actualizar toda una tabla con bastantes registros? IcebergDelphi Firebird e Interbase 4 16-12-2003 14:08:00


La franja horaria es GMT +2. Ahora son las 07:28:30.


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