topic-40927

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

no me estaria saliendo este UPDATE
Posted: Thu Oct 14, 2021 03:20 PM

Hola.
necesito restarle 10 al valor actual de la tabla y a la vez actualizarla.

:udpate( "tbstockres", ;
"stockcongelado", ;
{ stockcongelado - 10 } , ;
{ { "id", 1 } } )

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: no me estaria saliendo este UPDATE
Posted: Thu Oct 14, 2021 03:20 PM

goosfancito wrote:Hola.
necesito restarle 10 al valor actual de la tabla y a la vez actualizarla.

:udpate( "tbstockres", ;
"stockcongelado", ;
{ stockcongelado - 10 } , ;
{ { "id", 1 } } )

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

carlos vargas

Posts: 1789

Joined: Tue Oct 11, 2005 05:01 PM

Re: no me estaria saliendo este UPDATE
Posted: Thu Oct 14, 2021 04:11 PM

prueba asi:

Code (fw): Select all Collapse

:udpate( "tbstockres", ;
"stockcongelado-?", ;
{ 10 } , ;
{ { "id", 1 } } )

o si no...

Code (fw): Select all Collapse

:Execute( "update tbstockres set stockcongelado=stockcongelado-?",{ 10 }, "id=1" )

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: no me estaria saliendo este UPDATE
Posted: Thu Oct 14, 2021 10:58 PM

no me estaria andando.

Code (fw): Select all Collapse

  ::oCnx:Execute( "update tbstockres set stockcongelado=stockcongelado-?", ;
                      { 3 }, ;
                      "idproducto=?", { 3 } )

si hago eso, me actualiza todos los registros, pasa por alto la clausula WHERE eso es un ejemplo, porque en realidad es esto:

Code (fw): Select all Collapse

  ::oCnx:Execute( "update tbstockres set stockcongelado=stockcongelado-?", ;
                      { ::aProductos[ nItem, 4 ] }, ;
                      "idproducto=?", { ::aProductos[ nItem, 6 ] } )

El log me dice esto:

14/10/2021 19:52:15: FWMARIACONNECTION:EXECUTE_SQL( 6754 ) cSql = "update tbstockres set stockcongelado=stockcongelado-3" ::nError = 0 ::cError = "" ::cSqlInfo = "LÃneas correspondientes: 3 Cambiadas: 3 Avisos: 0" nSecs =

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: no me estaria saliendo este UPDATE (SOLVED)
Posted: Thu Oct 14, 2021 11:04 PM

Code (fw): Select all Collapse

   ::oCnx:Execute( "update tbstockres set stockcongelado=stockcongelado-? WHERE idproducto=?", ;
                      { ::aProductos[ nItem, 4] , ::aProductos[ nItem, 6 ] } )

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

FiveTech Support Forums

Continue the discussion