IBM Mainframe Forum

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!

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

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!

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.

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.

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

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.

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

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?

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!