How to use XML in COBOL

kiran_polnati · New User Joined: 23 Jun 2005 Posts: 22

HELLO,

i have tried for xml parser programme . but it was not recognising the xml events .

the example programme only recognising the START-OF-DOCUMENT event only it is not recognising remaining events

its showing xml doc error and xml code 12

control is not going to inner evaluate loop .

can you any please help me in this simple programme

thanks in advance

William Thompson · Posted: Fri Apr 13, 2007 5:11 pm Post subject:

According to the manual:
12
A processing instruction target name was ?xml? in lowercase, uppercase, or mixed case.
The parser continues detecting errors until it reaches the end of the document or encounters an error that does not allow continuation. The parser does not signal any further normal events, except for the END-OF-DOCUMENT event.
and
XML declaration: If the document that you are parsing contains an XML declaration, the declaration must begin in the first byte of the document. If the string <?xml starts after the first byte of the document, the parser generates an exception code. The attribute names that are coded in the XML declaration must all be in lowercase characters.
Try this lowercase version:
<?xml version="1.0" ?>
maybe it will help

kiran_polnati · New User Joined: 23 Jun 2005 Posts: 22

Thamson
Thanks for your reply

yes it was recognising all events fine , but how to move the actuall data to cobol variables here

i used MOVE XML-TEXT TO FNAME1 (FNAME1 IS COBOL VARIABLE)

next i writeen display " fname is " FNAME1

even this display statement is not working

plese update me if i am wrong

Thanks in advance

William Thompson · Posted: Mon Apr 16, 2007 12:57 pm Post subject: Re: HOW TO USE XML IN COBOL

kiran_polnati · New User Joined: 23 Jun 2005 Posts: 22

below evaluate CURRENT-ELEMENT

EVALUATE CURRENT-ELEMENT

WHEN 'FNAME'
MOVE XML-TEXT TO FNAME1
DISPLAY "First name is " FNAME1
WHEN 'LNAME'
MOVE XML-TEXT TO LNAME1
DISPLAY "last name is "LNAME1
WHEN 'SAL'
MOVE XML-TEXT TO SAL1
DISPLAY "sal is " SAL1
END-EVALUATE
WHEN 'END-OF-DOCUMENT'
MOVE SPACES TO CURRENT-ELEMENT

COBOL DECLARATION:

01 EMP-RECORD.
02 FNAME1 PIC X(10).
02 LNAME1 PIC X(10).
02 SAL1 PIC X(10).

I WANT TO UPDATE EMP-RECORED

THANKS IN ADVANCE ....

William Thompson · Posted: Mon Apr 16, 2007 5:58 pm Post subject:

kiran_polnati · New User Joined: 23 Jun 2005 Posts: 22

hi

i have requirement i posted it in earlier

here i attached sample programme:

my requirement is <xml1>
<xml2> dfg <xml2>
<xml3> dfg <xml3>
<xml4> dfg <xml4>
<xml5> dfg <xml5>
<xml3>

<xml1>

here i attached programme is simple programme i wanted to updated EMP-RECORED

in this programme

in First EVALUEATE VERB

WHEN 'CONTENT-CHARACTERS'

DISPLAY XML-TEXT

it will display all xml-text

but INNER EVALUATE CURRENT-ELEMENT

NOT GOING TO WORK

the control doesn't go to the inner evalueate verb

please help me how to update EMP-RECORD

AND how to fulfill my requirement please help

thanks in advance

kiran_polnati · New User Joined: 23 Jun 2005 Posts: 22

I AM VERY THANKFULL TO WILLIAM .