Ver Mensaje Individual
  #2 (permalink)  
Antiguo 07/05/2014, 20:08
wwwmaster
 
Fecha de Ingreso: noviembre-2002
Ubicación: DF
Mensajes: 1.056
Antigüedad: 21 años, 4 meses
Puntos: 37
Respuesta: Complemento Detallista En xml

Respecto de si afecta la cadena original, lo sabras abriendo el archivo "cadenaoriginal_3_2.xslt" del SAT, para ver si son datos que se tomen ya sea como requeridos u opcionales, si los nodos aparecen alli, es que si "juegan" para la cadena original.

Ejemplo de como agregar un nodo a un objeto xml:
NdEmisor = Doc.CreateNode(XmlNodeType.Element, "Emisor", Me.xmlns)
Dim atributoEMI1 As XmlAttribute = Doc.CreateAttribute("rfc") : atributoEMI1.Value = Emisor.rfc
Dim atributoEMI2 As XmlAttribute = Doc.CreateAttribute("nombre") : atributoEMI2.Value = Emisor.nombre

NdEmisor.Attributes.Append(atributoEMI1)
' FINALMENTE.... AGREGAMOS EL NODO EMISOR (ndCom es un objeto xml con el CFDI)
NdCom.AppendChild(NdEmisor) 'AGREGAR EL NODO EMISOR AL NODO COMPROBANTE



Un ejemplo de como remover un nodo de un XML (donde prefijo="cfdi:"):
Dim nodoAddenda As XmlNode = comprobante.Item(prefijo & "Addenda") '.ChildNodes(0)

If Not nodoAddenda Is Nothing Then
If nodoAddenda.Name = prefijo & "Addenda" Then
nodoAddenda.ParentNode.RemoveChild(nodoAddenda)
'empleados.RemoveChild(nodoOld);
' Sobreescribimos con su mismo nombre original.. solo sin la addenda ya.
If chkDebug.Checked Then Log(" [proceso] guardara XML ya sin nodo addenda en: destinationIntermedio_Full=" & destinationIntermedio_Full)
doc.Save(destinationIntermedio_Full)
' http : //oscarsotorrio.com/post/2009/10/30/Modificar-y-borrar-datos-XML.aspx
End If
End If