IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Second communication space area exceeded
IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL
PostPosted: Wed Mar 17, 2010 12:51 am
 Reply with quote
I'm getting this error with 278 statements related to the BUILD command.

Code:

ICE085A S SECOND COMMUNICATION AREA SPACE EXCEEDED -  - ADD AT LEAST 0K BYTES TO REGION     


I have tried REGION=0M, REGION=6M, and REGION=8M in the JOB card.

Is there a fix for this error or do I need to start splitting up my ICETOOL step?
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
PostPosted: Wed Mar 17, 2010 12:56 am
 Reply with quote
"0K BYTES" in the message indicates that adding storage will not help.

Show me an example of the DFSORT statements you're using (not all 278 - just enough to show the pattern).
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL
PostPosted: Wed Mar 17, 2010 1:00 am
 Reply with quote
I am attempting to generate about 300 output records for every input record.

Code:

 BUILD=(1:C' PE KXIA.*.',12:6,2,14:8,4,18:C'.** ID(ERA',28:8,3,
        31:C'PP) ACCESS(ALTER) GEN',/,                         
       1:C' PE KXIA.*.',12:6,2,14:8,4,18:C'.** ID(ERR',28:8,3,
        31:C'PP) ACCESS(READ) GEN',/,                         
       1:C' PE KXIC.',10:6,2,12:8,4,16:C'.** ID(ERA',26:8,3,   
        26:C'PP) ACCESS(ALTER) GEN',/,                         
       1:C' PE KXIC.',10:6,2,12:8,4,16:C'.** ID(ERR',26:8,3,   
        26:C'PP) ACCESS(READ) GEN',/,                         
       1:C' PE KXII.*.',12:6,2,14:8,4,18:C'.** ID(ERA',28:8,3,
        31:C'PP) ACCESS(ALTER) GEN',/,                         
       1:C' PE KXII.*.',12:6,2,14:8,4,18:C'.** ID(ERR',28:8,3,
        31:C'PP) ACCESS(READ) GEN',/,                         
       1:C' PE KXIO.',10:6,2,12:8,4,16:C'.** ID(ERA',26:8,3,   
        26:C'PP) ACCESS(ALTER) GEN',/,                         
       1:C' PE KXIO.',10:6,2,12:8,4,16:C'.** ID(ERR',26:8,3,   
        26:C'PP) ACCESS(READ) GEN',/,                         
       1:C' PE KXIP.*.',12:6,2,14:8,4,18:C'.** ID(ERA',28:8,3,
        31:C'PP) ACCESS(ALTER) GEN',/,                         
       1:C' PE KXIP.*.',12:6,2,14:8,4,18:C'.** ID(ERR',28:8,3,
        31:C'PP) ACCESS(READ) GEN',/,                       
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
PostPosted: Wed Mar 17, 2010 1:46 am
 Reply with quote
That's too many BUILD items. You can break it up into multiple IFTHEN WHEN=INIT clauses - not sure how many items you can get in each one, but you can experiment with that.
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL
PostPosted: Wed Mar 17, 2010 1:50 am
 Reply with quote
Frank...Thank you for your response. I'll break the job into two parts. I have a habit of stress testing the products I work with.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose
PostPosted: Wed Mar 17, 2010 2:00 am
 Reply with quote
cpuhawg wrote:
I am attempting to generate about 300 output records for every input record.


Cpuhawg,

I Think REPEAT parm can be used to generate the output. I see that the only thing which really is changing is PE KXI*. If you can show me the different possible values , I will show you a way to do it using Repeat
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL
PostPosted: Wed Mar 17, 2010 5:54 pm
 Reply with quote
Thank you for the offer. In my adhoc job, I'm reading 255 input records and generating 140 unique RACF commands per input record. Fields from the input record are placed in each of the output records.

I was successful splitting the job and executing the RACF commands each job produced. I have reviewed the use of the REPEAT command in the PDF manual, but I don't think it was appropriate for my current project.

Thanks again.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen
PostPosted: Wed Mar 17, 2010 6:15 pm
 Reply with quote
F.W.I.W. I once had to create a lot of RACF statements too for something
around 1700 ATM's, like :

AU
ALU
CO
RDEF
RALT
PE
RACDCERT

For that I used a REXX to create all de RACF statements.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 

Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts ISPP330 BDISPMAX exceeded CLIST & REXX 12
No new posts Merge 2 lines based on Space from a S... DFSORT/ICETOOL 5
No new posts Allocated space calculation from DCOL... PL/I & Assembler 3
No new posts split a name based on space in ASM PL/I & Assembler 9
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us