//COPCNV   JOB MSGLEVEL=(1,1),MSGCLASS=X,TIME=1440,NOTIFY=&SYSU
//*
//*   CHANGE KCDXX TO THE SOURCE HI-LEVEL
//*   CHANGE KCDYY TO THE TARGET HI-LEVEL
//*
//COPY    EXEC PGM=ADRDSSU,REGION=0M,TIME=1440 PARM='TYPRUN=NO
//SYSPRINT DD  SYSOUT=*
//I1   DD  DISP=SHR,UNIT=3390,VOL=SER=CNV034
//I2   DD  DISP=SHR,UNIT=3390,VOL=SER=CNV035
//O01  DD  DISP=SHR,UNIT=3390,VOL=SER=CNV001
//*  OUTDDNAME(DASD1,DASD2,DASD3,DASD4)  -
//*      CATALOG
//*    KCI02.DMNSNDSK.** -
//SYSIN    DD  *
  COPY DATASET(INCLUDE(    -
       KCI02.DMNSNDSK.GLKMSTR -
  )) -
  LOGINDD(I1,I2)  OUTDD(O01)  -
  SELECTMULTI(ANY) WAIT(0,0) SPHERE -
  RECATALOG(CATALOG.MVSICF1.VCNV001) DELETE PURGE
/*