Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

I am getting the following error ; IGD01020I

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
balasu

New User


Joined: 10 Jul 2008
Posts: 23
Location: bangalore

PostPosted: Thu Jul 16, 2009 7:19 pm    Post subject: I am getting the following error ; IGD01020I
Reply with quote

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
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Jul 16, 2009 7:25 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
balasu

New User


Joined: 10 Jul 2008
Posts: 23
Location: bangalore

PostPosted: Thu Jul 16, 2009 7:36 pm    Post subject:
Reply with quote

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
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7931
Location: Bellevue, IA

PostPosted: Thu Jul 16, 2009 8:54 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm
No new posts Error IEC161I 052(009,XXXRS00)-084 wh... amitc23 JCL & VSAM 10 Wed Oct 12, 2016 5:00 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us