Vinodch
Beginner
Joined: 23 Dec 2002
Posts: 80
Topics: 32
Location: Chennai, India
|
 Posted: Fri Dec 02, 2005 2:48 am Post subject: TAPELIB VALIDATION ERROR |
 |
|
I am getting the following error in executing the below mentioned JCL:
Any Help what causing the error ? | Code: |
_________________________________________________________ :?:
IEB120I TAPELIB VALIDATION ERROR
IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64 BYTES LONG -- ACTUAL VALUE IS X'000280'
IEB1030I DDNAME TAPELIB REFERS TO PDSU DATA SET ON VOLUME 077837 NAMED VVN6152.
IEB1030I DDNAME DISKLIB REFERS TO PDS DATA SET ON VOLUME PDS000 NAMED VKR1720.
IEB166I NO MEMBERS LOADED TO DATA SET REFERENCED BY DISKLIB
IEB151I JOB HAS TERMINATED WITH ERROR(S)
IEB147I END OF JOB - 8 WAS HIGHEST SEVERITY CODE
_______________________________
//INSTLIBS PROC TAPE=TAPE,
// WRKUNIT=SYSDA,
// LIBUNIT=SYSDA,
// DISKVOL=,
// TAPEVOL=,
// OUT='*',
// PRIQTY=1,SECQTY=1,DIRQTY=1, /* SPACE IS IN BLOCKS /*
// RECFM=U,LRECL=0,BLKSIZE=6144,
// DISKLIB=,TAPELIB=
//*
//ICOPY EXEC PGM=IEBCOPY
//TAPELIB DD DSN=&TAPELIB,DISP=OLD,LABEL=(&FILENUM,SL),
// UNIT=(&TAPE,,DEFER),
// VOL=SER=&TAPEVOL
//DISKLIB DD DSN=&DISKLIB,DISP=(,CATLG,DELETE),
// UNIT=&LIBUNIT,
// VOL=SER=&DISKVOL,
// SPACE=(&BLKSIZE,(&PRIQTY,&SECQTY,&DIRQTY),,,ROUND),
// DCB=(DSORG=PO,RECFM=&RECFM,LRECL=&LRECL,BLKSIZE=&BLKSIZE)
//SYSUT3 DD UNIT=&WRKUNIT,SPACE=(CYL,(1,1))
//SYSUT4 DD UNIT=&WRKUNIT,SPACE=(CYL,(1,1))
//SYSPRINT DD SYSOUT=&OUT
//SYSIN DD DUMMY
// PEND /* END OF INSTLIBS /*
//HLOAD EXEC INSTLIBS,FILENUM=1,
// RECFM=U,LRECL=0,BLKSIZE=6144,
// PRIQTY=10,SECQTY=5,DIRQTY=5,
// DISKVOL='',
// TAPEVOL='077837',
// DISKLIB='VKR1720.TSTS.HEWLOAD.LOADLIB',
//* TAPELIB='HEWV100.LOADLIB'
// TAPELIB='VVN6152.PRDS.HEWLOD'
//SYSIN DD *
COPY INDD=TAPELIB,OUTDD=DISKLIB
//*
|
_________________
Thanks,
Vinod. |
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
