On Wed, 18 Jul 2007 11:57:22 +0300, גדי בן  
&#1488;&#1489;&#1497; <[EMAIL PROTECTED]> wrote:

>Hi,
> 
>A user is running a job that copies a file from one 3590B to another.
>The file is an ADABAS backup.
> 
>We've just upgraded to ADABAS v7.4.4.
> 
>We are running z/OS 1.7.
> 
>As the subject says we are using IEBGENER.
> 
>We started out with a REGION of 4M, increased it to 8M and then 0M. All
ended with the same abend.
> 
>This is the job we are using:
>//B155B1DM   JOB   (00,P,305),COPY-DRIVE-1,CLASS=X,PRTY=9,            
>//   MSGCLASS=X,NOTIFY=V120KBY                                        
>//COPY   EXEC   PGM=IEBGENER,TIME=100,REGION=0M
>//SYSPRINT  DD   SYSOUT=*                                             
>//SYSUT1  DD  DSN=B306.PDBN.GBYOMI.DRIVE1(0),DISP=OLD,DCB=BUFNO=30
>//SYSUT2  DD  DSN=B279.PBKK.OFFSITE.ADABAS.DRIVE1(+1),                
>//       DISP=(,CATLG,DELETE),                                        
>//       UNIT=3590-1, 
>//       VOL=(,,,90),DCB=(MODEL,BUFNO=30)
>//SYSIN   DD   DUMMY                                                  
>//*                                                                   
>
>The DCB for the input file is LRECL=32756, BLKSIZE=229376,RECFM=VB,
> 
>The DCB has changed from our previous version of ADABAS. In the previous
version it was 32760
> 

Well, lets see... 30 buffers x 229376 (224K) = 6.7M.    That is just for one
DD.  6.7M * 2 is more than the private area below the line.   And just
because you used REGION=0M doesn't mean you have all of it 
available (IEFUSI could be modifying it). 

Lose the BUFNO.

What was the old blksize?     

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group:  G-ITO
mailto:[EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to