Hello,
What is SAS ? is part from the ZOS Package ?
Thanks,
Sergio
> Date: Tue, 29 Mar 2011 19:13:45 +0000
> From: brian.far...@sas.com
> Subject: Re: Check TAPE Contents
> To: IBM-MAIN@bama.ua.edu
>
> If you have SAS software on site try the tapelablel procedure.
>
>
> //jobname JOB acct,name
> /*JOBPARM FETCH
> //TLABEL EXEC SAS
> //OURTAPE DD UNIT=TAPE,DISP=OLD,VOL=SER=MVSV9
> //SYSIN DD *
> proc tapelabel ddname=ourtape;
> run;
> /*
> //
>
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
> Of Patrick Lyon
> Sent: Tuesday, March 29, 2011 2:10 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Check TAPE Contents
>
> On Tue, 29 Mar 2011 22:04:18 +0300, Sergio Lima <sergio...@hotmail.com> wrote:
>
> >Hello,
> >
> >We also tried use IDCAMS here from see tape contents and don't work.
> >Can you please say what can I get a sample JOB ?
> >
> >Thanks,
> >
> >Sergio
>
> Not sure if this works or not, the date on the member is prior Y2K...
>
> //DITTO PROC LBL=BLP,VSER=XXXXXX,UNT=TAPE
> //IDCAMS EXEC PGM=IDCAMS
> //UIN DD DISP=OLD,
> // DSN=FILE01,
> // UNIT=(&UNT),
> // VOL=(,RETAIN,SER=&VSER),
> // LABEL=(&FN,&LBL,,EXPDT=98000),
> // DCB=(BLKSIZE=32760,RECFM=U)
> //* DCB=(RECFM=FB,LRECL=81,BLKSIZE=4050)
> //SYSPRINT DD SYSOUT=*
> // PEND
> //DITTO1 EXEC DITTO,VSER=000297,FN=01,LBL=BLP,UNT=ETAPE
> //SYSIN DD *
> PRINT INFILE(UIN) COUNT(000020)
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to
> lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives
> at http://bama.ua.edu/archives/ibm-main.html
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html