Se quitaron toast de error

This commit is contained in:
2024-01-10 19:05:30 -06:00
parent 06921672d2
commit 1cb12be8e7
2 changed files with 12 additions and 11 deletions

View File

@@ -61,7 +61,7 @@ ModuleClosedNodes17=
ModuleClosedNodes18=6
ModuleClosedNodes19=4,5,6,7,8,9,10
ModuleClosedNodes2=2,6,7
ModuleClosedNodes20=3,5,6,7,8,9,10
ModuleClosedNodes20=3,4,5,6,7,8,9,10
ModuleClosedNodes21=
ModuleClosedNodes22=
ModuleClosedNodes23=
@@ -73,6 +73,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=
ModuleClosedNodes9=2,5,6,8,10,11,12,13,24,36,37
NavigationStack=DBRequestManager,HandleJob,197,0,DBRequestManager,WriteObject,119,0,DBRequestManager,requestTimes,294,0,seleccion,Globals,164,0,colonia2,Activity_Create,94,0,colonia2,Globals,78,0,Main,Activity_Create,88,0,Main,Activity_Pause,282,0,seleccion,JobDone,1975,0,seleccion,cargar_Click,924,0
NavigationStack=DBRequestManager,HandleJob,197,0,DBRequestManager,WriteObject,119,0,DBRequestManager,requestTimes,294,0,colonia2,Activity_Create,94,0,colonia2,Globals,78,0,Main,Activity_Create,88,0,Main,Activity_Pause,282,0,seleccion,Globals,25,0,seleccion,cargar_Click,1055,5,seleccion,JobDone,1204,0
SelectedBuild=0
VisibleModules=21,20,24,14,5,6

View File

@@ -953,7 +953,7 @@ Sub cargar_Click
cmd.Initialize
cmd.Name = "select_codigo_exhibidor"
'cmd.Parameters = Array As Object(ALMACEN)
'' 'cmd.Parameters = Array As Object(ALMACEN)
reqManager.ExecuteQuery(cmd , 0, "catalogo_exhibidor")
cmd.Initialize
@@ -968,9 +968,10 @@ Sub cargar_Click
cmd.Initialize
cmd.Name = "select_cat_paquetes_abordo_DUR"
Log(">>>> ALMACEN: " & ALMACEN)
cmd.Parameters = Array As Object(ALMACEN)
reqManager.ExecuteQuery(cmd , 0, "gunaprodpa")
cmd.Initialize
cmd.Name = "select_cat_paquetes_DUR"
cmd.Parameters = Array As Object(ALMACEN)
@@ -1125,10 +1126,10 @@ Sub JobDone(Job As HttpJob)
If Job.ErrorMessage.Contains("resolve") And Job.ErrorMessage.Contains("keymon.lat") Then
ToastMessageShow("Por favor revisa tu conexión a internet, hay problemas de comunicación.", True)
End If
' LogColor("Error: " & Job.tag & " : " & Job.ErrorMessage, Colors.red)
'If Job.ErrorMessage <> "STREAM" Then
' ToastMessageShow("Error: " & Job.ErrorMessage, True)
'End If
LogColor("Error: " & Job.tag & " : " & Job.ErrorMessage, Colors.red)
' If Job.ErrorMessage <> "STREAM" Then
' ToastMessageShow("Error: " & Job.ErrorMessage, True)
' End If
If Job.ErrorMessage = "STREAM" Then
If CARGA = "SUBIR" Then
PB2.Progress = PB2.Progress + PORCENTAJE
@@ -1182,7 +1183,7 @@ Sub JobDone(Job As HttpJob)
skmt.TransactionSuccessful
Catch
Log(LastException)
ToastMessageShow(LastException, True)
' ToastMessageShow(LastException, True)
End Try
skmt.EndTransaction
skmt.ExecNonQuery2("INSERT INTO kmt_info(CAT_CL_CODIGO,CAT_CL_RUTA,CAT_CL_NOMBRE,CAT_CL_ATIENDE1,CAT_CL_ATIENTE2,CAT_CL_TELEFONO,CAT_CL_EMAIL,CAT_CL_CALLE,CAT_CL_NOEXT,CAT_CL_NOINT,CAT_CL_CALLE1,CAT_CL_CALLE2,CAT_CL_COLONIA,CAT_CL_MUNI,CAT_CL_EDO,CAT_CL_CP,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_BFACTURA,CAT_CL_BCREDITO,CAT_CL_MTOCOMPRA,CAT_CL_NUM_SERIEFISICO, gestion) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,0,0,0) ",Array As Object ("0",e_ruta.TEXT, "VENTA ABORDO","null","null","null","null","null","null","null","null","null","null","null","null","null","null","null","NULL","NULL"))
@@ -1222,7 +1223,7 @@ Sub JobDone(Job As HttpJob)
End If
Catch
Log(LastException)
ToastMessageShow(LastException, True)
' ToastMessageShow(LastException, True)
End Try
skmt.EndTransaction
End If
@@ -1242,7 +1243,7 @@ Sub JobDone(Job As HttpJob)
' ToastMessageShow(" Historico Clientes Promociones Actualizado." , True)
Catch
Log(LastException)
ToastMessageShow(LastException, True)
' ToastMessageShow(LastException, True)
End Try
skmt.EndTransaction
End If