JCL z/OS DFSMS - IEBCOPY Example 5: Merge Data Sets and Compress the Merged Data Set

JCL z/OS DFSMS - IEBCOPY Example 5: Merge Data Sets and Compress the Merged Data Set

In this example, two input partitioned data sets (DATASET5 and DATASET6) are copied to an existing output partitioned data set (DATASET1).
In addition, all members on DATASET6 are copied; members on the output data set that have the same names as the copied members are replaced.
After DATASET6 is processed, the output data set (DATASET1) is compressed in place.
Figure 1 shows the input and output data sets before and after processing.

Neste exemplo, dois conjuntos de dados particionados de entrada (DATASET5 e DATASET6) são copiados para um conjunto de dados particionados de saída existente (DATASET1).
Além disso, todos os membros em DATASET6 são copiados; membros no conjunto de dados de saída que possuem os mesmos nomes que os membros copiados são substituídos.
Depois que DATASET6 é processado, o conjunto de dados de saída (DATASET1) é compactado no lugar.
A Figura 1 mostra os conjuntos de dados de entrada e saída antes e depois do processamento.

Figure 1. Compress-in-Place following full copy with "replace" specified
Figura 1. Compactar no local após a cópia completa com "substituir" especificado

  //COPY     JOB  ...
  //JOBSTEP  EXEC PGM=IEBCOPY
  //SYSPRINT DD  SYSOUT=A
  //INOUT1   DD  DSNAME=DATASET1,UNIT=disk,VOL=SER=111112,
  //             DISP=(OLD,KEEP)
  //IN5      DD  DSNAME=DATASET5,UNIT=disk,VOL=SER=111114,
  //             DISP=OLD
  //IN6      DD  DSNAME=DATASET6,UNIT=disk,VOL=SER=111115,
  //             DISP=(OLD,KEEP)
  //SYSUT3   DD  UNIT=SYSDA,SPACE=(TRK,(1))
  //SYSUT4   DD  UNIT=SYSDA,SPACE=(TRK,(1))
  //SYSIN    DD  *
  COPYOPER COPY  OUTDD=INOUT1,INDD=(IN5,(IN6,R),INOUT1)
  /*

The control statements are as follows:
As declarações de controle são as seguintes:

INOUT1 DD defines a partitioned data set (DATASET1), which contains three members (A, B and F).
IN5 DD defines a partitioned data set (DATASET5), which contains two members (A and C).
IN6 DD defines a partitioned data set (DATASET6), which contains three members (B, C and D).
SYSUT3 and SYSUT4 DD define temporary spill data sets.
One track is allocated for each on a disk volume.
SYSIN DD defines the control data set, which follows in the input stream.
The data set contains a COPY statement.
COPY indicates the start of the copy operation.
The OUTDD operand specifies DATASET1 as the output data set.
The INDD operand specifies DATASET5 as the first input data set to be processed.
It then specifies DATASET6 as the second input data set to be processed.
In addition, the replace option is specified for all members copied from DATASET6.
Finally, it specifies DATASET1 as the last input data set to be processed.
Since DATASET1 is also the output data set, DATASET1 is compressed in place.
However, if DATASET1 is a PDSE, the compress-in-place operation will not be processed.

INOUT1 DD define um conjunto de dados particionados (DATASET1), que contém três membros (A, B e F).
IN5 DD define um conjunto de dados particionados (DATASET5), que contém dois membros (A e C).
IN6 DD define um conjunto de dados particionados (DATASET6), que contém três membros (B, C e D).
SYSUT3 e SYSUT4 DD definem conjuntos de dados auxiliares temporários.
Uma trilha é alocada para cada um em um volume de disco.
SYSIN DD define o conjunto de dados de controle, que segue no fluxo de entrada.
O conjunto de dados contém uma instrução COPY.
COPY indica o início da operação de cópia.
O operando OUTDD especifica DATASET1 como o conjunto de dados de saída.
O operando INDD especifica DATASET5 como o primeiro conjunto de dados de entrada a ser processado.
Em seguida, especifica DATASET6 como o segundo conjunto de dados de entrada a ser processado.
Além disso, a opção de substituição é especificada para todos os membros copiados de DATASET6.
Finalmente, ele especifica DATASET1 como o último conjunto de dados de entrada a ser processado.
Como DATASET1 também é o conjunto de dados de saída, DATASET1 é compactado no lugar.
No entanto, se DATASET1 for um PDSE, a operação de compactação no local não será processada.

Processing occurs as follows:
O processamento ocorre da seguinte forma:

Member A is not copied from DATASET5 into DATASET1 because it already exists on DATASET1 and the replace option was not specified for DATASET5.
O membro A não é copiado de DATASET5 para DATASET1 porque ele já existe em DATASET1 e a opção de substituição não foi especificada para DATASET5.
Member C is copied from DATASET5 to DATASET1, occupying the first available space.
O membro C é copiado de DATASET5 para DATASET1, ocupando o primeiro espaço disponível.
All members are copied from DATASET6 to DATASET1, immediately following the last member.
Members B and C are copied even though the output data set already contains members with the same names because the replace option is specified on the data set level.
Todos os membros são copiados de DATASET6 para DATASET1, imediatamente após o último membro.
Os membros B e C são copiados, embora o conjunto de dados de saída já contenha membros com os mesmos nomes porque a opção de substituição é especificada no nível do conjunto de dados.

The pointers in DATASET1's directory are changed to point to the new members B and C.
Thus, the space occupied by the old members B and C is unused.
The members currently on DATASET1 are compressed in place, thereby eliminating embedded unused space.
Os ponteiros no diretório do DATASET1 são alterados para apontar para os novos membros B e C.
Assim, o espaço ocupado pelos antigos membros B e C não é utilizado.
Os membros atualmente em DATASET1 são compactados no lugar, eliminando assim o espaço não utilizado incorporado.

Parent topic: IEBCOPY Examples