giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

MP Batchs, copybooks, jcls, Procs

Browse Source
This commit is contained in:
Manoj Patel
2025-09-13 10:11:09 -04:00
parent c59b4762c2
commit ece2ee4599
261 changed files with 91380 additions and 11991 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Procs/DTSUZCGR
View File

@ -18,7 +18,7 @@
// SPACE=(32000,(1000,1000),RLSE), 00190099
// DCB=(RECFM=FB,LRECL=16,BLKSIZE=32000) 00200099
//*** 00210099
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT IPES RECORDS 00220099
//STEP0200 EXEC PGM=SORT, SORT IPES RECORDS 00220099
// COND=(0,LT) 00230099
//SYSOUT DD SYSOUT=* 00240099
//SORTIN DD DSN=&&IPES, 00250099
@ -68,7 +68,7 @@
// AMP=('BUFNI=5,BUFND=10') 00670037
//DTSFVRO1 DD DUMMY 00680099
//**** 00690099
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS: 00700099
//STEP0400 EXEC PGM=SORT, SORT CHARGE RECORDS: 00700099
// COND=(0,LT) EMP/9 DIGIT SSN/BYE/ 00710099
//SYSOUT DD SYSOUT=* PROGRAM 00720099
//SORTIN DD DSN=&&CHGBD205, 00730099
@ -123,7 +123,7 @@
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 01230076
// AMP=('BUFNI=5,BUFND=10') 01240037
//**** 01250076
//STEP0600 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHG005 RECORDS: 01260099
//STEP0600 EXEC PGM=SORT, SORT CHG005 RECORDS: 01260099
// COND=(0,LT) EMP/SSN/BYE 01270099
//SYSOUT DD SYSOUT=* 01280099
//SORTIN DD DSN=&&CHGM005, 01290099
@ -192,7 +192,7 @@
// DCB=(RECFM=FB,LRECL=64,BLKSIZE=25600) 01930099
//* 01940099
//******* 01950099
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT DTSFMRRA RECS: 01951599
//STEP0910 EXEC PGM=SORT, SORT DTSFMRRA RECS: 01951599
// COND=(0,LT) EMP/REC TP/RTE YR/REL DT 01951699
//SYSOUT DD SYSOUT=* 01951799
//SORTIN DD DSN=&&DTSFMRRA, 01951899
@ -234,7 +234,7 @@
// SPACE=(CYL,(20,10),RLSE), 02084099
// DCB=(RECFM=FB,LRECL=32,BLKSIZE=32000) 02085099
//* 02086099
//STEP1100 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHG005 RECORDS: 02099299
//STEP1100 EXEC PGM=SORT, SORT CHG005 RECORDS: 02099299
// COND=(0,LT) EMP/SSN/BYE 02099399
//SYSOUT DD SYSOUT=* 02099499
//SORTIN DD DSN=DOESTAX.&LVLNODE..CHG216, 02099799
@ -282,7 +282,7 @@
//EOP960F1 DD DSN=UI.PROD.DOCS.EOP960F1,DISP=SHR 02110599
//IB6960F1 DD DSN=UI.PROD.DOCS.IB6960F1,DISP=SHR 02110799
//* 02110899
//STEP1200 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 02110999
//STEP1200 EXEC PGM=SORT, SORT CHARGE RECORDS 02110999
// COND=(0,LT) 02111099
//SYSOUT DD SYSOUT=* 02111199
//SORTIN DD DSN=&&CHGBD217, 02111299