From 8c05e2ba53869408f88d06f9ec59b08b4342ab97 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Fri, 30 Aug 2019 09:54:04 -0700
Subject: [PATCH] Verificar error al consultar en el kardex

---
 Inventarios/KardexAlmacenHorizontal.aspx.vb | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/Inventarios/KardexAlmacenHorizontal.aspx.vb b/Inventarios/KardexAlmacenHorizontal.aspx.vb
index 829a76939..289615efa 100644
--- a/Inventarios/KardexAlmacenHorizontal.aspx.vb
+++ b/Inventarios/KardexAlmacenHorizontal.aspx.vb
@@ -152,10 +152,14 @@ Partial Class Inventarios_KardexAlmacen
                 dt = Nothing
                 Return dt
                 Exit Function
-            End If
-        End If
-
-        ObjMovimientos.Dispose()
+            End If
+        Else
+            ObjMovimientos.Dispose()
+            Alert("Ocurrió un error al consultar el Kardex.", TipoMensaje.MsgError)
+            Exit Function
+        End If
+
+
         GvDatos.DataBind()
 
         For index = 3 To GvDatos.Rows(0).Cells.Count - 1