-- mejora en manejo de error

This commit is contained in:
2023-12-14 17:50:54 -07:00
parent 4006b2381d
commit 17e3f8415c

View File

@@ -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