how to solve ABENDU3003 error?



Get solution for your ABEND Codes & System Error Messages, SQL Codes, File Status etc...

how to solve ABENDU3003 error?

Postby sathyasri » Tue Nov 06, 2007 12:46 pm

hi,
I got the below error in IIEMMSGS in spool.how to fix the code.


IIEM - PROGRAM STANDARD MESSAGE REPORT - ISSUE 030
**6220-PROG03-AG4ARRAY OVERFLOW
PROGRAM ALLOWS ONLY 40 SECTIONS PER POLICY; 41ENCOUNTERED

IIEM - PROGRAM STANDARD MESSAGE REPORT - ISSUE 030
**0003-PROG03-AG*ABNORMAL END
sathyasri
 
Posts: 11
Joined: Tue Oct 09, 2007 6:06 pm
Has thanked: 0 time
Been thanked: 0 time

Re: how to solve ABENDU3003 error?

Postby CICS Guy » Tue Nov 06, 2007 4:10 pm

sathyasri wrote:I got the below error in IIEMMSGS in spool.how to fix the code.
I do not know what an IIEM is, but that program/system/whatever said it all....
'ARRAY OVERFLOW' and 'PROGRAM ALLOWS ONLY 40 SECTIONS PER POLICY' and '41ENCOUNTERED'.....
I'd guess that you have to reduce the number of 'SECTIONS' for that 'POLICY'......
CICS Guy
 
Posts: 246
Joined: Wed Jun 20, 2007 4:08 am
Has thanked: 0 time
Been thanked: 0 time

Re: how to solve ABENDU3003 error?

Postby MrSpock » Tue Nov 06, 2007 6:43 pm

IIEM - Indian Institute of Export Management (maybe??)
User avatar
MrSpock
Global moderator
 
Posts: 807
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 4 times

Re: how to solve ABENDU3003 error?

Postby dick scherrer » Wed Nov 07, 2007 8:13 am

Hello,

I'd guess that you have to reduce the number of 'SECTIONS' for that 'POLICY'......
A couple more thoughts. . .

Due to changing business might more than 40 sections now be needed?

What created the 40+ sections? Should that code be checked to see if it allows more than 40?

The "problem" is completely within the code or the data (or possibly both). The error shown is not a standard IBM message and does not appear to come from any of the common products (like the sort).
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: how to solve ABENDU3003 error?

Postby sathyasri » Wed Nov 07, 2007 12:39 pm

This is the code...
SECSUB = SECSUB + 1;
IF SECSUB > 40
THEN DO;
W_PIC2 = SECSUB;
PAEM.DETAILS = 'PROGRAM ALLOWS ONLY 40 ' ||
'SECTIONS PER POLICY; ' ||
W_PIC2 || 'ENCOUNTERED';
CALL IIEM('#AG','6220',PAEM,'4');
END;

how to modify...
sathyasri
 
Posts: 11
Joined: Tue Oct 09, 2007 6:06 pm
Has thanked: 0 time
Been thanked: 0 time

Re: how to solve ABENDU3003 error?

Postby dick scherrer » Wed Nov 07, 2007 8:28 pm

Hello,

Before anyone can suggest a code modification, you need to find and post the "business rule" associated with the number of sections.

Is this a data problem (i.e. is more than 40 invalid?)?

Is there a new max sections? If so, what is it?

We can help with program code, but we can't help with establishing the rules that are to be implemented. That will come from within your organization.
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


Return to ABENDS & SQL Codes

 


  • Related topics
    Replies
    Views
    Last post