XML Parsing in COBOL/CICS - Enterprise COBOL



Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS

XML Parsing in COBOL/CICS - Enterprise COBOL

Postby thomaspmtm » Thu Nov 06, 2008 10:19 pm

Hello,
I am trying to parse a XML document using Enterprise COBOL version 3.4. I was able to parse it successfully using 'XML PARSE' in batch mode. But I wanted to do the same in CICS. When I tried to use same 'XML PARSE' API in a COBOL-CICS application, it's failing.

When I invoke the CICS transaction witht the 'XML PARSE' command, it's not even invoking any lines of code and it's failing with 'Invalid address being passed to CICS'.

Do we have to do something different for CICS environment?

Thanks in advance for your help!
thomaspmtm
 
Posts: 6
Joined: Thu Nov 06, 2008 10:12 pm
Has thanked: 0 time
Been thanked: 0 time

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby dick scherrer » Fri Nov 07, 2008 9:04 am

Hello,

Do we have to do something different for CICS environment?
As far as i know, only the standard CICS consideratons.

These links may help:
http://publibz.boulder.ibm.com/cgi-bin/ ... 0220035836

http://publibz.boulder.ibm.com/cgi-bin/ ... 0220035836
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby thomaspmtm » Fri Nov 07, 2008 6:34 pm

Hi Dick,
Thanks for the information...

We have lot of other CICS applications running in our existing CICS environment, but when I run this application, it's failing.. When you say 'Standard CICS considerations' - means (could you please provide more details)

Do we have to specify any special compile options for compiling this program or do we need any other new parm to be set up in the CICS environment to run this application.

I appreciate your help!
thomaspmtm
 
Posts: 6
Joined: Thu Nov 06, 2008 10:12 pm
Has thanked: 0 time
Been thanked: 0 time

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby dick scherrer » Sat Nov 08, 2008 9:03 am

Hello,

it's failing..
And the failure is. . .?

Do we have to specify any special compile options for compiling this program or do we need any other new parm to be set up in the CICS environment to run this application.
Not that i'm aware of. Unfortunately, i've no way to test this on any of my systems :?

There is info from IBM here:
http://publibz.boulder.ibm.com/cgi-bin/ ... Y3PG20/5.0?

Maybe it will have something useful.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby thomaspmtm » Sat Nov 08, 2008 6:58 pm

Thanks for your reply.
I searched thru' the links you had provided. It talks about how to parse/build the XML document. I don't see anything specific for CICS. The Enterprise COBOL version, I have is V3.4. The error what I am receiving is 'INVAID ADDRESS BEING PASSED TO CICS' and it's failing with Abend code 'AEYD'. The XML PARSE statement I am using in my app. is
XML PARSE XML-DOC PROCESSING PROCEDURE XML-HANDLER
ON EXCEPTION
DISPLAY 'XML PARSING - DOCUMENT ERROR'
NOT ON EXCEPTION
DISPLAY 'XML DOCUMENT PARSED SUCCESSFULLY !!!'
END-XML.
thomaspmtm
 
Posts: 6
Joined: Thu Nov 06, 2008 10:12 pm
Has thanked: 0 time
Been thanked: 0 time

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby thomaspmtm » Sat Nov 08, 2008 11:37 pm

I am attaching the snap shot of Error message I am getting in CICS region.

PROGRAM: XXXXXXXX MODULE: XXXXXXXX COMPILED ON 08 NOV 2008 AT 11.55.43
CAUSE: INVALID ADDRESS PASSED TO CICS ABEND CODE: AEYD
APPLID: XXXXXXXX USERID: D98040 TERM: FAAC NETNAME: XXXXXXXX TRAN: XXXX
INTERRUPT OFFSET: ...... ADDRESS: 8008317A PSW: 079D1000 8008317E 00040004
RESUME OFFSET: ...... ADDRESS: 8008317A LAST CICS COMMAND:

INSTRUCTION: 9600 2000 OI X'000'(2),X'00'
REGISTERS:

0-3 00000000_000007E0 00000000_16B01B80 00000000_80074AAC 00000000_00091A24

4-7 00000000_00000018 00000000_00000400 00000000_00000007 00000000_16EA8A9D

8-B 00000000_0008378C 00000000_00082624 00000000_00000004 00000000_16605388

C-F 00000000_16605080 00000000_8004F0C0 00000000_00000000 00000000_000855C0
thomaspmtm
 
Posts: 6
Joined: Thu Nov 06, 2008 10:12 pm
Has thanked: 0 time
Been thanked: 0 time

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby dick scherrer » Sun Nov 09, 2008 12:35 am

Hello,

I don't see anything specific for CICS
Yes, as i mentioned - im not aware of anything cics specific for xml. I've not been able to find a good example to post either. . . :?

It sounds like your code is walking on storage or the setup is not correct. It may be that your xml exceeds some local storage limit. You might consider creating a very small test case rather than your "real" case. You might talk with your cics system support people to help isloate the problem. Have you run this via CEDF?

I'll continue to keep an eye out for a decent cics/xml example.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby thomaspmtm » Sun Nov 09, 2008 8:15 am

I set the break point in the first line of the program thru' Expediter. When I ran the transaction, it's abending even before executing the very first line of the code.

I ran the same transaction thru' CEDF.

When I invoke CEDF for the first time

TRANSACTION: XXXX PROGRAM: XXXXXXXX TASK: 0000064 APPLID: XXXXXXXX DISPLAY: 00
STATUS: PROGRAM INITIATION

EIBTIME = 203931
EIBDATE = 0108313
EIBTRNID = 'XXXX'
EIBTASKN = 64
EIBTRMID = 'FAAA'

EIBCPOSN = 4
EIBCALEN = 0
EIBAID = X'7D' AT X'16B000EA'
EIBFN = X'0000' AT X'16B000EB'
EIBRCODE = X'000000000000' AT X'16B000ED'
EIBDS = '........'
+ EIBREQID = '........'

As soon as the transaction started, it's abending even before the executing any lines in the code

TRANSACTION: XXXX PROGRAM: XXXXXXXX TASK: 0000059 APPLID: XXXXXXXX DISPLAY: 00
STATUS: AN ABEND HAS OCCURRED

EIBTIME = 203856
EIBDATE = 0108313
EIBTRNID = 'XXXX'
EIBTASKN = 59
EIBTRMID = 'FAAA'

EIBCPOSN = 4
EIBCALEN = 0
EIBAID = X'7D' AT X'16B000EA'
EIBFN = X'0000' AT X'16B000EB'
EIBRCODE = X'000000000000' AT X'16B000ED'
EIBDS = '........'
+ EIBREQID = '........'

ABEND : AEYD
thomaspmtm
 
Posts: 6
Joined: Thu Nov 06, 2008 10:12 pm
Has thanked: 0 time
Been thanked: 0 time

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby dick scherrer » Sun Nov 09, 2008 8:20 am

Hello,

Did you change the program to use a very small bit of xml? As i mentioned before
It may be that your xml exceeds some local storage limit.
What is the size of your load module?

Have you talked with your cics support?
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: XML Parsing in COBOL/CICS - Enterprise COBOL

Postby thomaspmtm » Sun Nov 09, 2008 9:11 am

Hi,
It's a very small XML.
The size of the load module is 00006160.
I haven't talked with my CICS support yet. (may be on Monday).

My assumption is 'XML PARSE' will work in CICS too... Correct? If you find some example using 'XML PARSE' API which will run in CICS, please let me know.

Thanks for your help!
thomaspmtm
 
Posts: 6
Joined: Thu Nov 06, 2008 10:12 pm
Has thanked: 0 time
Been thanked: 0 time


Return to IBM Cobol

 


  • Related topics
    Replies
    Views
    Last post