Not sure if this is just the way it appears to me, or if it is a
difference between Universe and Unidata which I have not worked with,
but from what I can see you need to separate the lines of code.
X.XML.INPUT.FILE = '_XML_/test.xml'
X.XML.EXT.RULE.FILE = '_XML_/test.ext'
X.STATUS = PrepareXML(X.XML.INPUT.FILE, X.XML.HANDLE)
X.STATUS = OpenXMLData(X.XML.HANDLE, X.XML.EXT.RULE.FILE,
X.XML.DATA.HANDLE)
X.EOF = 0
LOOP
WHILE X.EOF = 0 DO
X.STATUS = ReadXMLData(X.XML.DATA.HANDLE, X.REC)
IF X.STATUS = XML.EOF THEN
X.EOF = 1
END ELSE
PRINT "Read record ":X.REC
END
REPEAT
X.STATUS = CloseXMLData(X.XML.DATA.HANDLE) X.STATUS =
ReleaseXML(X.XML.HANDLE)
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: Sunday, 5 February 2006 5:46 p.m.
To: [email protected]
Subject: [U2] Unidata XML
Can anyone shed light on why this simple example won't compile? It dies
on the OpenXMLData line.
X.XML.INPUT.FILE = '_XML_/test.xml'
X.XML.EXT.RULE.FILE = '_XML_/test.ext'
X.STATUS = PrepareXML(X.XML.INPUT.FILE, X.XML.HANDLE) X.STATUS =
OpenXMLData(X.XML.HANDLE, X.XML.EXT.RULE.FILE, X.XML.DATA.HANDLE) X.EOF
= 0 LOOP WHILE X.EOF = 0 DO
X.STATUS = ReadXMLData(X.XML.DATA.HANDLE, X.REC)
IF X.STATUS = XML.EOF THEN
X.EOF = 1
END ELSE
PRINT "Read record ":X.REC
END
REPEAT
X.STATUS = CloseXMLData(X.XML.DATA.HANDLE) X.STATUS =
ReleaseXML(X.XML.HANDLE)
Compiling Unibasic: CUSTOM.SOURCE/H08.P.TEST.XML in mode 'u'.
main program: syntax error at or before
<line 7> X.STATUS = OpenXMLData(X.XML.HANDLE, X.XML.EXT.RULE.FILE,
X.XML.DATA.HANDLE)
--------------------------------------------------------^
Expecting:
array,string,number,function,variable,OR,AND,!,>,>=,<,<=,=,<>,MATCH,CAT,
:,+,-
Warning: Variable 'X.REC' never assigned a value
Warning: Variable 'X.XML.DATA.HANDLE' never assigned a value
Warning: Variable 'X.XML.HANDLE' never assigned a value
Warning: Variable 'XML.EOF' never assigned a value matrix "PrepareXML"
undefined.
matrix "CloseXMLData" undefined.
matrix "ReadXMLData" undefined.
matrix "ReleaseXML" undefined.
compilation failed
Jeff Butera, Ph.D.
Administrative Systems
Hampshire College
[EMAIL PROTECTED]
413-559-5556
"Hindsight alone is not wisdom."
George W. Bush
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/
