Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
ASRA ABEND - 4088

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
vinit_infy
Warnings : 1

New User


Joined: 07 Apr 2005
Posts: 56

PostPosted: Mon Dec 17, 2007 3:34 pm    Post subject: ASRA ABEND - 4088
Reply with quote

Hi,

I am getting ASRA abend - 4088 while running one of my transaction on cics.

Can anybody assist me how to resolve this?

Thanks in advance,

Vinit
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Mon Dec 17, 2007 3:55 pm    Post subject:
Reply with quote

Not enough information, try again.....
Back to top
View user's profile Send private message
TG Murphy

Active User


Joined: 23 Mar 2007
Posts: 149
Location: Ottawa Canada

PostPosted: Mon Dec 17, 2007 8:55 pm    Post subject:
Reply with quote

QuickRef says this about U4088:

Programmer Response: For reason codes 91-20x, probable internal malfunction or storage corruption. For code 1001 or 1004, increase the region size or check for infinite recursion. For reason code 1024,
increase the region size or request a Reserve stack. Use the STORAGE run-time option to get more information about the environment leading up to the out-of-storage condition or allow a user handler to get control and respond to the condition.

As well, I have an entry in my notebook on 4088. I wrote down "Short On Storage". So consider that as well. Search for SHORT in your CICS logs.
Back to top
View user's profile Send private message
vinit_infy
Warnings : 1

New User


Joined: 07 Apr 2005
Posts: 56

PostPosted: Tue Dec 18, 2007 2:01 pm    Post subject: ASRA ABEND - 4088
Reply with quote

The Problem is when i tried to debug using Xpeditor, i found when one of my called module reached to it's goback,
and then as i pressed F9 to come to calling module, the my transaction got abended with ASRA abend - 4088.
I got the following info regarding this abend from the cics log -
A storage violation (code X'0F0C') has been detected by module DFHSMAR
DFHME0116 CICSTD03 780
(Module:DFHMEME) CICS symptom string for message DFHSM0102 is
PIDS/5655M1500 LVLS/640 MS/DFHSM0102 RIDS/DFHSMAR PTFS/HCI6400
PRCS/00000F0C

But i dont have any idea how to resolve this. If any one can help me out , i will be very greatful.

Thanks in Advance,
-Vinit
Back to top
View user's profile Send private message
Earl

Active User


Joined: 17 Jun 2007
Posts: 148
Location: oklahoma

PostPosted: Tue Dec 18, 2007 9:06 pm    Post subject:
Reply with quote

If this is a cobol progam, make sure you are not referencing data
outside the array (occurs) of a working storage table.
Back to top
View user's profile Send private message
TG Murphy

Active User


Joined: 23 Mar 2007
Posts: 149
Location: Ottawa Canada

PostPosted: Wed Dec 19, 2007 12:25 am    Post subject:
Reply with quote

The problem only happens when you are debugging, right?

Does not happen when running directly under CICS, right?

Could be a bug in your debugger.

You mention that your program was called. Can you double check this? Maybe your caller is using LINK. By the way, we always use GOBACK regardless of whether we are CALLed or LINKed. A few years ago our debugger had a problem with GOBACK when LINK was used...

Even if your caller is using LINK it should be fine for you to use GOBACK. However, if it is a bug in your debugger, then important to know whether the caller is uses CALL or LINK.

If the caller is using LINK, do a CICS RETURN instead of GOBACK. Do this as an experiment. If RETURN works and GOBACK doesn't your debugger becomes a bigger suspect. And perhaps the use of RETURN will provide you with a workaround until you can get GOBACK to work..

Here is another angle. Let's assume that your program is trashing storage and is corrupting some pointers that LE uses. Try the following.

Modify your program so that it does nothing. It enters and then immediately does a GOBACK. Does it abend? If not... now start adding your logic back into the program - bit by bit - until you make it abend.
Back to top
View user's profile Send private message
vinit_infy
Warnings : 1

New User


Joined: 07 Apr 2005
Posts: 56

PostPosted: Wed Dec 19, 2007 10:03 am    Post subject: Reply to: ASRA ABEND - 4088
Reply with quote

Hi Murphy,

Thanks for your time.

Actually i am getting the abend even if i run my tranx directly without any debugger. The abend message is saying that ' transaction has failed with abend code 4088.

After that i tried to run this transaction through debugger and then i found that the abend occured at goback of one of the called program when it tries to return to calling module.

One more thing, My calling and called program has no cics commands , they are normal COBOL, DB2 programs so have simple call between them.

I think the above info can give you some more clear picture. If you can advise anything , that would be much appriciated,

Many Thanks,
Vinit
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Dec 19, 2007 8:31 pm    Post subject:
Reply with quote

Hello,

Quote:
My calling and called program has no cics commands
Might your topic be better served in DB2 or COBOL?

I'm sure that people have been focusing on what might cause this in CICS. . .
Back to top
View user's profile Send private message
Earl

Active User


Joined: 17 Jun 2007
Posts: 148
Location: oklahoma

PostPosted: Wed Dec 19, 2007 9:07 pm    Post subject:
Reply with quote

since you indicated you are getting message
DFHME0116 << produced by CICS

it looks like you are trying to run a batch cobol program in CICS

please explain your situation a little better.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Dec 19, 2007 10:03 pm    Post subject: Reply to: ASRA ABEND - 4088
Reply with quote

Quote:
it looks like you are trying to run a batch cobol program in CICS
Good catch icon_smile.gif

d
Back to top
View user's profile Send private message
vinit_infy
Warnings : 1

New User


Joined: 07 Apr 2005
Posts: 56

PostPosted: Thu Dec 20, 2007 12:10 am    Post subject: Reply to: ASRA ABEND - 4088
Reply with quote

This program is like a common program for our batch and online region.
That means, our batch cycle is also using this program and our online region is also using this program. It is not necessary that every program should have cics commands. ..right?

The call is like

--

CICS Driver module >>>calls>>>COBOL MODULE 1>>>Calls>>>COBOL DB2 Module.

So, if you can CATCH any valid reason that would be appriciated.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Dec 20, 2007 12:32 am    Post subject:
Reply with quote

Hello,

Unless something has changed in the way called modules are handled, the same link-edited module will not run in both batch and cics (unless extra code was put in to detect the environment the code is running in).

As i mentioned, what i just posted may not be current - it was a while back the last time i heard this mentioned (not in these forums).

Quote:
our batch cycle is also using this program and our online region is also using this program
When did this stop working? Did it ever work or is this something new being implemented?
Back to top
View user's profile Send private message
Earl

Active User


Joined: 17 Jun 2007
Posts: 148
Location: oklahoma

PostPosted: Thu Dec 20, 2007 1:53 am    Post subject:
Reply with quote

Quote:
CICS Driver module >>>calls>>>COBOL MODULE 1>>>Calls>>>COBOL DB2 Module.

So, if you can CATCH any valid reason that would be appriciated.



IS YOUR CICS DRIVER program compiled with the CICS translator

why don't you talk to your systems programmer

???
Back to top
View user's profile Send private message
Nagarjuna Laghumavarapu

New User


Joined: 19 Dec 2007
Posts: 2
Location: hyderabad

PostPosted: Thu Dec 20, 2007 4:30 pm    Post subject:
Reply with quote

hi vinit,

i think u r prog may consist of data exception error.......i.e(if u r performing arithmatic operations ur storing the either decimal values in integer variable or some thing like dat).......
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts ASP3 ABEND IN CICS Vedant CICS 0 Fri Oct 20, 2017 3:18 pm
No new posts C03 ABEND sjiraga PL/I & Assembler 1 Thu Jun 01, 2017 4:51 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us