Space referred to is virtual storage. The explanation for message IEW4000I 
makes that quite plain. Run the receive job with a larger region size. I 
typically use REGION=0M for SMP/e jobs.

Ant.
Northern Territory Govt., Australia

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
SAURABH KHANDELWAL
Sent: Friday, 8 April 2011 2:44 AM
To: IBM-MAIN@bama.ua.edu
Subject: RSU Receive Error

Hello,
            I am trying receiving RSU in to system. My unzip step 
completed successfully, but in REC step I am getting below error for the 
insufficient space.
           But I am able to know, where exactly the system is getting 
insufficient space.

Error :
IEW4000I FETCH FOR MODULE IDCAMS   FROM DDNAME -LNKLST- FAILED BECAUSE 
INSUFFICFFICIENT STORAGE WAS AVAILABLE.
CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCAMS  , RETURN CODE 24, 
REASON CODE 26080021, DDNAME *LNKLST*


JCL used

//RSU1008C JOB (3623),'Saurabh',MSGCLASS=X,CLASS=A,
//             NOTIFY=&SYSUID
//UNZIP    EXEC PGM=GIMUNZIP,PARM='HASH=NO'
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50))
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50))
//SMPOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPDIR   DD PATH='/u/zos18',
//            PATHDISP=KEEP
//SYSIN    DD DATA,DLM=$$
<GIMUNZIP>
<ARCHDEF
name="SMPPTFIN/S0001.SHOPZ.S5192595.SMPMCS.pax.Z"
volume="SPACD9"
newname="SMPE.TEC1008.S5192595.SMPMCS">
</ARCHDEF>
<ARCHDEF
name="SMPHOLD/S0002.SHOPZ.S5192595.SMPHOLD.pax.Z"
volume="SPACD9"
newname="SMPE.TEC1008.S5192595.SMPHOLD">
</ARCHDEF>
</GIMUNZIP>
$$
//REC  EXEC PGM=IKJEFT01,COND=(4,LT,UNZIP)
//SMPCSI   DD DISP=SHR,
//            DSN=SMPE.BIN8.GLOBAL.CSI
//SMPPTS   DD DISP=OLD,
//            DSN=SMPE.BIN8.SMPPTS
//SMPOUT   DD SYSOUT=*
//SMPRPT   DD SYSOUT=*
//SMPLIST  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPLOG   DD SYSOUT=*
//SMPLOGA  DD DUMMY
//SYSUT1   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT2   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT3   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SYSUT4   DD UNIT=3390,SPACE=(CYL,(100,50)),DISP=(,DELETE)
//SMPCNTL  DD DATA,DLM=$$
SET    BOUNDARY (GLOBAL)
               .
RECEIVE
               .
$$
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DATA,DLM=$$
ALLOC FI(SMPPTFIN) SHR DA('SMPE.TEC1008.S5192595.SMPMCS')
ALLOC FI(SMPHOLD)  SHR DA('SMPE.TEC1008.S5192595.SMPHOLD')
CALL *(GIMSMP)
$$

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

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

Reply via email to