Hi,
Your origin code replace loNode variable.
loNode2 = loNode.selectSingleNode("ProductCode")
? loNode2.text
messagebox(loNode2.text)
replace ref WITH loNode2.text
loNode2 = loNode.selectSingleNode("Quantity")
? loNode2.text
messagebox(loNode2.text)
replace qtt WITH VAL(loNode2.text)MartinaJ
>Hello Comunity,
>
>I build this above code to read XML file and insert the value into Cursor:
>
>
>LOCAL loXMLDoc, loRoot, loNodes, loNode
>
>* Create a new DOMDocument object
>loXMLDoc = CREATEOBJECT("MSXML2.DOMDocument")
>
>* Load the XML file
>lcXMLFile = GETFILE("XML")
>IF !loXMLDoc.load(lcXMLFile)
> ? "Error loading XML file:"
> ? loXMLDoc.parseError.reason
> RETURN
>ENDIF
>
>CREATE CURSOR crs ( ref C(18), qtt N(10,6))
>* Get the root element of the XML document
>loRoot = loXMLDoc.documentElement
>
>* Access multiple nodes using selectNodes
>loNodes = loRoot.selectNodes("//SourceDocuments/SalesInvoices/Invoice/Line")
>
>
>* Loop through the nodes using FOR EACH
>FOR EACH loNode IN loNodes
> SELECT crs
> APPEND BLANK
>
> loNode = loNode.selectSingleNode("ProductCode")
> ? loNode.text
> messagebox(loNode.text)
> replace ref WITH loNode.text
>
> loNode = loNode.selectSingleNode("Quantity")
> ? loNode.text
> messagebox(loNode.text)
> replace qtt WITH VAL(loNode.text)
> * Perform additional operations with the node, if needed
>
>ENDFOR
>
>SELECT crs
>BROWSE nowait
>>
>But , if i use only :
>
> loNode = loNode.selectSingleNode("Quantity")
> ? loNode.text
> messagebox(loNode.text)
> replace qtt WITH VAL(loNode.text)
>>the code work fine, but if have two , like this:
>
> loNode = loNode.selectSingleNode("ProductCode")
> ? loNode.text
> messagebox(loNode.text)
> replace ref WITH loNode.text
>
> loNode = loNode.selectSingleNode("Quantity")
> ? loNode.text
> messagebox(loNode.text)
> replace qtt WITH VAL(loNode.text)
>>VFP , return on comment &&ERROR HERE with this message:
>LONODE is not an Object
>
>I don´t know why because i need on the same : loNodes = loRoot.selectNodes("//SourceDocuments/SalesInvoices/Invoice/Line"), other values to fill into my cursor.
>
>I send in attachement my XML file.
>
>
>Someone could give help !
>
>Many thanks,
>Luis
