MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

U4039 and U4083 in Internal sort

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
mainframemouli
Beginner


Joined: 23 Feb 2005
Posts: 87
Topics: 33

PostPosted: Wed May 12, 2010 9:30 pm    Post subject: U4039 and U4083 in Internal sort Reply with quote

I have application program that does internal sorting.
This program works fine for the small volume of data.My input file is of size 20499 , Variable block.

The program works exactly fine with upto 20 Lakh records but when the input file records crosses some 30 Lakh the program abends giving the information as :
abend U4039 and after that U4083.

The abend message is as below.

Code:

IEF403I B1CDCA1A - STARTED - TIME=06.26.04                   
IEF233A M 2778,I20603,,B1CDCA1A,S10A                         
IEC501A M 2846,PRIVAT,SL,COMP,B1CDCA1A,S10A                 
IECTMS9 2846,L23344,B1CDCA1A,O1TRANS ,2010/177  ,00001,T16.CL
IEC705I TAPE ON 2846,L23344,SL,COMP,B1CDCA1A,S10A,TST.NEW.PRO
IEC501A M 2827,PRIVAT,SL,COMP,B1CDCA1A,S10A                 
IECTMS9 2827,L43037,B1CDCA1A,O3CTLFL ,2010/177  ,00001,T16.CL
IEC705I TAPE ON 2827,L43037,SL,COMP,B1CDCA1A,S10A,TST.NEW.PRO
IEA498I 4402,CATS01,PPRC-PATH ONE OR MORE PPRC PATHS RESTORED
SSID=4400 (PRI)=0175-MA861,CCA=02,SENSE=00101000 020000F5 020
109F6104 E51162ED 44003887 00006080 00000000                 
+WER999A B1CDCA1A,S10A    ,        -  UNSUCCESSFUL SORT FC7 U
$HASP375 B1CDCA1A ESTIMATED  LINES EXCEEDED                 
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY              25,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY              50,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY              75,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             100,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             125,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             150,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             175,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             200,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             225,000  L
$HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             250,000  L
IEA995I SYMPTOM DUMP OUTPUT  092                             
  USER COMPLETION CODE=4039 REASON CODE=00000000             
 TIME=07.42.39  SEQ=09064  CPU=0000  ASID=00B1               
 PSW AT TIME OF ERROR  078D1000   887DF392  ILC 2  INTC 0D   
   NO ACTIVE MODULE FOUND                                   
   NAME=UNKNOWN                                             
   DATA AT PSW  087DF38C - 00181610  0A0D58D0  D00498EC     
   AR/GR 0: 95523C66/84000000   1: 00000000/84000FC7         
         2: 00000000/00027CA0   3: 00000000/00000004         
         4: 00000000/087D429C   5: 00000000/00027834         
         6: 00000000/00000000   7: 00000000/15C122E8         
         8: 00000000/00027CA0   9: 00000000/000293A6         
         A: 00000000/00027834   B: 00000000/887DF2B8         
         C: 00000000/00021B78   D: 00000000/0002A4A0         
         E: 00000000/887D339E   F: 00000000/00000000         
END OF SYMPTOM DUMP                                         
CEE0374C CONDITION=CEE3204S TOKEN=00030C84 59C3C5C5 00000000
         WHILE RUNNING PROGRAM IGZESMG  WHICH STARTS AT 8006
         AT THE TIME OF INTERRUPT                           
         PSW     078D2000 8006F91A                         
         GPR 0-3 00FE08BA 0000007F 18F23F08 00000100       
         GPR 4-7 00033290 179F0798 17C3EB10 16FB9ED8       
         GPR 8-B 17A5A22C 88A82B62 16FB9110 16FBAED8       
         GPR C-F 0006954C 0006B000 96FBB5E6 0006F900       
         FLT 0-2 4E0000000000000D  41CE87FC7EB86120         
         FLT 4-6 41CE87F82FDFB800  0000000000000000         
CEE0374C CONDITION=CEE3204S TOKEN=00030C84 59C3C5C5 00000000
         WHILE RUNNING PROGRAM CEEPLPKA                     
         AT THE TIME OF INTERRUPT                           
         PSW     078D0000 887DC254                         
         GPR 0-3 00000000 0002A570 00000000 00000000       
         GPR 4-7 15C122E8 0006B000 00022518 15C12524       
         GPR 8-B 7F5A9A28 0002B49F 000207F0 887DC1A8       
         GPR C-F 00021B78 0002AA48 800182CA 887DC1A8       
CEE3798I ATTEMPTING TO TAKE A DUMP FOR ABEND U4083 TO DATA S
GD100I 3C29 ALLOCATED TO DDNAME SYS00001 DATACLAS (        )
EA822I COMPLETE TRANSACTION DUMP WRITTEN TO B1CDCA1.D132.T07
CEE3797I LANGUAGE ENVIRONMENT HAS DYNAMICALLY CREATED A DUMP
HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             275,000  L
HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             300,000  L
HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             325,000  L
HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             350,000  L
HASP375 B1CDCA1A ESTIMATE EXCEEDED BY             375,000  L
EA995I SYMPTOM DUMP OUTPUT  130                             
 USER COMPLETION CODE=4083 REASON CODE=00000002             
TIME=07.43.31  SEQ=09065  CPU=0000  ASID=00B1               
PSW AT TIME OF ERROR  078D1000   887E305A  ILC 2  INTC 0D   
  NO ACTIVE MODULE FOUND                                   
  NAME=UNKNOWN                                             
  DATA AT PSW  087E3054 - 00181610  0A0D9500  C39DA774     
  AR/GR 0: 95523C66/84000000   1: 00000000/84000FF3         
        2: 00000000/00006E68   3: 00000000/15C10DF0         
        4: 00000000/00047000   5: 00000000/000283F8         
        6: 00000000/15C1149C   7: 00000000/0002AA48         
        8: 00000000/000281B0   9: 00000000/00000002         
        A: 00000000/000207F0   B: 00000000/087E322C         
        C: 00000000/00021B78   D: 00000000/15C113F0         
        E: 00000000/887E3048   F: 00000000/00000002         
END OF SYMPTOM DUMP                                         
EC205I O3CTLFL,B1CDCA1A,S10A,FILESEQ=1, COMPLETE VOLUME LIST
SN=TST.NEW.PROD.GW51T16.CLI572T.CT51A,VOLS=L43037,TOTALBLOCK
EC205I O1TRANS,B1CDCA1A,S10A,FILESEQ=1, COMPLETE VOLUME LIST
SN=TST.NEW.PROD.GW51T16.CLI572T.FI51A,VOLS=L23344           
EF450I B1CDCA1A S10A - ABEND=S000 U4083 REASON=00000002  133
       TIME=07.43.46                                       
EF234E K 2778,I20603,PVT,B1CDCA1A,S10A                     
MS014  IEF234E K 2778,I20603,PVT,B1CDCA1A,S10A             
EF234E K 2846,L23344,PVT,B1CDCA1A,S10A                     
MS014  IEF234E K 2846,L23344,PVT,B1CDCA1A,S10A             
EF234E K 2827,L43037,PVT,B1CDCA1A,S10A                     
MS014  IEF234E K 2827,L43037,PVT,B1CDCA1A,S10A             
TEP S10A     ENDED U4083                                   
EF404I B1CDCA1A - ENDED - TIME=07.43.49                     
HASP395 B1CDCA1A ENDED                                     



I have tried some performance tuning of the code and still happens , searched through the forums but haven't got any solid answers for this.The general answer i get in all forums is that , it happens to inetrnal sort when the input is very high volume.

My program is compiled with AMODE (31) , Just for safer side I provided DATA 31 in CBL statement.

My program calls a subroutine , Which is also compiled with AMODE 31.Actually the subrotine is used after I release the sort (i.e) in the Output procedure , but My program fails during the Input procedure itself , some times it reaches till output procedure and fails.

Could anyone thow some lights on it.?
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 11070
Topics: 71
Location: San Jose

PostPosted: Thu May 13, 2010 12:01 am    Post subject: Reply with quote

mainframemouli wrote:
This program works fine for the small volume of data.My input file is of size 20499 , Variable block.


mainframemouli,

If I had to take an educated guess , I am guessing that you are reading the input file directly into the into SORT input procedure. Try reading into a working storage variable (change your READ statement) and move that working storage variable to Sort Input procedure.

Kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
mainframemouli
Beginner


Joined: 23 Feb 2005
Posts: 87
Topics: 33

PostPosted: Thu May 13, 2010 5:57 am    Post subject: Reply with quote

Actually , I did the same .as it was mentioned in another forum here.


Code:

MOVE INPUT-REC            TO OUTPUT-DETAIL-RECORD   
 
Do some process...

MOVE INP-SIZE TO SFD-SIZE2               
COMPUTE SFD-SIZE1 = (SFD-SIZE2 + 4)     
MOVE OUTPUT-DETAIL-RECORD TO SFD-RECORD2
RELEASE SFD-RECORD2X                     




Still getting the same error , Working on it lets c.
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 11070
Topics: 71
Location: San Jose

PostPosted: Thu May 13, 2010 10:23 am    Post subject: Reply with quote

mainframemouli wrote:
Actually , I did the same .as it was mentioned in another forum here.Still getting the same error , Working on it lets c.


mainframemouli,

bonk I never get this concept of posting on multiple forums and you did not read my post too well. Oh well I just noticed this
Code:

+WER999A B1CDCA1A,S10A    ,        -  UNSUCCESSFUL SORT FC7 U


I would appreciate if you follow this rule

http://www.mvsforums.com/helpboards/viewtopic.php?t=8248

Thanks,

Kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
mainframemouli
Beginner


Joined: 23 Feb 2005
Posts: 87
Topics: 33

PostPosted: Mon May 17, 2010 12:35 am    Post subject: Reply with quote

The job went through fine , I did the following.

1. Compiled the code with AMODE(31) ...Earlier I given compiler statement as 'CBL DATA(31)'.

Quote:

CBL DATA(31)
90001 IDENTIFICATION DIVISION.


But we found that along with the program , need to have a option element that mentions about the MODE to compile.



2. Requested a specialized class (only production support have access to that class) that provides more CPU% and Space and submitted job in that class.

The former option may not be a solution , its because the class provides more space , Not sure.


Kolusu,
Thanks for your help.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group