From 17e3f8415c93a86b0788a257de5108494c98cc09 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 14 Dec 2023 17:50:54 -0700
Subject: [PATCH] -- mejora en manejo de error

---
 Compras/PopUpVerFactura.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index 0f0b5de52..f79bdd995 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -4654,7 +4654,7 @@ Partial Class PopUpVerFactura
                 Dim DomicilioSucursal As String = ""
                 If Recibio = "" AndAlso Personal <> "" Then Recibio = Personal
 
-                If DtMovimientos(0)("CveVenta").ToString <> "" Then
+                If DtMovimientos(0)("CveVenta").ToString <> "" AndAlso DtMovimientos.Columns.Contains("Municipio") Then
                     CiudadSucursal = String.Format("{0}, {1}", DtMovimientos(0)("Municipio").ToString, DtMovimientos(0)("Estado").ToString)
                     DomicilioSucursal = String.Format("{0} #{1}, {2}, Col. {3}, CP:  {4}, {5}, {6}", DtMovimientos(0)("Calle").ToString, DtMovimientos(0)("NoExt").ToString, DtMovimientos(0)("NoInt").ToString, DtMovimientos(0)("Colonia"), DtMovimientos(0)("CP").ToString, CiudadSucursal, DtMovimientos(0)("Pais").ToString)
                 End If