MP Batchs, copybooks, jcls, Procs
This commit is contained in:
@ -26,7 +26,7 @@
|
||||
//*TEP0100 EXEC DTSUTVSM,
|
||||
//* BKUPGEN='(+1)'
|
||||
//**** ELIMINATE DUPS FROM SAME FA 00310099
|
||||
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00310099
|
||||
//STEP0150 EXEC PGM=SORT, 00310099
|
||||
// COND=(0,LT) 00320099
|
||||
//SYSOUT DD SYSOUT=* 00330000
|
||||
//SORTIN DD DSN=DOESTAX.&LDATAIN..UC30.FISCAGNT.&QTR,
|
||||
@ -45,7 +45,7 @@
|
||||
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE) 00470099
|
||||
//**** 00480099
|
||||
//**** SORT FA-UC30/RATE(S) DATA 00310099
|
||||
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', 00310099
|
||||
//STEP0200 EXEC PGM=SORT, 00310099
|
||||
// COND=(0,LT) 00320099
|
||||
//SYSOUT DD SYSOUT=* 00330000
|
||||
//SORTIN DD DSN=&&FANODUP,DISP=(OLD,PASS,DELETE)
|
||||
|
||||
Reference in New Issue
Block a user