Hi
could anyone point me in the right direction as I'm trying to read an XML document into a Windows Forms application with little success?
I currently have the following code (which gives compilation errors)-
working-storage section.
01 reader typeSystem.Xml.XmlTextReader.
01 nodetype typeSystem.Xml.XmlNodeType.
method-id cmdProcess_Clickfinalprivate.
proceduredivisionusingbyvaluesenderasobjecteastypeSystem.EventArgs.
setreadertotypeXmlTextReader::New(openFileDialog1::FileName).
performuntil (reader::EOF())
invokereader::Read()
Evaluatereader::NodeType
Whennodetype::Element
do some processing
Whennodetype::Text
do some processing
Whennodetype::EndElement
do some processing
When Other
do some processing
End-Evaluate
end-perform
Compilation errors are
COBCH0888 Illegal comparison for this type
COBCH0829 Could not find method 'Element' with this signature
ditto for Text & EndElement
Any help much appreciated
Nigel P Richardson
endmethod.
method-id
cmdProcess_Clickfinalprivate.
proceduredivisionusingbyvaluesenderasobjecteastypeSystem.EventArgs.
setreadertotypeXmlTextReader::New(openFileDialog1::FileName).
performuntil (reader::EOF())
invokereader::Read()
Evaluatereader::NodeType
Whennodetype::Element
Display"Process Element"uponconsole
Whennodetype::Text
display"Process Text"uponconsole
Whennodetype::EndElement
display"pROCESS End Element"uponconsole
End-Evaluate
end-perform
endmethod.