mirror of
https://github.com/KeymonSoft/Kelloggs_v4.git
synced 2026-04-21 20:09:13 +00:00
- VERSION 4.07.24
- 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:
@@ -421,12 +421,14 @@ Sub B4XPage_Appear
|
||||
B_MAPA_RUTA.Visible = False
|
||||
NUEVO.Visible = False
|
||||
B_PROXIMA.Visible = False
|
||||
b_motivoNoVisita.Visible = False
|
||||
Else
|
||||
' PONER EN FALSE
|
||||
Btn_CheckList.Visible = False
|
||||
B_MAPA_RUTA.Visible = True
|
||||
NUEVO.Visible = True
|
||||
B_PROXIMA.Visible = True
|
||||
b_motivoNoVisita.Visible = True
|
||||
If usuario = "JOSELUIS" Then Btn_CheckList.Visible = True 'Mod por CHV - 211125
|
||||
End If
|
||||
contador_strem = 0
|
||||
@@ -3606,6 +3608,8 @@ Private Sub b_noVisita_Click
|
||||
b_motivoNoVisita.Background = cd1
|
||||
B_MAPA_RUTA.Enabled = False
|
||||
trabajar.Enabled = False
|
||||
NUEVO.Enabled = False
|
||||
B_PROXIMA.Enabled = False
|
||||
Else If result = DialogResponse.CANCEL Then
|
||||
ToastMessageShow("CANCELAR", False)
|
||||
End If
|
||||
@@ -3631,6 +3635,8 @@ Private Sub b_reactivaRuta_Click
|
||||
b_motivoNoVisita.Background = cd1
|
||||
B_MAPA_RUTA.Enabled = True
|
||||
trabajar.Enabled = True
|
||||
NUEVO.Enabled = True
|
||||
B_PROXIMA.Enabled = True
|
||||
p_transparente2.Visible = False
|
||||
ToastMessageShow("Ruta activa", False)
|
||||
Else
|
||||
|
||||
Reference in New Issue
Block a user