https://foro.gambas-es.org/viewtopic.php?f=3&t=3471&p=19507#p19507
-----------------------------------
jj231089
Viernes, 15 Noviembre 2013, 21:19

Calcular El Estado Del Inventario
-----------------------------------
Hola mis estimados, de antemano les doy las gracias por tomarse la molestia de leer y contestar mi tema.

estoy haciendo una pequeña aplicación en gambas 3 y sqlite3,  para el control de un inventario,
el problema que tengo es que no e podido hacer que mi inventario se actualice según las entradas y salidas,
puedo hacer que se guarden todas las entradas y salidas desde unos Listbox.

El código es el siguiente:

 For i = 0 To Codigoproducto.List.Count - 1
 Codigoproducto.Index = i
 Libras.Index = i
hresul = conex.Exec("insert into DetalleResepcion (IdResepcion, IdProducto, TotalLibras) 
values(" & CInt(txtIdresepcion.Text) & "," & CInt(Codigoproducto.Current.Text) & "," & CFloat(Libras.current.text) & ")")
Next

y este es el código para actualizar las existencias 

hresul = conex.Exec("SELECT SUM(TotalLibras) AS Suma FROM DetalleResepcion where idproducto='" &  Codigoproducto.Current.Text & "'")
   ResultadoEntrada = hresul["Suma"]
   
   hresul = conex.Exec("select sum(cantidad) as libras from DetalleSalidaMatePrima where idproducto='" & Codigoproducto.Current.Text & "'")
   ResultadoSalida = hresul["libras"]
  
hresul = conex.Exec("UPDATE Existencias SET Existencias = " & Str$(ResultadoEntrada - ResultadoSalida) & " WHERE idProducto = '" & Codigoproducto.Current.Text & "'")

la pregunta es:
donde debo poner este código?


