View previous topic :: View next topic
|
Author |
Message |
birdy K
New User
Joined: 05 Mar 2008 Posts: 72 Location: chennai
|
|
|
|
hai all,
I am getting system abend 80A while saving the cobol program. How to solve it? |
|
Back to top |
|
|
cpuhawg
Active User
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
|
|
|
|
80A abends are usually associated with insufficient REGION size. Try increasing your REGION size for the job. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
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 .. |
|
Back to top |
|
|
birdy K
New User
Joined: 05 Mar 2008 Posts: 72 Location: chennai
|
|
|
|
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 |
|
|
Gnanas N
Active Member
Joined: 06 Sep 2007 Posts: 792 Location: Chennai, India
|
|
|
|
Is it a very big program.
I think Virtual storage exceeds the limit which has been allocated for you. |
|
Back to top |
|
|
birdy K
New User
Joined: 05 Mar 2008 Posts: 72 Location: chennai
|
|
|
|
hai all,
Thank You for replying me. I will try to reduce the size in cobol program . |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
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 |
|
|
sril.krishy
Active User
Joined: 30 Jul 2005 Posts: 183 Location: hyderabad
|
|
|
|
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 |
|
|
Bill Dennis
Active Member
Joined: 17 Aug 2007 Posts: 562 Location: Iowa, USA
|
|
|
|
ISPF compression would make the source unreadable by the compiler! |
|
Back to top |
|
|
birdy K
New User
Joined: 05 Mar 2008 Posts: 72 Location: chennai
|
|
|
|
hai all,
System abend 80A is not coming often. Anyway now I am not getiing this abend.
Thank You for all. |
|
Back to top |
|
|
Bill Dennis
Active Member
Joined: 17 Aug 2007 Posts: 562 Location: Iowa, USA
|
|
|
|
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 |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
Hi,
birdy K wrote: |
now I am not getiing this abend. |
What magic happened at your end, can You please share? |
|
Back to top |
|
|
birdy K
New User
Joined: 05 Mar 2008 Posts: 72 Location: chennai
|
|
|
|
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 |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
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 |
|
|
Bill Dennis
Active Member
Joined: 17 Aug 2007 Posts: 562 Location: Iowa, USA
|
|
|
|
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 |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6248 Location: Mumbai, India
|
|
|
|
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 |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10888 Location: italy
|
|
|
|
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 |
|
|
|