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 

IEBGENER return code -2871

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL)
View previous topic :: View next topic  
Author Message
misi01
Advanced


Joined: 02 Dec 2002
Posts: 618
Topics: 172
Location: Stockholm, Sweden

PostPosted: Wed Aug 22, 2018 3:41 am    Post subject: IEBGENER return code -2871 Reply with quote

I'm getting the above return code when running an IEBGENER from an ISPF panel driven by Rexx on a VERY large file.

Any suggestions as to what it could mean or how I can see some sort of results. The actual TSO commands being run are the following
Code:

"alloc f(SYSUT1) da('"old_dataset"') shr"

"ALLOC F(SYSUT3) UNIT(SYSDA) SPACE(10) CYLINDER reuse"

"ALLOC F(SYSUT4) UNIT(SYSDA) SPACE(10) CYLINDER reuse"

"ALLOC F(SYSPRINT) SYSOUT(R) LRECL(121) reuse"         

"ALLOC F(SYSIN) DUMMY LRECL(80) reuse"

ALLOC F(SYSUT2) DA('new_dataset') NEW VOLUME(IMST01)
SPACE(581,900) UNIT(SYSALLDA) LIKE('old_dataset') LRECL(18432) RECFM(F B S) BLKSIZE(18432)


I changed the SYSPRINT allocation to

"ALLOC FI(SYSPRINT) DA(*)"

and received the following
Quote:

>>> "IEBGENER"
DATA SET UTILITY - GENERATE
PAGE 0001

+++ RC(-2871) +++


The input file has 261270 records and after the failing return code, the output file has 66645 records.

Any suggestions ?
_________________
Michael
Back to top
View user's profile Send private message Send e-mail
Nic Clouston
Advanced


Joined: 01 Feb 2007
Posts: 1075
Topics: 7
Location: At Home

PostPosted: Wed Aug 22, 2018 4:42 am    Post subject: Reply with quote

Quote:
Any suggestions ?

Yes, 2.
1 - Use the ISPF copy facility - 3.whatever
2 - Run the GENER in batch.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.
Back to top
View user's profile Send private message
misi01
Advanced


Joined: 02 Dec 2002
Posts: 618
Topics: 172
Location: Stockholm, Sweden

PostPosted: Wed Aug 22, 2018 5:16 am    Post subject: Reply with quote

Don't want to do that since this is part of an "automated" copy of databases from A to B where all the work is done for the user under the covers.
_________________
Michael
Back to top
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12367
Topics: 75
Location: San Jose

PostPosted: Wed Aug 22, 2018 11:29 am    Post subject: Re: IEBGENER return code -2871 Reply with quote

misi01 wrote:

Code:

ALLOC F(SYSUT2) DA('new_dataset') NEW VOLUME(IMST01)
SPACE(581,900) UNIT(SYSALLDA) LIKE('old_dataset') LRECL(18432) RECFM(F B S) BLKSIZE(18432)


The input file has 261270 records and after the failing return code, the output file has 66645 records.

Any suggestions ?


Misi01,

Couple of Suggestions.

1. You specified the space but did NOT specify if it is Tracks/Cylinders/Blocks

2. You might be getting a B37 abends. Make sure you give the right space parameters.
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
misi01
Advanced


Joined: 02 Dec 2002
Posts: 618
Topics: 172
Location: Stockholm, Sweden

PostPosted: Mon Aug 27, 2018 2:51 am    Post subject: Reply with quote

Thanks Kolusu.

There were actually 2 errors/problems with the example I posted:

1 As you pointed out, no space parm such as CYLINDER (the code worked "better" after including that)

2 In reality, some of the files were SO large that they needed multiple disks and these simply weren't available. I could improve the error message by doing an OUTTRAP before the allocate command and then analyze the trapped messages afterwards, looking for these 2 strings
Quote:

IGD17279I
UNABLE TO ALLOCATE SPACE

after which I could give a better, more meaningful message.
_________________
Michael
Back to top
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12367
Topics: 75
Location: San Jose

PostPosted: Mon Aug 27, 2018 10:43 am    Post subject: Reply with quote

misi01,

Ideally I wouldn't use foreground process to copy large files. I would use a batch job. You can use the rexx to generate the JCL to be submitted, but I wouldn't use it to copy large datasets.
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL) 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