I need to copy datasets, vsam and GDGs to tape

Thandayudhapani · New User Joined: 22 Feb 2007 Posts: 1 Location: chennai

Hi,
I need to copy many number of VSAM, datasets and GDGs to tape. The naming convention is "PGAM.*". I need to do this in single job. Please share your ideas with sample JCL.

dbzTHEdinosauer · Posted: Fri Jul 02, 2010 10:02 pm

Robert Sample · Posted: Fri Jul 02, 2010 10:53 pm

DF/DSS (ADRDSSU) backup. Sample JCL is in the manual.

Pete Wilson · Posted: Tue Jul 27, 2010 2:55 pm

This DFDSS DUMP JCL will do it, although it won't backup any datasets that are MIGRATed by DFHSM at the time, or datasets on TAPE.

Also DFDSS will not even warn you that some of the datasets are MIGRATed if you're using a generic dsname mask unless you include the PATCH command which will warn you if that is the case via message ADR013W 'NOT SELECTED'

//STEP1 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//SYSIN DD *

SET PATCH 17 = FF

DUMP ODD(TAPE) ALLE ALLD(*) SPHERE COM -
DS(INC( -
PGAM.** -
))