13/01/24 - Correcciones en editText de promos y mostrar inv de abordo en productos.

- Se corrigio un error que se daba cuando se editaba la cantidad de prductos varaiables en promociones y quedaba en blanco.
- Se agegó el inventario de abordo a la descripcion del producto cuando se estan seleciconando productos para el Abordo.
This commit is contained in:
2024-01-13 23:07:39 -06:00
parent fb268b062c
commit 1451af86ec
9 changed files with 98 additions and 61 deletions

View File

@@ -413,7 +413,7 @@ Sub B4XPage_Appear
usarGeocerca = kh.traeUsarGeocerca
'Para el almacen 12 (GDL) no se usa la geocerca
If kh.traeAlmacen(Starter.skmt) = 12 Then usarGeocerca = False
If kh.traeAlmacen = 12 Then usarGeocerca = False
' Log(Subs.traeUltimaActividadBD)
c = Starter.skmt.ExecQuery2("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?", Array As String ("MACIMP"))
@@ -1065,7 +1065,7 @@ Sub B_IMP_Click
End Sub
Sub B_IMP2_Click
Log("inicia B_IMP2_Click")
' Log("inicia B_IMP2_Click")
B_IMP2.Enabled = False
If l_total.Text <> Null And l_total.Text <> "null" Then Subs.ponImpreso(la_cuenta.Text) 'Solo lo marcamos como impreso si tiene venta (total > 0).
ProgressDialogShow("Imprimiendo, un momento ...")