Howdy, Stranger!
Categories
- All Categories
- 73 General
- 73 Announcements
- 66.5K Microsoft Dynamics NAV
- 18.5K NAV Three Tier
- 38.4K NAV/Navision Classic Client
- 3.6K Navision Attain
- 2.4K Navision Financials
- 115 Navision DOS
- 854 Navision e-Commerce
- 1K NAV Tips & Tricks
- 772 NAV Dutch speaking only
- 615 NAV Courses, Exams & Certification
- 2K Microsoft Dynamics-Other
- 1.5K Dynamics AX
- 270 Dynamics CRM
- 109 Dynamics GP
- 10 Dynamics SL
- 1.5K Other
- 993 SQL General
- 384 SQL Performance
- 33 SQL Tips & Tricks
- 34 Design Patterns (General & Best Practices)
- Architectural Patterns
- 10 Design Patterns
- 5 Implementation Patterns
- 53 3rd Party Products, Services & Events
- 1.7K General
- 1.1K General Chat
- 1.6K Website
- 79 Testing
- 1.2K Download section
- 23 How Tos section
- 259 Feedback
- 12 NAV TechDays 2013 Sessions
- 13 NAV TechDays 2012 Sessions
Options
create and read a xml file
ondina
Member Posts: 9
I have a problem whem I read a xml file.
I create a xml file like this:
IF ISCLEAR(XMLDocOut) THEN
CREATE(XMLDocOut);
ReturnValue := FALSE;
XMLDocOut.loadXML ('<?xml version="1.0" encoding="ISO-8859-1" ?><SERVICO/>');
XMLCurrNode := XMLDocOut.documentElement;
IF AddElement(XMLCurrNode,'CODSERV','XXXX',DocNameSpace,XMLNewChild) > 0 THEN
EXIT;
IF AddElement(XMLCurrNode,'DES','X(80)X',DocNameSpace,XMLNewChild) > 0 THEN
EXIT;
....
And everything seems ok.
Then I try to read the file, this way:
Ficheiro := 'C:\FICH_DGO\IN\FICH00.xml';
XMLFile.OPEN(Ficheiro);
XMLFile.CREATEINSTREAM(XMLInStr);
IF ISCLEAR(XMLDocIn) THEN
CREATE(XMLDocIn);
XMLDocIn.load(XMLInStr);
XMLFile.CLOSE();
XMLNode := XMLDocIn.documentElement;
XMLRootNode := XMLDocIn.documentElement;
//MESSAGE(XMLNode.nodeName);
IF FindNode(XMLNode,'SERVICO',XMLNodeFound) THEN BEGIN
XMLNode := XMLNodeFound;
IF FindNode(XMLNode,'CODSERV',XMLNodeFound) THEN
IF STRLEN(XMLNodeFound.text) > 0 THEN
MESSAGE(XMLNodeFound.text);
IF FindNode(XMLNode,'DES',XMLNodeFound) THEN
IF STRLEN(XMLNodeFound.text) > 0 THEN
MESSAGE(XMLNodeFound.text);
.....
The function FindNode() and AddElement() are the same that exist in Navision, I haven't modified them.
Why doesn't the red instruction work ?
Is that possible that the problem is when I create the file or when I read it ?
Thanks for your time.
Ondina
I create a xml file like this:
IF ISCLEAR(XMLDocOut) THEN
CREATE(XMLDocOut);
ReturnValue := FALSE;
XMLDocOut.loadXML ('<?xml version="1.0" encoding="ISO-8859-1" ?><SERVICO/>');
XMLCurrNode := XMLDocOut.documentElement;
IF AddElement(XMLCurrNode,'CODSERV','XXXX',DocNameSpace,XMLNewChild) > 0 THEN
EXIT;
IF AddElement(XMLCurrNode,'DES','X(80)X',DocNameSpace,XMLNewChild) > 0 THEN
EXIT;
....
And everything seems ok.
Then I try to read the file, this way:
Ficheiro := 'C:\FICH_DGO\IN\FICH00.xml';
XMLFile.OPEN(Ficheiro);
XMLFile.CREATEINSTREAM(XMLInStr);
IF ISCLEAR(XMLDocIn) THEN
CREATE(XMLDocIn);
XMLDocIn.load(XMLInStr);
XMLFile.CLOSE();
XMLNode := XMLDocIn.documentElement;
XMLRootNode := XMLDocIn.documentElement;
//MESSAGE(XMLNode.nodeName);
IF FindNode(XMLNode,'SERVICO',XMLNodeFound) THEN BEGIN
XMLNode := XMLNodeFound;
IF FindNode(XMLNode,'CODSERV',XMLNodeFound) THEN
IF STRLEN(XMLNodeFound.text) > 0 THEN
MESSAGE(XMLNodeFound.text);
IF FindNode(XMLNode,'DES',XMLNodeFound) THEN
IF STRLEN(XMLNodeFound.text) > 0 THEN
MESSAGE(XMLNodeFound.text);
.....
The function FindNode() and AddElement() are the same that exist in Navision, I haven't modified them.
Why doesn't the red instruction work ?
Is that possible that the problem is when I create the file or when I read it ?
Thanks for your time.
Ondina
0
Comments
http://www.mibuso.com/dlinfo.asp?FileID=285
If it was hard to write, it should be hard to understand."
http://msdn.microsoft.com/library/defau ... Syntax.asp
XPath syntax has some similarity to ms-dos directory names, and that similarity can help in forming search expressions...
Your xml document has the following 'directory tree'...
/SERVICO
/SERVICO/CODSERV
/SERVICO/DES
When you code the line 'xmlNode := ...documentElement', you are positioned at '/SERVICO' in the tree. Doing a FindNode (which calls the selectSingleNode method) with a search expression that does not begin with a '/' will search 'below' the current position -- and won't find any 'SERVICO' node(s) 'below' the root node.
I think that if you change the search expression to '/SERVICO', then you will find the root node (and XMLNodeFound will be the same as XMLNode...).
Thanks. You have save me.