|
In this example, a partitioned data set is copied and compared in two job steps.
Neste exemplo, um conjunto de dados particionado é copiado e comparado em duas etapas de trabalho.
//DISKDISK JOB ...
//STEPA EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=A
//SYSUT1 DD DSNAME=MAINDB.LOG.OLDSET,DISP=SHR
//SYSUT2 DD DSNAME=NEWMEMS,UNIT=disk,DISP=(,PASS),
// VOLUME=SER=111113,SPACE=(TRK,(5,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=640)
//SYSUT3 DD UNIT=SYSDA,SPACE=(TRK,(1))
//SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(1))
//SYSIN DD *
COPY OUTDD=SYSUT2,INDD=SYSUT1
SELECT MEMBER=(A,B,D,E,F)
/*
//STEPB EXEC PGM=IEBCOMPR
//SYSPRINT DD SYSOUT=A
//SYSUT1 DD DSNAME=OLDSET,DISP=(OLD,KEEP)
//SYSUT2 DD DSNAME=NEWMEMS,DISP=(OLD,KEEP)
//SYSIN DD *
COMPARE TYPORG=PO
EXITS ERROR=SEEERROR
/*
The first job step copies the data set and passes the original and copied data sets to the second job step.
The second job step compares the two data sets.
A primeira etapa do trabalho copia o conjunto de dados e passa os conjuntos de dados originais e copiados para a segunda etapa do trabalho.
A segunda etapa do trabalho compara os dois conjuntos de dados.
The control statements for the IEBCOMPR job step are discussed, as follows:
As instruções de controle para a etapa de trabalho IEBCOMPR são discutidas da seguinte maneira:
- SYSUT1 DD defines a blocked input data set (MAINDB.LOG.OLDSET) that is passed from the preceding job step.
The data set resides on a disk or tape volume.
- SYSUT2 DD defines a blocked input data set (MAINDB.LOG.NEWMEMS) that is passed from the preceding job step.
The data set resides on a disk volume.
- SYSIN DD defines the control data set, which follows in the input stream.
- COMPARE TYPORG=PO specifies partitioned organization.
- EXITS specifies that a user error routine, SEEERROR, is to be used.
- SYSUT1 DD define um conjunto de dados de entrada bloqueado (MAINDB.LOG.OLDSET) que é passado da etapa de trabalho anterior.
O conjunto de dados reside em um volume de disco ou fita.
- SYSUT2 DD define um conjunto de dados de entrada bloqueado (MAINDB.LOG.NEWMEMS) que é passado da etapa de trabalho anterior.
O conjunto de dados reside em um volume de disco.
- SYSIN DD define o conjunto de dados de controle, que segue no fluxo de entrada.
- COMPARE TYPORG = PO especifica a organização particionada.
- EXITS especifica que uma rotina de erro do usuário, SEEERROR, deve ser usada.
Because the input data set names are not identical, the data sets can be retrieved by their data set names.
Como os nomes dos conjuntos de dados de entrada não são idênticos, os conjuntos de dados podem ser recuperados por seus nomes de conjuntos
de dados.
Parent topic: IEBCOMPR Examples
© Copyright IBM Corp.
|
