Código xmlcursor

Hola encontré este código, pero al que re probarlo, me marca Nesting error, me podría explicar algo de XMLTOCURSOR, ya que el código lo usa es elo dejo para que lo cheque,
LOCAL olNodes As IXMLDOMNodeList
xdoc=CREATEOBJECT('MSXML2.DOMdocument')
IF NOT xdoc.LOAD('h:\sie-shoes\facturas\2010\noviembre\f00001.xml')
Return
ENDIF
Set Console Off
Set print to c:\tmp\titulo.txt Additive
set print on
? "Atributos del COMPROBANTE "
olNodes = xdoc.selectNodes("//Comprobante")
For i = 0 To olNodes.length - 1
For j = 0 To olNodes.Item(i).Attributes.length - 1
sAtributeName = olNodes.Item(i).Attributes.Item(j).nodeName
sAtributeValues = olNodes.Item(i).Attributes.Item(j).text
? I,j,sAtributeName + "=" + sAtributeValues
Next j
Next i
?
?
? "Atributos del Emisor "
olNodes = xdoc.selectNodes("//Comprobante/Emisor/")
For i = 0 To olNodes.length - 1