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

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
Procs/DTSACHW1 Normal file
View File

@ -0,0 +1,19 @@
//******************************************************************** 00020100
//* THIS JOB WILL EXTRACT THE REPORT TYPES TO BE ARCHIVED FROM THE * 00020200
//* WEEKLY RUN DTSPDAY7. (RPT433R1 SI 2ND LETTER) * 00020301
//* * 00020400
//******************************************************************** 00020500
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00031000
// COND=(0,LT) 00032000
//SYSOUT DD SYSOUT=(*) 00040000
//SYSPRINT DD SYSOUT=(*) 00041000
//SORTIN DD DSN=DOESTAX.PROD.SRTDAY07.RPT(+1),DISP=SHR 00060001
//**** 00060100
//SORTOUT DD DSN=DOESTAX.PROD.ARCHIVE.&ACHYEAR,DISP=MOD 00060500
//**** 00060900
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 00110000
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 00120000
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 00130000
//SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(20,20),RLSE) 00140000
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSACHW1),DISP=SHR 00150001
//**** 00180000