//* ------------------------------------------------------
//* VISUALAGE PACBASE
//*
//* ------------------------------------------------------
//* BATCH MIGRATION
//*
//* ------------------------------------------------------
//*
//BVPMIBU PROC BASE=$BASE, CODE OF DEVPT DATABASE
// INDSV='$INDSV', INDEX OF SYSTEM VSAM FILES
// INDSN='$INDSN', INDEX OF SYSTEM NON VSAM FILE
// INDUV='$INDUV', INDEX OF USER VSAM FILES
//*: VSAMCAT='$VCAT', USER VSAM CATALOG
//*: SYSTCAT='$SCAT', SYSTEM VSAM CATALOG
// STEPLIB='$HLQ..SBVPMBR8', LIBRARY OF LOAD-MODULES
// SORTLIB='$BIBT', SORT LIBRARY
// LSR='BLSR', LSR BATCH SYSTEM NAME
// OUT=$OUT, UTILITIES AND ERRORS OUTPUT CLASS
// UWK=$UWK, WORK UNIT
// GYFILE=, USER FILE GY
// INPUTSPE=, SPECIAL CHAR FILE
// OUTFILE=, OUTPUT FILE MIGRATION
// VOLS='SER=$VOLUN', BACKUP VOLUME
// UNITS=$UNITUN, BACKUP UNIT
// SPAMV='(CYL,(50,10),RLSE)', WORK FILE SPACE
// SPAOT='(CYL,(50,10),RLSE)', OUTPUT FILE SPACE
// SRTSPC='(100,10)' TEMPORARY SPACE
//***************************************************************
//PRLFILE EXEC PGM=BVPRMSYS,PARM='&OUTFILE'
//*---------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
// DD DSN=$BCOB,DISP=SHR
//SYSOUT DD SYSOUT=&OUT
//PACRIN DD DSN=&INDSN..BVPSY(LIOUTFIL),DISP=SHR
//PACROU DD DSN=&&LIFILE,DISP=(,PASS),SPACE=(TRK,1),
// UNIT=&UWK,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//LISFILE EXEC PGM=IDCAMS
//*---------------------
//*:STEPCAT DD DSN=&VSAMCAT,DISP=SHR
//SYSPRINT DD SYSOUT=&OUT
//SYSIN DD DSN=&&LIFILE,DISP=(OLD,DELETE)
//PRDFILE EXEC PGM=BVPRMSYS,COND=(4,EQ,LISFILE),PARM='&OUTFILE'
//*-------------------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
// DD DSN=$BCOB,DISP=SHR
//SYSOUT DD SYSOUT=&OUT
//PACRIN DD DSN=&INDSN..BVPSY(DLOUTFIL),DISP=SHR
//PACROU DD DSN=&&DLFILE,DISP=(,PASS),SPACE=(TRK,1),
// UNIT=&UWK,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//DELFILE EXEC PGM=IDCAMS,COND=(4,EQ,LISFILE)
//*----------------------------------------
//*:STEPCAT DD DSN=&VSAMCAT,DISP=SHR
//SYSPRINT DD SYSOUT=&OUT
//SYSIN DD DSN=&&DLFILE,DISP=(OLD,DELETE)
//PACS9D EXEC PGM=BVPACS9D
//*------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*: DD DSN=&VSAMCAT,DISP=SHR
//PAC7GY DD DSN=&GYFILE,DISP=SHR
//PAC7QR DD DSN=&&QR,DISP=(,PASS),UNIT=&UWK,
// SPACE=&SPAMV,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT
//PACS9E EXEC PGM=BVPACS9E
//*------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*: DD DSN=&VSAMCAT,DISP=SHR
//PAC7QR DD DSN=&&QR,DISP=(OLD,DELETE)
//PAC7SL DD DSN=&SPLTFILE,DISP=SHR
//PAC7RQ DD DSN=&&RQ,DISP=(,PASS),UNIT=&UWK,
// SPACE=&SPAMV,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SORTWK01 DD UNIT=&UWK,SPACE=(CYL,(30,3),,CONTIG)
//SORTWK02 DD UNIT=&UWK,SPACE=(CYL,(30,3),,CONTIG)
//SORTWK03 DD UNIT=&UWK,SPACE=(CYL,(30,3),,CONTIG)
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT
//PACS94 EXEC PGM=BVPACS94
//*------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*: DD DSN=&VSAMCAT,DISP=SHR
//PAC7CS DD DSN=&INPUTSPE,DISP=SHR
//PAC7RQ DD DSN=&&RQ,DISP=(OLD,DELETE)
//PAC7QR DD DSN=&&PAC7QR,DISP=(,PASS),UNIT=&UWK,
// SPACE=&SPAMV,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT
//PACS96 EXEC PGM=BVPACS96
//*------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*: DD DSN=&VSAMCAT,DISP=SHR
//PAC7GY DD DSN=&GYFILE,DISP=SHR
//PAC7MB DD DUMMY
//PAC7CS DD DSN=&INPUTSPE,DISP=SHR
//PAC7PM DD DUMMY
//PAC7TA DD DSN=&&PAC7TA,DISP=(,PASS),
// UNIT=&UNITS,VOL=&VOLS,
// SPACE=&SPAOT,
// DCB=(RECFM=FB,BLKSIZE=27600,LRECL=400)
//PAC7MM DD DUMMY
//PAC7MI DD DUMMY
//PAC7MO DD DUMMY
//PAC7MC DD DUMMY
//PAC7MS DD DUMMY
//PAC7NO DD DUMMY,AMP=AMORG
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT
//PACS97 EXEC PGM=BVPACS97
//*------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*: DD DSN=&VSAMCAT,DISP=SHR
//PAC7TA DD DSN=&&PAC7TA,DISP=(OLD,PASS)
//PAC7AT DD DSN=&&PAC7AT,DISP=(,PASS),
// UNIT=&UNITS,VOL=&VOLS,
// SPACE=&SPAOT,
// DCB=(RECFM=FB,BLKSIZE=27600,LRECL=400)
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT
//PACS91 EXEC PGM=BVPACS91
//*--------------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*: DD DSN=&VSAMCAT,DISP=SHR
//PAC7AT DD DSN=&&PAC7AT,DISP=(OLD,PASS)
//PAC7TI DD DSN=&&PAC7TI,DISP=(,PASS),
// UNIT=&UNITS,VOL=&VOLS,
// SPACE=&SPAOT,
// DCB=(RECFM=FB,BLKSIZE=27600,LRECL=400)
//SORTLIB DD DSN=&SORTLIB,DISP=SHR
//SORTWK01 DD UNIT=&UWK,SPACE=(CYL,&SRTSPC,,CONTIG)
//SORTWK02 DD UNIT=&UWK,SPACE=(CYL,&SRTSPC,,CONTIG)
//SORTWK03 DD UNIT=&UWK,SPACE=(CYL,&SRTSPC,,CONTIG)
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT
//PACS98 EXEC PGM=BVPACS98
//*-----------------------------------------
//STEPLIB DD DSN=&STEPLIB,DISP=SHR
//*:STEPCAT DD DSN=&SYSTCAT,DISP=SHR
//*: DD DSN=&VSAMCAT,DISP=SHR
//ARLSR DD DSN=&INDUV..&BASE.AR,DISP=SHR
//PAC7AR DD SUBSYS=(&LSR,'DDNAME=ARLSR','BUFND=40')
//PAC7AE DD DSN=&INDSV..BVPAE,DISP=SHR
//PAC7RQ DD DSN=&&PAC7QR,DISP=(OLD,PASS)
//PAC7CP DD DUMMY
//PAC7TI DD DSN=&&PAC7TI,DISP=(OLD,PASS)
//PAC7TG DD DSN=&OUTFILE,DISP=(,CATLG),
// UNIT=&UNITS,VOL=&VOLS,
// SPACE=&SPAOT,
// DCB=(RECFM=FB,BLKSIZE=27600,LRECL=400)
//SORTWK01 DD UNIT=&UWK,SPACE=(CYL,(30,3),,CONTIG)
//SORTWK02 DD UNIT=&UWK,SPACE=(CYL,(30,3),,CONTIG)
//SORTWK03 DD UNIT=&UWK,SPACE=(CYL,(30,3),,CONTIG)
//SYSPRINT DD SYSOUT=&OUT
//SYSOUT DD SYSOUT=&OUT
//SYSUDUMP DD SYSOUT=&OUT