JCL - IEBUPDTE Copy Sequential Data Set from One Volume to Another



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

JCL - IEBUPDTE Example 10: Copy Sequential Data Set from One Volume to Another

In this example, IEBUPDTE is used to copy a sequential data set from one DASD volume to another.
User labels are processed by user exit routines.
Neste exemplo, IEBUPDTE é usado para copiar um conjunto de dados sequenciais de um volume DASD para outro.
Os rótulos de usuário são processados ??por rotinas de saída de usuário.

  //LABELS   JOB  ...
  //STEP1    EXEC PGM=IEBUPDTE,PARM=(MOD,,INTLRTN)
  //SYSPRINT DD  SYSOUT=A
  //SYSUT1   DD  DSNAME=OLDMAST,DISP=OLD,LABEL=(,SUL),
  //             VOLUME=SER=111111,UNIT=disk
  //SYSUT2   DD  DSNAME=NEWMAST,DISP=(NEW,KEEP),LABEL=(,SUL),
  //             UNIT=disk,VOLUME=SER=XB182,
  //             SPACE=(TRK,(5,10))
  //SYSIN    DD  DSNAME=INPUT,DISP=OLD,LABEL=(,SUL),
  //             VOLUME=SER=222222,UNIT=disk
  /*

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

  • SYSUT1 DD defines the input sequential data set, called OLDMAST, which resides on a disk volume.
  • SYSUT2 DD defines the output sequential data set, called NEWMAST, which will reside on a disk volume.
  • SYSIN DD defines the control data set. The contents of this disk-resident data set in this example are:
  •   ./      REPRO   LIST=ALL,INHDR=INHRTN,INTLR=INTRTN,         C
      ./              OUTHDR=OUTHRTN,OUTTLR=OUTTRN
      ./      ENDUP
  • The REPRO function statement indicates that the existing input sequential data set is copied to the output data set.
    This output data set is listed on the message data set.
    The user's label processing routines are to be given control when header or trailer labels are encountered on either the input or the output data set.
  • ENDUP indicates the end of the control data set.

  • SYSUT1 DD define o conjunto de dados sequenciais de entrada, denominado OLDMAST, que reside em um volume de disco.
  • SYSUT2 DD define o conjunto de dados sequenciais de saída, denominado NEWMAST, que residirá em um volume de disco.
  • SYSIN DD define o conjunto de dados de controle. O conteúdo deste conjunto de dados residente em disco neste exemplo é:
  •   ./      REPRO   LIST=ALL,INHDR=INHRTN,INTLR=INTRTN,         C
      ./              OUTHDR=OUTHRTN,OUTTLR=OUTTRN
      ./      ENDUP
  • A instrução de função REPRO indica que o conjunto de dados sequenciais de entrada existente é copiado para o conjunto de dados de saída.
    Este conjunto de dados de saída é listado no conjunto de dados da mensagem.
    As rotinas de processamento de rótulos do usuário devem ter controle quando rótulos de cabeçalho ou trailer são encontrados no conjunto de dados de entrada ou de saída.
  • ENDUP indica o fim do conjunto de dados de controle.

Parent topic: IEBUPDTE Examples



© Copyright IBM Corp.