DB2
z/OS DB2 LUW z/OS CICS VTAM |
z/OS Info |
Home |
AMATERSE
//****************************************************
//*
*
//* AMATERSE WITH PACK
OPTION
*
//*
*
//****************************************************
//STEP EXEC PGM=AMATERSE,PARM=PACK
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DISP=SHR,DSN=<YOUR.INFILE>
//SYSUT2 DD DISP=(NEW,CATLG),UNIT=WORK,
//
SPACE=(CYL,(1200,500),RLSE),
//
DSN=<YOUR.OUTFILE.PACK>
//****************************************************
//*
*
//* AMATERSE WITH SPACK
OPTION
*
//*
*
//****************************************************
//STEP EXEC PGM=AMATERSE,PARM=SPACK
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DISP=SHR,DSN=<YOUR.INFILE>
//SYSUT2 DD DISP=(NEW,CATLG),UNIT=SYSDA,
//
SPACE=(CYL,(10,10),RLSE),
//
DSN=<YOUR.OUTFILE.PACK>
//****************************************************
//*
*
//* AMATERSE WITH UNPACK
OPTION
*
//*
*
//****************************************************
//STEP EXEC PGM=AMATERSE,PARM=UNPACK
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD
DISP=SHR,DSN==<YOUR.INFILE.PACK>
//SYSUT2 DD DISP=(NEW,CATLG),UNIT=WORK,
//
SPACE=(CYL,(100,100),RLSE),
//
DSN=<YOUR.OUTFILE>