DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
16
Procs/DTSUD992
Normal file
16
Procs/DTSUD992
Normal file
@ -0,0 +1,16 @@
|
||||
//*****
|
||||
//* EXTRACT MASTER FILE RECORDS FROM VSAM MASTER TO A FLAT FILE
|
||||
//*****
|
||||
//DTSUD992 PROC
|
||||
//****
|
||||
//STEP0100 EXEC PGM=DTSBD992, INSERT EMPLOYERS INTO VSAM MST
|
||||
// COND=(0,LT),
|
||||
// REGION=2048K,
|
||||
// PARM='N' Y => UPDATE AIX
|
||||
//SYSOUT DD SYSOUT=*
|
||||
//SYSABOUT DD SYSOUT=*
|
||||
//SYSABEND DD SYSOUT=*
|
||||
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
|
||||
//****
|
||||
//DTSFMSIN DD DSN=&&EXTRACT,DISP=(OLD,PASS,DELETE)
|
||||
//****
|
||||
Reference in New Issue
Block a user