mirror of
https://github.com/KeymonSoft/Intmex_Multiventa.git
synced 2026-04-17 21:06:08 +00:00
- VERSION 5.03.02
- Se agregó la clase "C_Validador", que valida que el pedido se envie correctamente y actualiza la columna PE_VALIDADO en Web/Pedido. - Se corrigio la funcion "Subs/TraeRuta" para que busque la ruta en kmt_info y kmt_info2.
This commit is contained in:
@@ -213,6 +213,7 @@ Sub Class_Globals
|
||||
Private L_ABORDO As Label
|
||||
Private L_VENTA As Label
|
||||
Private L_PREVENTA As Label
|
||||
Dim validador As C_Validador
|
||||
End Sub
|
||||
|
||||
'You can add more parameters here.
|
||||
@@ -227,6 +228,7 @@ Private Sub B4XPage_Created (Root1 As B4XView)
|
||||
Root.LoadLayout("principal")
|
||||
rd.Initialize
|
||||
rd.vacuum
|
||||
validador.Initialize
|
||||
EJECUTANDO=1
|
||||
Dim ruta As String
|
||||
img2.Visible =False
|
||||
@@ -533,7 +535,7 @@ Sub B4XPage_Appear
|
||||
' Else
|
||||
' b_abordo.Visible = True
|
||||
' End If
|
||||
|
||||
validador.iniciaValidacion
|
||||
End Sub
|
||||
|
||||
Sub Subir_Click
|
||||
@@ -1957,6 +1959,10 @@ Private Sub B4XPage_CloseRequest As ResumableSub
|
||||
Return False
|
||||
End Sub
|
||||
|
||||
Sub connecta_LongClick
|
||||
validador.iniciaValidacion
|
||||
End Sub
|
||||
|
||||
Sub connecta_Click
|
||||
Log( Starter.DBReqServer)
|
||||
reqManager.Initialize(Me, Starter.DBReqServer)
|
||||
|
||||
Reference in New Issue
Block a user