Como actualizar registros!!!

[[oscarac]]

vamos... vamos...
tu puedes......
una pista debemos modificar la consulta inicial

[negrokau]

mmmmmm jajajajaja

[[oscarac]]

quitale el parametro de Codigo
has que la consulta solo jale la factura buscada con todos sus registros

[negrokau]

ya la cache, le deje que solo condicione COD_FACT, pero al actualizar ya no podra encontrar que actualizar si no ponemos CODIGO, ahora como lo hago?

[[oscarac]]

Empezado por negrokau

ya la cache, le deje que solo condicione COD_FACT, pero al actualizar ya no podra encontrar que actualizar si no ponemos CODIGO, ahora como lo hago?

claro que si lo hara....
porque cuando jalas los 4 registros de la factura... uno de los campos es el codigo... entonces tu segunda consulta no sufre cambio alguno y el parametro toma como valor el codigo de la primera consulta

[[oscarac]]

Código Delphi [-]
procedure TF_FACTURACION.GUARDARClick(Sender: TObject);
begin
  DM.Q_FACTURACION.Post;
  DM.Transaction.CommitRetaining;
  DM.CONSULTA.CLOSE;
  DM.CONSULTA.ParamByName('ParCOD_FACT').AsString := COD_FACT.Text;
  DM.CONSULTA.Open;
  while not(DM.CONSULTA.Eof)do
  begin
    DM.CONSULTA2.CLOSE; 
    DM.CONSULTA2.ParamByName('ParCODIGO').AsString := DM.CONSULTA.FieldByName('CODIGO').AsFloat;
    DM.CONSULTA2.ParamByName('ParCANTIDAD').AsFloat := DM.CONSULTA.FieldByName('CANTIDAD').AsFloat;
    DM.CONSULTA2.ExecSQL;
    DM.CONSULTA.Next;
  end;
end;

quedaria mas o menos asi

[[oscarac]]

y te funciono o no?
nos comentas

[negrokau]

[Error] FORM_REMISION.pas(213): Incompatible types: 'String' and 'Double'
Este error me tira al ejecutar y me marca en rojo este:

Código Delphi [-]
Q_GUARDAR_RESTO.ParamByName('ParCODIGO').AsString := Q_GUARDAR1.FieldByName('CODIGO').AsFloat;

despues si le cambio .AsFloat por AsString, ejecuta pero me salta este otro error:

Q_GUARDAR1:Field 'CODIGO' not found

[[oscarac]]

Empezado por negrokau

[Error] FORM_REMISION.pas(213): Incompatible types: 'String' and 'Double'
Este error me tira al ejecutar y me marca en rojo este:

Código Delphi [-]
Q_GUARDAR_RESTO.ParamByName('ParCODIGO').AsString := Q_GUARDAR1.FieldByName('CODIGO').AsFloat;





despues si le cambio .AsFloat por AsString, ejecuta pero me salta este otro error:

Q_GUARDAR1:Field 'CODIGO' not found

tu campo se llama codigo?

[negrokau]

se llama CODIGO en la tabla donde guardar los 4 registros a actualizar
pero dentro de Q_GUARDAR1 no esta el parametro de CODIGO

[[oscarac]]

Empezado por negrokau

se llama CODIGO en la tabla donde guardar los 4 registros a actualizar
pero dentro de Q_GUARDAR1 no esta el parametro de CODIGO

hagamos una pequeña recapitulacion de los hechos... por favor coloca
la estructura de tus tablas... el codigo contenido en los querys y el codigo fuente de tu actualizacion.. con tantos mensajes ya me perdi

[Casimiro Notevi]

Empezado por oscarac

hagamos una pequeña recapitulacion de los hechos... por favor coloca
la estructura de tus tablas... el codigo contenido en los querys y el codigo fuente de tu actualizacion.. con tantos mensajes ya me perdi

No me extraña que te pierdas, ya me voy a leer un rato y a dormir, a ver cómo va esto cuando me levante mañana
Suerte para todos, hará alta

[[Delphius]]

No es por ofender, pero se me hace que ni Mr. Magoo da tanto palos a lo ciego como negrokau

Va con humor ¿he?

Negrokau, ¿puedo darte un consejo? Respira profundo y exhala 30 veces.
Luego mira al costado, que no se vea parte alguna de la pantalla. Mira un punto ciego de allí... cierra los ojos. No pienses en ningún código, ni en el IDE... ¡no pienses en nada! Repite lo mismo para el otro costado girando lentamente y con los ojos cerrados.
Sube y baja la cabeza, muévelas en círculos... como si te estuvieras descontracturando.

Luego procede a apagar la PC. Ve a descansar, que tu cabeza se desbloquee. No pienses en el problema por un buen tiempo. Haz algo de ocio, que te divierta ¡pero no que tenga que ver con la PC!

Luego cuando te sientas más aliviado toma una bebida que te permita ir entrando en calor pero de forma suave. Sugiero un té, pero el café también puede resultar.
Busca PAPEL y LAPIZ y empieza a expresar tus ideas como van llegando. No interesa como te surjan... es borrador. Ahora vuélvelas a repasar y darles orden y forma.

¿Listo?
Ahora si piensa en las palabras adecuadas para expresar el problema y vuelve a prender la PC. Ya estarás listo para explicarte.

Saludos,

[[oscarac]]

si...
creo que yo también necesito descansar

ya nos estamos viendo manana

[negrokau]

Empezado por Delphius

No es por ofender, pero se me hace que ni Mr. Magoo da tanto palos a lo ciego como negrokau

Va con humor ¿he?

Negrokau, ¿puedo darte un consejo? Respira profundo y exhala 30 veces.
Luego mira al costado, que no se vea parte alguna de la pantalla. Mira un punto ciego de allí... cierra los ojos. No pienses en ningún código, ni en el IDE... ¡no pienses en nada! Repite lo mismo para el otro costado girando lentamente y con los ojos cerrados.
Sube y baja la cabeza, muévelas en círculos... como si te estuvieras descontracturando.

Luego procede a apagar la PC. Ve a descansar, que tu cabeza se desbloquee. No pienses en el problema por un buen tiempo. Haz algo de ocio, que te divierta ¡pero no que tenga que ver con la PC!

Luego cuando te sientas más aliviado toma una bebida que te permita ir entrando en calor pero de forma suave. Sugiero un té, pero el café también puede resultar.
Busca PAPEL y LAPIZ y empieza a expresar tus ideas como van llegando. No interesa como te surjan... es borrador. Ahora vuélvelas a repasar y darles orden y forma.

¿Listo?
Ahora si piensa en las palabras adecuadas para expresar el problema y vuelve a prender la PC. Ya estarás listo para explicarte.

Saludos,

Gracias por el consejo.... y les cuento que ya me salio, y funciona FUNCIONA, gracias por su tiempo a todos... nunca dejan de lado al que necesita, gracias por el aguante.....

[[oscarac]]

Listo !!!!!
un nuevo dia...
ALELUYA !!!!!!!!
Negrokau... consiguio hacerlo funcionar

[negrokau]

Empezado por oscarac

Listo !!!!!
un nuevo dia...
ALELUYA !!!!!!!!
Negrokau... consiguio hacerlo funcionar

buena esa!!!!!!! y voy a ver que les tengo preparado para hoy jajajaja
en serio gracias... casi me di por vencido, gracias a ustedes no fue asi...

[Casimiro Notevi]

Empezado por oscarac

Listo !!!!!
un nuevo dia...
ALELUYA !!!!!!!!
Negrokau... consiguio hacerlo funcionar

Si ponía empeño era seguro que lo conseguía

Lo mejor es hacer lo que ha comentado Delphius, apagar el ordenador y coger papel y lapiz, se ven las cosas más claras.

[ecfisa]

Empezado por negrokau

Gracias por el consejo.... y les cuento que ya me salio, y funciona FUNCIONA, gracias por su tiempo a todos... nunca dejan de lado al que necesita, gracias por el aguante.....

Me alegro mucho.

Costó, pero anduvo, eso es lo importante.

Un saludo.

[[Delphius]]

Ya lo dije yo hace unos años... el lápiz y el papel son las mejores herramientas (bueno, exceptuando el cerebro) con las que cuenta un desarrollador.

Lo que debe cultivar con los años es paciencia

Saludos,