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")