Files
DUTAS/Procs/DTSUD998
2025-07-21 11:20:11 -04:00

66 lines
2.1 KiB
Plaintext

//*****
//* DELETE/DEFINE AND INITIALIZE MASTER FILES
//*****
//DTSUD998 PROC
//****
//STEP0100 EXEC PGM=IDCAMS, DELETE/DEFINE MSTA FILE
// REGION=0K
//SYSPRINT DD SYSOUT=*
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSA),DISP=SHR
//*
//STEP0120 EXEC PGM=DTSBD998, INITIALIZE MSTA FILE
// REGION=4096K
//SYSOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//DTSFMSTA DD DSN=DOESTAX.&MSTNODE..VSAM.MSTA,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSIMSTA),DISP=SHR
//****
//****
//STEP0200 EXEC PGM=IDCAMS, DELETE/DEFINE MSTB FILE
// REGION=0K
//SYSPRINT DD SYSOUT=*
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSB),DISP=SHR
//*
//STEP0220 EXEC PGM=DTSBD998, INITIALIZE MSTB FILE
// REGION=4096K
//SYSOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//DTSFMSTB DD DSN=DOESTAX.&MSTNODE..VSAM.MSTB,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSIMSTB),DISP=SHR
//****
//****
//STEP0500 EXEC PGM=IDCAMS, DELETE/DEFINE MSTH FILE
// REGION=0K
//SYSPRINT DD SYSOUT=*
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSH),DISP=SHR
//*
//STEP0520 EXEC PGM=DTSBD998, INITIALIZE MSTH FILE
// REGION=4096K
//SYSOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//DTSFMSTH DD DSN=DOESTAX.&MSTNODE..VSAM.MSTH,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSIMSTH),DISP=SHR
//*
//****
//STEP0600 EXEC PGM=IDCAMS, DELETE/DEFINE MSTI FILE
// REGION=0K
//SYSPRINT DD SYSOUT=*
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSI),DISP=SHR
//*
//STEP0620 EXEC PGM=DTSBD998, INITIALIZE MSTI FILE
// REGION=4096K
//SYSOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//DTSFMSTI DD DSN=DOESTAX.&MSTNODE..VSAM.MSTI,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSIMSTI),DISP=SHR
//*
//****