JCL - IEHPROGM Rename a Multi-Volume Data Set Catalog



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

JCL - IEHPROGM Example 3: Rename a Multi-Volume Data Set Catalog

In this example, the name of a data set is changed on two mountable volumes.
The old data set name is removed and the data set is cataloged under its new data set name.

Neste exemplo, o nome de um conjunto de dados é alterado em dois volumes montáveis.
O nome do conjunto de dados antigo é removido e o conjunto de dados é catalogado sob seu novo nome do conjunto de dados.

  //RENAMEDS JOB  ...
  //STEP1    EXEC PGM=IEHPROGM
  //SYSPRINT DD  SYSOUT=A
  //DD1      DD  VOLUME=SER=111111,UNIT=disk,DISP=OLD
  //DD2      DD  UNIT=(disk,,DEFER),DISP=OLD,
  //             VOLUME=(PRIVATE,SER=(222222,333333))
  //SYSIN    DD  *
    RENAME   DSNAME=A.B.C,NEWNAME=NEWSET,VOL=disk=(222222,333333)
    UNCATLG  DSNAME=A.B.C
    CATLG    DSNAME=NEWSET,VOL=disk=(222222,333333)
  /*

The control statements are discussed as follows:
As declarações de controle são discutidas a seguir:

  • RENAME specifies that data set A.B.C, which resides on volumes 222222 and 333333, is to be renamed NEWSET.
  • UNCATLG specifies that data set A.B.C is uncataloged.
  • CATLG specifies that NEWSET, which resides on volumes 222222 and 333333, is cataloged.

  • RENAME especifica que o conjunto de dados A.B.C, que reside nos volumes 222222 e 333333, deve ser renomeado para NEWSET.
  • UNCATLG especifica que o conjunto de dados A.B.C não está catalogado.
  • CATLG especifica que NEWSET, que reside nos volumes 222222 e 333333, é catalogado.

Parent topic: IEHPROGM Examples



© Copyright IBM Corp.