Version: 5.06.01

Se le agrego el boton de cobranza, la cual verifica del CAT_GUNAPROD2 si hay cuentas por cobrar, si encuentra, las muestra y si ya tienen abonos los indica y los suma.
This commit is contained in:
IsR0d
2025-06-03 14:25:31 -06:00
parent ef88430088
commit a77706a0ae
9 changed files with 229 additions and 69 deletions

View File

@@ -344,7 +344,7 @@ Sub ListView1_ItemLongClick (Position As Int, Value As Object)
Starter.tabla = "CAT_GUNAPROD"
End If
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ", Array As Object (Subs.traeAlmacen,y.GetString("PE_PROID"),y.GetString("PE_CANT")* -1))
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ", Array As Object (Subs.traeAlmacen,y.GetString("PE_PROID"),y.GetString("PE_CANT")* -1))
Log(cedis)
Log(Subs.traeAlmacen)
If cedis <> Subs.traeAlmacen Then