---------------------<snip>----------------------

The 813-04 abend is due to the dsname in your jcl not matching the dsname on the tape. You either have to specify the dsname in the jcl to match the tape and treat it as a SL tape, or you can use LABEL=(2,BLP) to just process the data(skipping over the internal label). If you choose the BLP approach, you will need the correct dcb attributes for the file. To determine the internal label and dsn, you can use a tape map program, if one is available or you can use IEBGENER as follows:

//STEP01 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1  DD DSN=ANYTAP,UNIT=3480,DISP=OLD,VOL=SER=T99999,
//        LRECL=80,BLKSIZE=80,RECFM=F,LABEL=(2,BLP)
//SYSUT2  DD  SYSOUT=*
//SYSIN   DD  DUMMY

Keep in mind that if the fully qualified dsname is longer than 17 bytes, you will only see the last 17 bytes of it in the tape hdr, but you still need the full name in your JCL.

Hope that helps

--------------------------<unsnip>-------------------------
Bill, the labels, in this case, would be in file 1, not file 2. <G>

----------------------------------------------------------------------
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

Reply via email to