-____________________________________________Error
Archivo XML :cncA26.xml
Ruta :C:\sistemaCNC\Facturas\cncA26.xml
Estructura :
--> Declaración del namespace de la addenda incorrecto
CFD codificado en UTF-8
-___________________________________________ Mi XML
</Traslados>
</Impuestos>
- <Addenda>
<Otro CargoA="IJDPM" FolioRecepcion="322986119" ordenCompra="PX05572" tipoMoneda="MXN" />
</Addenda>
</Comprobante>
-_____________________________________________ El codigo
Código: Seleccionar todo
Private Sub MakeComplemento(ByVal Parent_node As IXMLDOMElement)
Dim Addenda_node As IXMLDOMElement
Dim Otro_node As IXMLDOMElement
'Crea el elemento COMPLEMENTO
Set Addenda_node = Parent_node.ownerDocument.createElement("Addenda")
Parent_node.appendChild Addenda_node
'Crea el elemento XXX
Dim dbs As Database
Dim rst1 As Object
Set dbs = OpenDatabase(Application.CurrentProject.FullName, False)
Set rst1 = dbs.OpenRecordset("cfdDetalle Facturas Temporal", dbOpenDynaset)
rst1.MoveLast
rst1.MoveFirst
Do While True
If rst1.EOF Then
Exit Sub
End If
Set Otro_node = Parent_node.ownerDocument.createElement("Otro")
''Set Otro_node = parent.ownerDocument.createElement("MiNodo") '''nuevo
-->
Addenda_node.appendChild Otro_node
'Ciclo
</Traslados>
</Impuestos>
- <Addenda>
<Otro:MiNodo CargoA="IJDPM" FolioRecepcion="322986119" ordenCompra="PX05572" tipoMoneda="MXN" />
</Addenda>
</Comprobante>