Ed
Depending on what exactly you want to do, and if you have File-AID MVS. You
can probably get The File-AID MVS Batch to do your mentioned steps. In fact
chances are that it would run more efficiently as well.
Just a thought
Robert Galambos
Compuware Senior Technical Specialist
IBM Certified Solutions Expert -
DB2 UDB for OS/390 V7 Database Administration
[EMAIL PROTECTED]
Tel: +1 905 866 7000
Toll Free: +1 800 263 7189
Fax: +1 905 886 7023
Quebec: +1 877-281-1888
Compuware Canada
Service is our best product
Les renseignements contenus dans le présent message électronique sont
confidentiels et concernent exclusivement le(s) destinataire(s) désigné(s).
Il est strictement interdit de distribuer ou de copier ce message. Si vous
avez reçu ce message par erreur, veuillez répondre par courriel à
l'expéditeur et effacer ou détruire toutes les copies du présent message.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Ed. Benoit
Sent: October 26, 2005 11:46 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Repro VSAM to Tape problem
Hello,
I am attempting to copy repro a vsam file to tape and back. On the copy to
tape I am getting IEC141I 013-34 The manual give me several options.
What
am I doing incorrect to copy to tape and back to disk. Any one have a
jobstreamt to repro vsam to tape and back to disk.
The following is my jcl and control cards.
I abend on this step.
//COPYSTEP EXEC PGM=IDCAMS,REGION=0K
//SYSPRINT DD SYSOUT=*
//INPUT1 DD DSN=RKI.CSI,DISP=OLD
//OUTPU1 DD DSN=RKI.CSI.TAPECOPY,
// DISP=(NEW,PASS),LABEL=(1,,RETPD=5),
// UNIT=(3480,,DEFER),VOL=(,RETAIN)
//SYSIN DD *
REPRO -
INFILE(INPUT1) -
OUTFILE(OUTPU1)
Later in the jobstream I will copy back to disk.
//COPYBACK EXEC PGM=IDCAMS,COND=(0,LT),REGION=0K //SYSPRINT DD SYSOUT=*
//INPUT1 DD DSN=RKI.CSI.TAPECOPY,
// DISP=OLD,LABEL=1,UNIT=(3480,,DEFER),
// VOL=(,RETAIN,REF=*.COPYSTEP.INPUT1)
//OUTPU1 DD DSN=RKI.CSI,DISP=OLD
//SYSIN DD *
REPRO -
INFILE(INPUT1) -
OUTFILE(OUTPU1)
The following is the instruction from the manual for a return code of 34
34
The system detected one of these conditions:
The following combination was specified: QSAM, MACRF=GD or PD, and a RECFM
value that is not VS, VBS, DS, or DBS.
An OPEN macro instruction was issued for a data set with BLKSIZE and BUFL
equal to 0. The system determined that it had to obtain buffers but was
unable to do so.
RECFM was specified with both the A and M attributes.
The following combination was specified: QSAM, LRECL=0, and a RECFM value
that is not V or VB.
The following combination was specified: RECFM=V or VB and LRECL greater
than the quantity BLKSIZE minus 4.
| The following combination was specified: QSAM and BLKSIZE=0.
| No nonzero BLKSIZE value was available from any source and the system
| could not determine one. Coding BLKSIZE=0 in the JCL never has an
| effect except when overriding a cataloged procedure variable.
The following combination was specified: RECFM not variable or undefined and
LRECL greater than BLKSIZE.
The following combination was specified: BFTEK=A, RECFM=VBS, and LRECL=0.
Ed.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the
archives at http://bama.ua.edu/archives/ibm-main.html
The contents of this e-mail are intended for the named addressee only. It
contains information that may be confidential. Unless you are the named
addressee or an authorized designee, you may not copy or use it, or disclose
it to anyone else. If you received it in error please notify us immediately
and then destroy it.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
