-acomodo

Compras/Compras.aspx.vb

@@ -10879,13 +10879,7 @@ Partial Class Compras_Compras
             End If
         End If
 
-
         Dim namespaces As New XmlNamespaceManager(XMLDoc.NameTable)
-
-
-
-
-
         Dim Prefijo As String = If(XMLDoc.DocumentElement.Prefix = "", "cfd", XMLDoc.DocumentElement.Prefix)
         Dim cfdVer As String = ""
 
@@ -10894,14 +10888,10 @@ Partial Class Compras_Compras
             cfdVer = "http://www.sat.gob.mx/cfd/2"
         ElseIf Version = "3.3" Then
             cfdVer = "http://www.sat.gob.mx/cfd/3"
-
         Else ' se considera que es la version 4.0
             cfdVer = "http://www.sat.gob.mx/cfd/4"
         End If
 
-
-
-        'If Prefijo.ToLower <> "cfdi" Then cfdVer = "http://www.sat.gob.mx/cfd/2"
         namespaces.AddNamespace(Prefijo, cfdVer)
         namespaces.AddNamespace("tfd", "http://www.sat.gob.mx/TimbreFiscalDigital")
         namespaces.AddNamespace("implocal", "http://www.sat.gob.mx/implocal")