SAS(R) 9.1.3 Companion for z/OS

356 TAPELABEL Procedure Chapter 16
Example 5: Copying Multiple Files from Multiple Input Tapes The next job copies
several files from several input tape volumes to one output tape volume:
TAPELABEL Procedure
//REARRNGE JOB account,name
// EXEC SAS
//DEN2IN DD UNIT=(2927-4,,DEFER),LABEL=(,BLP)
//DEN3IN DD UNIT=(2927-3,,DEFER),LABEL=(,SL)
//TAPE1 DD UNIT=TAPE,DISP=SHR,VOL=SER=XR8475,
// LABEL=(,BLP)
//TAPE2 DD UNIT=TAPE,DISP=OLD,VOL=SER=BKT023,
// DSN=first-file-dsname
//OUTPUT DD UNIT=(3400-5,,DEFER),DISP=(,KEEP)
//SYSIN DD *
proc tapecopy label=sl den=6250 nolist
outdd=output outvol=histpe;
invol indd=den2in invol=ptftp0;
files 2-4 8-eov 7 6;
invol indd=tape1;
files 5 7 9-eov;
invol indd=tape2;
files 4 5 1;
invol indd=den3in invol=s03768
dsn=’xrt.bkt120.g0081v00’;
files 1-6 22-34;
invol invol=so3760 dsn=’t.bkt120.g0023v00’;
files 4 5 6 9;
invol indd=tape2;
files 7-eov;
run;
/*
//
Writes the label information of an IBM standard-labeled tape volume to the SAS procedure output
file
z/OS specifics: all
Syntax
PROC TAPELABEL ;
Details
The procedure writes information from the tape label, including the data set name,
DCB information, and data set history, to the SAS procedure output file.
Each tape volume must have a DDname allocated for it before that volume can be
read by the TAPELABEL procedure. Multiple tape volumes can be read in one PROC
TAPELABEL statement, using a list of DDnames in the DDNAME= option, as shown