From 5893af4c1ecab3a2e2a7ff8fcd38979aed4bf06d Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Mon, 6 Jun 2022 18:11:28 -0700 Subject: [PATCH] Leer xml version 4.0 para impresion de pdf de carta porte --- Compras/PopUpVerFactura.aspx.vb | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index 2c3283f4a..d14628e7b 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -1715,6 +1715,16 @@ Partial Class PopUpVerFactura Dim namespaces As New XmlNamespaceManager(XMLDoc.NameTable) If Prefijo.ToLower <> "cfdi" Then cfdVer = "http://www.sat.gob.mx/cfd/2" + + Dim schemaLocationAttribute = XMLDoc.SelectSingleNode("//@*[local-name()='schemaLocation']") + If schemaLocationAttribute IsNot Nothing Then + If Not String.IsNullOrEmpty(schemaLocationAttribute.Value) Then + If schemaLocationAttribute.Value.Contains("http://www.sat.gob.mx/cfd/4") Then + cfdVer = "http://www.sat.gob.mx/cfd/4" + End If + End If + End If + namespaces.AddNamespace(Prefijo, cfdVer) namespaces.AddNamespace("tfd", "http://www.sat.gob.mx/TimbreFiscalDigital") namespaces.AddNamespace("implocal", "http://www.sat.gob.mx/implocal")