In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

FastEdit() y FastUpdate()

Foro de Xailer profesional en español
Daniel Pechir
Posts: 116
Joined: Fri Mar 15, 2013 12:32 am

FastEdit() y FastUpdate()

Postby Daniel Pechir » Thu Jan 31, 2019 5:43 pm

HOLA A TODOS

HACIA BUEN TIEMPO SIN UN ATORON.
MySQL.jpg
MySQL.jpg (60.07 KiB) Viewed 675 times

EL SIGUIENTE CODIGO NO PERMITE EL REALIZAR EL UPDATE:

WITH OBJECT ::oCostosl
:GoTop(
IF :Locate("Clave = '"+Vloca+"'")
DO WHILE :Clave == Vloca
Vloca2 := :Claveco
WITH OBJECT ::oPase2x
:GoTop()
IF :Locate("Nucuenta = '"+Vloca2+"'")
Vcuni2 := :Costoant
ELSE
Vcuni2 := 0
ENDIF
END
vCanti := :Cantidad
vPieza := :Piezas
DO CASE
CASE vPieza = 0
:FastEdit()
:Costo := Vcuni2
:Importe := ROUND(vCanti*Vcuni2,5)
:FastUpdate()
CASE vPieza <> 0
:FastEdit()
:Costo := Vcuni2
:Importe := ROUND((vCanti*vCuni2)/vPieza,5)
:FastUpdate()
ENDCASE
VCALMER += :Importe
VCOST += :Importe
:Skip()
ENDDO
END
User avatar
ignacio
Site Admin
Posts: 8556
Joined: Mon Apr 06, 2015 8:00 pm
Location: Madrid, Spain
Contact:

Re: FastEdit() y FastUpdate()

Postby ignacio » Fri Feb 01, 2019 12:08 pm

Buenos días,

Corrija la sentencia SQL que está provocando el error.

Saludos
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Daniel Pechir
Posts: 116
Joined: Fri Mar 15, 2013 12:32 am

Re: FastEdit() y FastUpdate()

Postby Daniel Pechir » Fri Feb 01, 2019 7:10 pm

Gracias Ignacio

Saludos

Return to “Spanish”