Why i have a B37 ?



JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc...

Why i have a B37 ?

Postby samb01 » Tue Dec 10, 2013 6:58 pm

Hello,

i can't anderstad why i have a b37 i this sysout :

VAM0096 DOES IT FIT SUPPORT REDUCE TO FIT OPERATION STARTING FOR       
VAM0096 EPKMDG11,SORT25,SORTOUT,XXX.YYY                                 
VAM0096 REDUCE TO FIT OPERATION SUCCESSFUL FOR                         
VAM0096 EPKMDG11,SORT25,SORTOUT,XXX.YYY                                 
VAM0096 SECONDARY REDUCED FROM 1000 CYL TO 93 CYL                       
IEC030I B37-04,IFG0554A,EPKMDG11,SORT25,SORTOUT,BD11,UPPR08,XXX.YYY     
IEA995I SYMPTOM DUMP OUTPUT  176                                       
SYSTEM COMPLETION CODE=B37  REASON CODE=00000004                       
 TIME=08.15.32  SEQ=02419  CPU=0000  ASID=0083                         
 PSW AT TIME OF ERROR  075C1000   80DE604C  ILC 2  INTC 0D             
   NO ACTIVE MODULE FOUND                                               
   NAME=UNKNOWN                                                         
   DATA AT PSW  00DE6046 - 4100303C  0A0DB20A  00509808                 
   AR/GR 0: A48C542A/00DE6254   1: 00000000/A4B37000                   
         2: 00000000/00008DF8   3: 00000000/00DE6218                   
         4: 00000000/00A0E4A8   5: 00000000/00DFD000                   
        6: 00000000/00A0E74C   7: 00000000/00A0E7A4                 
        8: 00000000/00A0E76C   9: 00000000/00A1EAD8                 
        A: 00000000/00A29B98   B: 00000000/00DE5D32                 
        C: 00000000/00A544FC   D: 00000000/7F6A9D20                 
        E: 00000000/00DE5D32   F: 00000000/00000004                 
END OF SYMPTOM DUMP                                                 



The dataset is allocated like it :

//SORTOUT   DD DSN=XXX.YYY,                                   
//          DISP=(NEW,CATLG),UNIT=DISK,                       
//          DCB=(RECFM=VB,LRECL=626,BLKSIZE=27998),           
//          SPACE=(CYL,(4000,1000),RLSE),&NBVOLS             
//*                                                           



 DSN=XXX.YYY,DISP=(NEW,CATLG),UNIT=DISK,DCB=(RECFM=VB,   
ACE=(CYL,(4000,1000),RLSE),VOL=(,,,30),DSNTYPE=LARGE     



In the sysout we can see :

IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD101I SMS ALLOCATED TO DDNAME (SORTOUT )                           
        DSN (XXX.YYY                                     )           
        STORCLAS (SCPREPUP) MGMTCLAS (        ) DATACLAS (PRODSEQU)   
        VOL SER NOS= UPPR14                                           
IEF237I JES2 ALLOCATED TO SYSOUT                                     
IEF237I JES2 ALLOCATED TO SYSPRINT                                   
IEF237I JES2 ALLOCATED TO SYSIN                                       



I can't anderstand why the dataset didn't continue to allocate secondary space in other disk... I falled in B37 directly without trying to allocate space on other disk.


After an other submit, we succes to allocate de dataset :

$HASP373 EPKMDG11 STARTED - INIT 46   - CLASS O - SYS U011             
IEF403I EPKMDG11 - STARTED - TIME=09.28.51                             
VAM0096 DOES IT FIT SUPPORT REDUCE TO FIT OPERATION STARTING FOR       
VAM0096 EPKMDG11,SORT25,SORTOUT,XXX.YYY                                 
VAM0096 REDUCE TO FIT OPERATION SUCCESSFUL FOR                         
VAM0096 EPKMDG11,SORT25,SORTOUT,XXX.YYY                                 
VAM0096 SECONDARY REDUCED FROM 1000 CYL TO 592 CYL                     
-                                         --TIMINGS (MINS.)--           
-JOBNAME  STEPNAME PROCSTEP    RC   EXCP    CPU    SRB  CLOCK   SERV  PG
-IEFACTRT          SORT25      00   994K   3.86    .24 101.58 67910K   0



The dataset was allocated like that :

    DD DSN=XXX.YYY,                                                 
    DISP=(NEW,CATLG),UNIT=DISK,                                     
    DCB=(RECFM=VB,LRECL=626,BLKSIZE=27998),                         
    SPACE=(CYL,(4000,1000),RLSE),VOL=(,,,40),DSNTYPE=LARGE           



We can see that on the sysout

IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD103I SMS ALLOCATED TO DDNAME                                       
IGD101I SMS ALLOCATED TO DDNAME (SORTOUT )                           
        DSN (XXX.YYY                                     )           
        STORCLAS (SCPREPUP) MGMTCLAS (        ) DATACLAS (PRODSEQU)   
        VOL SER NOS= UPPR45                                           



At the end of the sort we have :
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                 
ICE751I 0 C5-K76982 C6-K90026 C7-K94453 C8-K94453 E9-K60824 C9-BASE   E
ICE143I 0 BLOCKSET     SORT  TECHNIQUE SELECTED                       
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EX
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 09:28
           SORT FIELDS=(9,9,CH,A)                                     
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                 
ICE751I 0 C5-K76982 C6-K90026 C7-K94453 C8-K94453 E9-K60824 C9-BASE   E
ICE193I 0 ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT
ICE252I 1 PARMLIB OPTIONS WERE MERGED WITH INSTALLATION MODULE DEFAULTS
ICE088I 0 EPKMDG11.SORT25  .        , INPUT LRECL = 626, BLKSIZE = 2799
ICE093I 0 MAIN STORAGE = (MAX,67108864,67108864)                       
ICE156I 0 MAIN STORAGE ABOVE 16MB = (67182576,67051504)               
ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N
ICE128I 0 OPTIONS: SIZE=67108864,MAXLIM=1048576,MINLIM=450560,EQUALS=Y,
ICE129I 0 OPTIONS: VIO=Y,RESDNT=ALL ,SMF=NO   ,WRKSEC=Y,OUTSEC=Y,VERIFY
ICE130I 0 OPTIONS: RESALL=131072,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=N,OUT
ICE131I 0 OPTIONS: TMAXLIM=8388608,ARESALL=131072,ARESINV=0,OVERRGN=655
ICE132I 0 OPTIONS: VLSHRT=Y,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE
ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLON
ICE235I 0 OPTIONS: NULLOUT=RC0                                         
ICE236I 0 OPTIONS: DYNAPCT=10 ,MOWRK=Y                                 
ICE084I 0 EXCP ACCESS METHOD USED FOR SORTOUT                         
ICE084I 0 EXCP ACCESS METHOD USED FOR SORTIN                           
ICE750I 0 DC 112284017982 TC 0 CS DSVRR KSZ 13 VSZ 13                 
ICE752I 0 FSZ=112284017982 BC  IGN=0 E  AVG=320 0  WSP=149099185 C  DYN
ICE751I 1 D8-K58148 D4-K59452 EA-K83080 F1-K58148 E8-K94453           
ICE090I 0 OUTPUT LRECL = 626, BLKSIZE = 27998, TYPE = VB               
ICE055I 0 INSERT 0, DELETE 0                                           
ICE054I 0 RECORDS - IN: 544858651, OUT: 544858651                     
ICE134I 0 NUMBER OF BYTES SORTED: 111064374579                         
ICE253I 0 RECORDS SORTED - PROCESSED: 544858651, EXPECTED: 358734881   
ICE098I 0 AVERAGE RECORD LENGTH - PROCESSED: 203, EXPECTED: 313       
ICE165I 0 TOTAL WORK DATA SET TRACKS ALLOCATED: 1998000 , TRACKS USED:
ICE199I 0 MEMORY OBJECT USED AS MAIN STORAGE = 0M BYTES               
ICE299I 0 MEMORY OBJECT USED AS WORK STORAGE = 0M BYTES               
ICE180I 0 HIPERSPACE STORAGE USED = 0K BYTES                           
ICE188I 0 DATA SPACE STORAGE USED = 0K BYTES                           
ICE052I 0 END OF DFSORT       



I can't anderstand why it didn't work the first time..

Thank's for your help.
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Re: Why i have a B37 ?

Postby NicC » Tue Dec 10, 2013 7:05 pm

Probably because there was insufficient space to meet the requirements. While the job was down space became freed up from some other job so when you resubmitted there was now sufficient space.
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times

Re: Why i have a B37 ?

Postby samb01 » Tue Dec 10, 2013 7:58 pm

We are sur there was space enought during the submit.
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Re: Why i have a B37 ?

Postby Akatsukami » Tue Dec 10, 2013 8:34 pm

Did you notice that your shop's Does It Fit utility reduced the secondary allocation to 93 cylinders the first time but to 592 cylinders the second?
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: Why i have a B37 ?

Postby samb01 » Tue Dec 10, 2013 8:36 pm

Yes i noticed it. But i can't anderstand why, after a reduce to 93 cylinders, it didn't extended to othed volumes the first time ?
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Re: Why i have a B37 ?

Postby Robert Sample » Tue Dec 10, 2013 9:18 pm

You need to talk to your site's storage management group. Site policies for storage management vary widely and depend upon the specific software installed at the site, so only someone working at your site will be able to help identify exactly what happened with your job.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: Why i have a B37 ?

Postby samb01 » Wed Dec 11, 2013 3:41 pm

Hello Robert Sample, i talked to my site's storage management group, but they told me they can't analyse the problème because the file doesn't exist anymore...
So they can't see how much volume the file took, etc...

I am wonderinf if it's not because of the "the Space Constraint Relief Attributes" in the dataclass..


Data Set Name Type  . . . . . :                                               
  If Extended . . . . . . . . :                                               
  Extended Addressability . . : NO                                             
  Record Access Bias  . . . . :                                               
Space Constraint Relief . . . : YES                                           
  Reduce Space Up To (%)  . . : 50                                             
  Dynamic Volume Count  . . . :                                               
Compaction  . . . . . . . . . :                                               
Spanned / Nonspanned  . . . . :                                               
Media Interchange                                                             
  Media Type  . . . . . . . . :                                               
  Recording Technology  . . . :                                               
  Performance Scaling . . . . :                                               
  Performance Segmentation  . :                                               
Use UP/DOWN Command to View other Panels;                                     




When the data set reduce more than 50%, it abend to B37, may be....
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Re: Why i have a B37 ?

Postby j2422tw » Thu Jan 02, 2014 3:38 pm

By your JCL:

ACE=(CYL,(4000,1000),RLSE),VOL=(,,,30),DSNTYPE=LARGE

Your dataset can extend to maximum 30 volumes, so the at least primary space is 4000 * 30 = 120,000 CYL, this value is very close to your SORT message record processed count out and record length :

ICE253I 0 RECORDS SORTED - PROCESSED: 544858651, EXPECTED: 358734881
ICE098I 0 AVERAGE RECORD LENGTH - PROCESSED: 203, EXPECTED: 313

I think the total storage free space is enough to create the dataset, but the total volume count write in JCL is too small.

Can you try to increase it to the maximum limit 59 volumes :

SPACE=(CYL,(4000,1000),RLSE),VOL=(,,,59),DSNTYPE=LARGE
j2422tw
 
Posts: 25
Joined: Wed Sep 19, 2007 9:46 am
Has thanked: 0 time
Been thanked: 0 time

Re: Why i have a B37 ?

Postby steve-myers » Thu Jan 02, 2014 5:58 pm

Another issue: SPACE=(CYL,(4000,1000)). When the system extends the data set on a new volume, the initial allocation is 1000 cylinders, not 4000 cylinders.
steve-myers
Global moderator
 
Posts: 2105
Joined: Thu Jun 03, 2010 6:21 pm
Has thanked: 4 times
Been thanked: 243 times

Re: Why i have a B37 ?

Postby samb01 » Thu Jan 02, 2014 6:22 pm

Hello steve-myers,

could you explain me why ?
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Next

Return to JCL