I am getting the following error ; IGD01020I

balasu · New User Joined: 10 Jul 2008 Posts: 23 Location: bangalore

Hi Team,
I ran a jcl to upload a file from disk to tape. and while performing this, I am getting error as like below. Could any one help me out on the issue. PLease advise.

The code:
//BACKUP00 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=TEST1.file.output,
// DISP=SHR
//SYSUT2 DD DSN=TEST.D070609.CNV2,
// DISP=(NEW,CATLG,DELETE),
// UNIT=CART,
// VOL=(,,,45),
// LABEL=(,,EXPDT=99000),
//* LABEL=(1,SL,EXPDT=10000),
// DCB=(*.SYSUT1)
//SYSIN DD DUMMY

The error I am getting is:

STMT NO. MESSAGE

43 IEF604I EXPDT SUBPARAMETER OF LABEL KEYWORD SPECIFIES ZERO DAYS VALUE
38 IGD01020I NSL/LTM LABEL TAPES ARE NOT ALLOWED IN TAPE LIBRARY
AND/OR A NON-LIBRARY VOLUME IS SPECIFIED
******************************* BOTTOM OF DATA *******************************

Thanks,
Bala.M

expat · Posted: Thu Jul 16, 2009 7:25 pm

Thry the following

1) I would use SORT with OPTION COPY rather than IEBGENER, although ICEGENER may automatically be substituted for IEBGENER, as it is usually faster.

2) LABEL=(,,EXPDT=99000),
EXPDT is a parameter in its own right, try using EXPDT=99000 instead.

3) DCB=(*.SYSUT1)
Why do you want to use DASD DCB for tape, just code the RECFM and LRECL parameters for the output and let the system decide the optimum blocksize.

balasu · New User Joined: 10 Jul 2008 Posts: 23 Location: bangalore

Team,

I modified the job as follows and got output as follows:

//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=TEST1.INC.M.INC0120.MASTER.G419.D070609.CNV,
// DISP=SHR
//SYSUT2 DD DSN=TEST.D070609.CNV2,
// DISP=(NEW,CATLG,DELETE),
// UNIT=CART,
// VOL=(,,,45),
// LABEL=(EXPDT=99000),
//* LABEL=(1,SL,EXPDT=10000),
// DCB=(LRECL=320,RECFM=FB)
//*SYSIN DD DUMMY
//SYSIN DD *
SORT FILEDS=COPY
/*

output:

STMT NO. MESSAGE
-
43 IEF604I EXPDT SUBPARAMETER OF LABEL KEYWORD SPECIFIES ZERO DAYS VALUE
38 IGD01020I NSL/LTM LABEL TAPES ARE NOT ALLOWED IN TAPE LIBRARY
AND/OR A NON-LIBRARY VOLUME IS SPECIFIED

Please advise,. Thanks,Bala.M

Robert Sample · Posted: Thu Jul 16, 2009 8:54 pm

CA-1 Tape Management System reserves 98000 and 99000 expiration dates to mean specific things -- namely, to scratch a tape GDG when the generation rolls off, and to specify an external tape is being processed that is not under CA-1 control. You cannot normally specify 000 as the last three digits of an expiration date; this is the first message you're getting.

The IDG01020I message requires you to consult with your site support group -- either the SMS routines do not allow you to code your JCL as you have specified, or there is some other reason the system thinks you're creating a non-labeled tape (or using a volume not already in the tape library) as the message indicates.