Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

System abend 80A while saving the cobol program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
birdy K

New User


Joined: 05 Mar 2008
Posts: 72
Location: chennai

PostPosted: Tue Mar 25, 2008 6:05 pm    Post subject: System abend 80A while saving the cobol program
Reply with quote

hai all,

I am getting system abend 80A while saving the cobol program. How to solve it?
Back to top
View user's profile Send private message

cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Tue Mar 25, 2008 6:26 pm    Post subject: Reply to: System abend
Reply with quote

80A abends are usually associated with insufficient REGION size. Try increasing your REGION size for the job.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Mar 25, 2008 10:43 pm    Post subject:
Reply with quote

Hi,

Quote:
while saving the cobol program
Where do You use 'saving' & how did you do it? I meant did you try to save in a personal PDS or .. icon_confused.gif
Back to top
View user's profile Send private message
birdy K

New User


Joined: 05 Mar 2008
Posts: 72
Location: chennai

PostPosted: Wed Mar 26, 2008 11:02 am    Post subject:
Reply with quote

Hai anuj,

After doing some changes in cobol program, that is cut and paste
like that. After cut and paste I tried to save , at that time It is giving me System abend 80A and It is coming out of the program.
Back to top
View user's profile Send private message
Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Wed Mar 26, 2008 11:09 am    Post subject:
Reply with quote

Is it a very big program.
I think Virtual storage exceeds the limit which has been allocated for you.
Back to top
View user's profile Send private message
birdy K

New User


Joined: 05 Mar 2008
Posts: 72
Location: chennai

PostPosted: Wed Mar 26, 2008 3:39 pm    Post subject:
Reply with quote

hai all,

Thank You for replying me. I will try to reduce the size in cobol program .
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Mar 26, 2008 10:37 pm    Post subject:
Reply with quote

Hi,

gnanas wrote:
I think Virtual storage exceeds the limit which has been allocated for you.
unless I misunderstood, if s/he can cut/paste s/he obviously can open the program in VIEW/EDIT mode..& if so shy don't the error comes in at the first place, when opened for view/edit ?
Back to top
View user's profile Send private message
sril.krishy

Active User


Joined: 30 Jul 2005
Posts: 182
Location: hyderabad

PostPosted: Wed Mar 26, 2008 11:47 pm    Post subject:
Reply with quote

I am not 100% sure whether I got the same error or not.But,try to use
'COMPRESS' in the command prompt when you are in EDIT mode in the member.It might solve your problem.

Thanks
Krishy
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Thu Mar 27, 2008 2:30 am    Post subject:
Reply with quote

ISPF compression would make the source unreadable by the compiler!
Back to top
View user's profile Send private message
birdy K

New User


Joined: 05 Mar 2008
Posts: 72
Location: chennai

PostPosted: Thu Mar 27, 2008 11:12 am    Post subject:
Reply with quote

hai all,

System abend 80A is not coming often. Anyway now I am not getiing this abend.

Thank You for all.
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Thu Mar 27, 2008 7:11 pm    Post subject:
Reply with quote

Bill Dennis wrote:
ISPF compression would make the source unreadable by the compiler!
My mistake. I was thinking of the ISPF profile command PACK ON which compresses the source data to fewer bytes when saved.

I'm not sure what the COMPRESS command is that krishy mentioned. Maybe a foreground compress of the source PDS?
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Fri Mar 28, 2008 2:25 am    Post subject:
Reply with quote

Hi,
birdy K wrote:
now I am not getiing this abend.

What magic happened at your end, can You please share?
Back to top
View user's profile Send private message
birdy K

New User


Joined: 05 Mar 2008
Posts: 72
Location: chennai

PostPosted: Fri Mar 28, 2008 12:04 pm    Post subject:
Reply with quote

hai ,

When I did changes I got this abend. So I had commented paras also in program. I removed that. I reduced the size of the program. The program itself over. No changes more. Thank You
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Fri Mar 28, 2008 11:38 pm    Post subject:
Reply with quote

Hi,

Good to hear that problem is resolved now..but I'm not convinced yet with this argument,
Quote:
I had commented paras also in program. I removed that. I reduced the size of the program.

perhaps little more investigation from my side.
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Sat Mar 29, 2008 1:49 am    Post subject:
Reply with quote

In a very unique case, I might believe that editing a very large source deck used so much of the user's REGION that when the time came to do the STOW back into the PDS there was not enough storage for new control blocks or workareas.

Normally, you see a problem when you first attempt to edit the file and get a storage shortage failure right away.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Sat Mar 29, 2008 2:53 am    Post subject:
Reply with quote

Hi,

Thanks Bill for yor suggestion. Defined a new PDS with below specifications
Code:
Record format . . . : FB   
Record length . . . : 80   
Block size  . . . . : 27920
1st extent cylinders: 1   
Secondary cylinders : 3   
Data set name type  : PDS 

and tried to fill up the members repeatdly till I could get 80A. Abend didn't 'come' but my session got hanged. Tried 4-5 times but no 80A, perhaps some more attempts are needed from my side. Today my work is keeping me too busy... Phew...cann't experment more..
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Sat Mar 29, 2008 3:57 am    Post subject: Reply to: System abend 80A while saving the cobol program
Reply with quote

Ok the abend, but to diagnose the problem You' ll need to tell us also the reason code

with a logon region size of 4 MB I was able to edit a 280,000 ( two hundred eighty thousand ) lines thing
a 10 liner rexx replicated for 28000 times

trying to add 10000 more lines I got a 878 abend with reason code 10

so I suspect that the abend 80a is coming out of something else and could be I/O related

not certainly related to the size of the thing being edited ,
in such case only an 878 abend with reason code 10 will occur

also I do not think that with a reasonable setup an abend should occur when editing a normal program
...a 20000 lines program is an unmanageable object
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts I can not compile my program PL1 V3.R... Miguel Fernandez PL/I & Assembler 2 Tue Dec 06, 2016 8:30 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
This topic is locked: you cannot edit posts or make replies. RANDOM Function in COBOL swapnil781 COBOL Programming 2 Tue Nov 15, 2016 6:17 pm
No new posts Check System time(Minute) Using TIME1... balaji81_k DFSORT/ICETOOL 5 Fri Nov 11, 2016 10:53 am
No new posts Regarding COBOL Stored Procedure opti... selvamsrinivasan85 DB2 4 Fri Nov 04, 2016 8:57 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us