Toast mesaje segundos validacion SAT

2019-12-04 19:29:09 -07:00
parent 955d1ffbeb
commit b36286a972
1 changed files with 3 additions and 1 deletions
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -1662,9 +1662,11 @@ Partial Class Compras_Compras

                    SWatch.Stop()

+                    Dim SegundosRespuesta As Double = SWatch.ElapsedMilliseconds / 1000
+                    SegundosRespuesta = SegundosRespuesta.ToEntero

                    If SWatch.ElapsedMilliseconds >= 5000 Then
-                        Alert("Los servicios de validacion del SAT presentan lentitud en la respuesta.", TipoMensaje.MsgAdvertencia)
+                        Alert($"Los servicios de validacion del SAT presentan lentitud en la respuesta [{ SegundosRespuesta } s].", TipoMensaje.ToastError, "", 0)
                    End If

                    If UsuarioActual.CveEmpresa < 2 Then