JCL z/OS DFSMS - IEBCOMPR Compare Sequential Data Sets that Reside on Tape



Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

JCL z/OS DFSMS - IEBCOMPR Example 2: Compare Sequential Data Sets that Reside on Tape

In this example, two sequential data sets that reside on 7-track tape volumes are compared.
Neste exemplo, dois conjuntos de dados sequenciais que residem em volumes de fita de 7 trilhas são comparados.

  //TAPETAPE JOB  ...
  //         EXEC PGM=IEBCOMPR
  //SYSPRINT DD  SYSOUT=A
  //SYSUT1   DD  DSNAME=SET1,LABEL=(2,SUL),DISP=(OLD,KEEP),
  //             VOL=SER=001234,DCB=(DEN=2,RECFM=FB,LRECL=80,
  //             BLKSIZE=2000,TRTCH=C),UNIT=tape
  //SYSUT2   DD  DSNAME=SET2,LABEL=(,SUL),DISP=(OLD,KEEP),
  //             VOL=SER=001235,DCB=(DEN=2,RECFM=FB,LRECL=80,
  //             BLKSIZE=2000,TRTCH=C),UNIT=tape
  //SYSIN    DD  *
        COMPARE  TYPORG=PS
         LABELS  DATA=ONLY
  /*

The control statements are discussed, as follows:
As instruções de controle são discutidas da seguinte forma:

  • SYSUT1 DD defines an input data set, SET1, which resides on a labeled, 7-track tape volume.
    The blocked data set was originally written at a density of 800 bits per inch (DEN=2) with the data converter on (TRTCH=C).
  • SYSUT2 DD defines an input data set, SET2, which is the first or only data set on a labeled, 7-track tape volume.
    The blocked data set was originally written at a density of 800 bits per inch (DEN=2) with the data converter on (TRTCH=C).
  • SYSIN DD defines the control data set, which follows in the input stream.
  • COMPARE TYPORG=PS specifies that the input data sets are sequentially organized.
  • LABELS DATA=ONLY specifies that user header labels are to be treated as data and compared.
    All other labels on the tape are ignored.

  • SYSUT1 DD define um conjunto de dados de entrada, SET1, que reside em um volume de fita de 7 trilhas rotulado.
    O conjunto de dados bloqueado foi originalmente escrito em uma densidade de 800 bits por polegada (DEN = 2) com o conversor de dados ligado (TRTCH = C).
  • SYSUT2 DD define um conjunto de dados de entrada, SET2, que é o primeiro ou único conjunto de dados em um volume de fita de 7 trilhas rotulado.
    O conjunto de dados bloqueado foi originalmente escrito em uma densidade de 800 bits por polegada (DEN = 2) com o conversor de dados ligado (TRTCH = C).
  • SYSIN DD define o conjunto de dados de controle, que segue no fluxo de entrada.
  • COMPARE TYPORG = PS especifica que os conjuntos de dados de entrada são organizados sequencialmente.
  • LABELS DATA = ONLY especifica que os rótulos dos cabeçalhos do usuário devem ser tratados como dados e comparados.
    Todas as outras etiquetas da fita são ignoradas.

Parent topic: IEBCOMPR Examples



© Copyright IBM Corp.