v***@public.gmane.org
2010-05-17 18:51:58 UTC
I know this is not a new issue but I am running into the same wall as
others before me.
I am trying to install IND$FILE and I get this messages when I run the JCL
out of the box:
//LOADTAPE JOB (JCLLIB),
// 'LOADTAPE',
// CLASS=A,NOTIFY=HERC01,
//* MSGCLASS=A,
// MSGLEVEL=(0,0)
//IND$FILE EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSUT3 DD UNIT=SYSDA,SPACE=(TRK,(1,1))
//SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(1,1))
//TAPE DD DSN=IND$FILE.LOAD,
// UNIT=TAPE,
// LABEL=(1,SL,,,EXPDT=98000),
// VOL=(,RETAIN,,,SER=INDFIL),
// DISP=(OLD,PASS)
//DISK DD DSN=SYS2.CMDLIB,DISP=SHR
//SYSIN DD *
COPY INDD=TAPE,OUTDD=DISK
SELECT MEMBER=((IND$FILE,,R),CODEPAGE,CDPG1047,CDPG037)
/*
//DBSTOP EXEC DBSTOP
//DBSTART EXEC DBSTART
the message reads:
12.30.52 JOB 14 IEC502E R 480, ,NL,LOADTAPE,IND$FILE
12.30.52 JOB 14 *IEC501A M 480,INDFIL,SL,6250 BPI,LOADTAPE,IND$FILE
It tells me that the tape file is unlabeled
When I change it to:
// LABEL=(1,NL,,,EXPDT=98000),
I get these other messages:
12.52.02 JOB 20 IEF403I LOADTAPE - STARTED - TIME=12.52.02
12.52.02 JOB 20 *IEF233A M 481,INDFIL,,LOADTAPE,IND$FILE
12.52.46 JOB 20 IEA000I 481,EQC,3F,0E00,,,INDFIL,LOADTAPE,12.52.46
12.52.46 JOB 20 IEA000I
481,,,,1020000000C003600000000000800100010000FFFF000000,0000
12.52.46 JOB 20 IEC210I
214-08,IFG0202F,LOADTAPE,IND$FILE,TAPE,481,INDFIL,IND$FILE.LOAD
12.52.46 JOB 20 IEF450I LOADTAPE IND$FILE - ABEND S214 U0000 -
TIME=12.52.46
12.52.46 JOB 20 IEFACTRT - Stepname Procstep Program Retcode
12.52.46 JOB 20 LOADTAPE IND$FILE IEBCOPY AB S214
I also have tried bypassing label process and does not work either.
Any hints??????
Carlos Aguilera
others before me.
I am trying to install IND$FILE and I get this messages when I run the JCL
out of the box:
//LOADTAPE JOB (JCLLIB),
// 'LOADTAPE',
// CLASS=A,NOTIFY=HERC01,
//* MSGCLASS=A,
// MSGLEVEL=(0,0)
//IND$FILE EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSUT3 DD UNIT=SYSDA,SPACE=(TRK,(1,1))
//SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(1,1))
//TAPE DD DSN=IND$FILE.LOAD,
// UNIT=TAPE,
// LABEL=(1,SL,,,EXPDT=98000),
// VOL=(,RETAIN,,,SER=INDFIL),
// DISP=(OLD,PASS)
//DISK DD DSN=SYS2.CMDLIB,DISP=SHR
//SYSIN DD *
COPY INDD=TAPE,OUTDD=DISK
SELECT MEMBER=((IND$FILE,,R),CODEPAGE,CDPG1047,CDPG037)
/*
//DBSTOP EXEC DBSTOP
//DBSTART EXEC DBSTART
the message reads:
12.30.52 JOB 14 IEC502E R 480, ,NL,LOADTAPE,IND$FILE
12.30.52 JOB 14 *IEC501A M 480,INDFIL,SL,6250 BPI,LOADTAPE,IND$FILE
It tells me that the tape file is unlabeled
When I change it to:
// LABEL=(1,NL,,,EXPDT=98000),
I get these other messages:
12.52.02 JOB 20 IEF403I LOADTAPE - STARTED - TIME=12.52.02
12.52.02 JOB 20 *IEF233A M 481,INDFIL,,LOADTAPE,IND$FILE
12.52.46 JOB 20 IEA000I 481,EQC,3F,0E00,,,INDFIL,LOADTAPE,12.52.46
12.52.46 JOB 20 IEA000I
481,,,,1020000000C003600000000000800100010000FFFF000000,0000
12.52.46 JOB 20 IEC210I
214-08,IFG0202F,LOADTAPE,IND$FILE,TAPE,481,INDFIL,IND$FILE.LOAD
12.52.46 JOB 20 IEF450I LOADTAPE IND$FILE - ABEND S214 U0000 -
TIME=12.52.46
12.52.46 JOB 20 IEFACTRT - Stepname Procstep Program Retcode
12.52.46 JOB 20 LOADTAPE IND$FILE IEBCOPY AB S214
I also have tried bypassing label process and does not work either.
Any hints??????
Carlos Aguilera