shailesh_85 Currently Banned New User
Joined: 10 Mar 2007 Posts: 7 Location: mumbai
|
|
|
|
Hi,
I am not able to run compress jcl using IEBCOPY utility.
Here is the system messages when i run it.
IEB1135I IEBCOPY FMID HDZ11D0 SERVICE LEVEL UW51728 DATED 19980903 DFSMS 1.4.
IEB1035I COMPRESS STEP1 05:17:15 THU 22 MAR 2007 PARM='1M'
IEB1024E SYNTAX ERROR IN PARM FIELD OPTIONS
IEB1057I VL GETMAIN REQUESTED 250K TO 1M BYTES. OBTAINED 1M.
COPY INDD=FILE,OUTDD=FILE
IEB183I END OF FILE READ ON LOAD DATA SET REFERENCED BY FILE
IEB1056I RELEASED 1016K ADDITIONAL BYTES.
IEB151I JOB HAS TERMINATED WITH ERROR(S)
IEB147I END OF JOB - 8 WAS HIGHEST SEVERITY CODE
Can anyone help me please?
Thanks & Regards
Shailesh |
|
timburkart
New User
Joined: 17 Mar 2007 Posts: 29 Location: USA
|
|
|
|
I am responding without being able to test this first. It seems like your library may actually have been compressed.
IEB1056I RELEASED 1016K ADDITIONAL BYTES.
The error message references PARM='1M'. I have never needed to allocate any additional memory for an IEBCOPY function. Having the SYSUT3 and SYSUT4 for workspace should be sufficient.
The only thing I noticed was the fact you specified DISP=MOD.
//FILE DD DSN=OSOP.SRA1O.DATA2,DISP=MOD
Again, I have never used that. I would recommend DISP=OLD for a compress job. You must ensure the integrity of the library.
Regards,
tim |
|
timburkart
New User
Joined: 17 Mar 2007 Posts: 29 Location: USA
|
|
|
|
I ran your JCL this morning and got the same error:
//REPLACE EXEC PGM=IEBCOPY,PARM='1M'
//SYSPRINT DD SYSOUT=*
//MAPIN DD DISP=MOD,DSN=HWGT.HWGS342.CLIST
//SYSUT3 DD UNIT=TMPDA,
// SPACE=(TRK,(1,1))
//SYSUT4 DD UNIT=TMPDA,
// SPACE=(TRK,(1,1))
//SYSIN DD *
COPY INDD=MAPIN,OUTDD=MAPIN
/*
IEB1035I HWGS342C REPLACE 10:15:31 THU 22 MAR 2007 PARM='1M'
IEB1024E SYNTAX ERROR IN PARM FIELD OPTIONS
COPY INDD=MAPIN,OUTDD=MAPIN
IEB1018I COMPRESSING PDS OUTDD=MAPIN VOL=SMS184 DSN=HWGT.HWGS342.CLIST
However when I changed PARM='1M' to REGION=1M it finished with a return code of 0.
//REPLACE EXEC PGM=IEBCOPY,REGION=1M
//SYSPRINT DD SYSOUT=*
//MAPIN DD DISP=MOD,DSN=HWGT.HWGS342.CLIST
//SYSUT3 DD UNIT=TMPDA,
// SPACE=(TRK,(1,1))
//SYSUT4 DD UNIT=TMPDA,
// SPACE=(TRK,(1,1))
//SYSIN DD *
COPY INDD=MAPIN,OUTDD=MAPIN
/*
IEB1035I HWGS342C REPLACE 10:14:48 THU 22 MAR 2007 PARM=''
COPY INDD=MAPIN,OUTDD=MAPIN
IEB1018I COMPRESSING PDS OUTDD=MAPIN VOL=SMS184 DSN=HWGT.HWGS342.CLIST |
|