cheveguerra/Kelloggs_v4
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_v4.git synced 2026-04-20 11:39:13 +00:00
Code Issues Packages Projects Releases Wiki Activity

- VERSION 4.07.24

Browse Source 
- Se escondió el boton de Whatsapp.
- Se escondió el boton de "Motivo de no venta" si todavia no se hace el "Checklist"
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-07-27 22:36:45 -06:00
parent 19a6aa3bce
commit 21c59f2262
8 changed files with 59 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
B4A/C_Cliente.bas
View File

@@ -852,7 +852,7 @@ Sub GPS_LocationChanged (Location1 As Location)
' Log($"${gps_boton_doe}|${clienteConPromo}"$)
If gps_boton_doe = "1" And clienteConPromo = "0" And revisaExistenciasDOE Then b_whats.Visible = True
' If gps_boton_doe = "1" And clienteConPromo = "0" And revisaExistenciasDOE Then b_whats.Visible = True
If Not(clienteDeudor) Then B_VENTA.Visible = True 'Si el cliente no tiene adeudo, habilitamos el boton de venta
If Not(clienteId.StartsWith("N")) And la_cuenta.Text <> "0" Then b_noVenta.Visible = True 'Ni cliente nuevo, ni abordo.
If Not(p_rechazoDOE.Visible) Then pedido_doe_muestra
@@ -4061,6 +4061,7 @@ Private Sub l_ubicacion2_LongClick
If laDist > 49 Then
p_pideGeoPass.BringToFront
p_pideGeoPass.Visible = True
et_geopass.RequestFocus
End If
End Sub