17 lines
466 B
Plaintext
17 lines
466 B
Plaintext
//*****
|
|
//* 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)
|
|
//****
|