El siguiente código me genera la cadena original de un archivo .xml sin ningún problema.
Code: Select all
* Crea la Cadena Original
ObjXSLT := CreateObject("Msxml2.DOMDocument.6.0")
ObjXSLT:async:=.F.
ObjXSLT:resolveExternals = .T.
* lResult := ObjXSLT:Load("m:\www.sat.gob.mx\sitio_internet\cfd\3\cadenaoriginal_3_2\cadenaoriginal_3_2.xslt")
lResult := ObjXSLT:Load("http://www.sat.gob.mx/sitio_internet/cfd/3/cadenaoriginal_3_2/cadenaoriginal_3_2.xslt")
IF !lResult
RETURN lOk
ENDIF
strCadena := oXmlDoc:transformNode(ObjXSLT)
lOk := .t.
endif
Apliqué _ al .xslt de la siguiente forma
Code: Select all
En esta sección se define la inclusión de las demás plantillas de transformación para
la generación de las cadenas originales de los complementos fiscales
-->
<xsl:include href="file:///m:/www.sat.gob.mx/sitio_internet/cfd/ecc/ecc.xslt"/>
<xsl:include href="file:///m:/www.sat.gob.mx/sitio_internet/cfd/psgecfd/psgecfd.xslt"/>
<xsl:include href="file:///m:/www.sat.gob.mx/sitio_internet/cfd/donat/donat11.xslt"/>
<xsl:include href="file:///m:/www.sat.gob.mx/sitio_internet/cfd/divisas/divisas.xslt"/>
Saludos