commiting everything bcz i am moving all stuff to another machine 10.57.100.120

This commit is contained in:
faizana
2025-08-29 14:07:12 -04:00
parent ef98c08de5
commit 47c88673c2
42 changed files with 127557 additions and 290 deletions

View File

@ -3,7 +3,7 @@
//* MONTHLY RUN DTSPMON1. * 00020302
//* * 00020402
//******************************************************************** 00020502
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00031000
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS 00031000
// COND=(0,LT) 00032000
//SYSOUT DD SYSOUT=(*) 00040000
//SYSPRINT DD SYSOUT=(*) 00041000

View File

@ -28,7 +28,7 @@
//DTSFVRO1 DD DUMMY
//SYSIN DD DDNAME=EXTPARM
//*********************************************************************
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT
//STEP0200 EXEC PGM=SORT, SORT
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=DOESTAX.&LVLNODE..BE770TRN.&QTR,DISP=SHR

View File

@ -9,8 +9,8 @@
//** LVLNODE = DEVL/TEST/PROD 00001205
//**** 00001408
//STEP0100 EXEC PGM=DTSBX340, PERIODIC EXTRACT 00001599
// COND=(0,LT), 00001699
// PARM='&RUNTYPE.' 00001799
// COND=(0,LT), 00001699
// PARM='&RUNTYPE.' 00001799
//* 00001819
//SYSOUT DD SYSOUT=* 00004001
//SYSABOUT DD SYSOUT=* 00005001
@ -236,7 +236,7 @@
//* SPACE=(CYL,(20,10),RLSE), 00105999
//* DCB=(RECFM=FB,LRECL=58,BLKSIZE=29000) 00106099
//* 00106199
//*STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT ACCOUNTING DETAIL 00106299
//*STEP0200 EXEC PGM=SORT, SORT ACCOUNTING DETAIL 00106299
//* COND=(0,LT) 00106399
//*SYSOUT DD SYSOUT=* 00106499
//** 00106599
@ -258,7 +258,7 @@
//* 00108199
//**** 00108299
//*SYSIN DD DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSSX342),DISP=SHR 00108399
//STEP0210 EXEC PGM=SORT,PARM='VLTEST=0', SORT ACCT INCREMENTAL 00108499
//STEP0210 EXEC PGM=SORT, SORT ACCT INCREMENTAL 00108499
// COND=(0,LT) 00108599
//SYSOUT DD SYSOUT=* 00108699
//* 00108799
@ -276,7 +276,7 @@
//**** 00109999
//SYSIN DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSSX342),DISP=SHR 00110099
//**** 00110199
//*TEP0300 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTION DETAIL 00111099
//*TEP0300 EXEC PGM=SORT, SORT TRANSACTION DETAIL 00111099
//* COND=(0,LT) 00120099
//*YSOUT DD SYSOUT=* 00130099
//* 00140099
@ -296,7 +296,7 @@
//**** 00280099
//*YSIN DD DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSSX342),DISP=SHR 00290099
//**** 00300099
//STEP0310 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANS INCREMENTAL 00301099
//STEP0310 EXEC PGM=SORT, SORT TRANS INCREMENTAL 00301099
// COND=(0,LT) 00302099
//SYSOUT DD SYSOUT=* 00303099
//* 00304099
@ -314,7 +314,7 @@
//**** 00309799
//SYSIN DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSSX342),DISP=SHR 00309899
//**** 00309999
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT QUARTER DETAIL 00310099
//STEP0400 EXEC PGM=SORT, SORT QUARTER DETAIL 00310099
// COND=(0,LT) 00320099
//SYSOUT DD SYSOUT=* 00330099
//* 00340099
@ -335,7 +335,7 @@
//**** 00480099
//SYSIN DD DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSSX342),DISP=SHR 00490099
//**** 00500099
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', SORT PAY DIST 00501099
//STEP0500 EXEC PGM=SORT, SORT PAY DIST 00501099
// COND=(0,LT) 00502099
//SYSOUT DD SYSOUT=* 00503099
//* 00504099
@ -355,7 +355,7 @@
//**** 00509999
//SYSIN DD DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSSX342),DISP=SHR 00510099
//**** 00510199
//STEP0600 EXEC PGM=SORT,PARM='VLTEST=0', SORT ERR 00511099
//STEP0600 EXEC PGM=SORT, SORT ERR 00511099
// COND=(0,LT) 00520099
//SYSOUT DD SYSOUT=* 00530099
//* 00540099

View File

@ -6,12 +6,19 @@
//*****
//* 00001600
//**** /* GEN A DUMMY RECORD FOR THE LABELS FILE 00001702
//DOESLBL1 EXEC PGM=IEBDG, 00001801
// COND=(0,LT) 00001801
//SYSPRINT DD SYSOUT=* 00001900
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00002001
// UNIT=SYSDA, 00002100
// SPACE=(TRK,1), 00002202
//*DOESLBL1 EXEC PGM=IEBDG, 00001801
//* COND=(0,LT) 00001801
//*SYSPRINT DD SYSOUT=* 00001900
//*LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00002001
//* UNIT=SYSDA, 00002100
//* SPACE=(TRK,1), 00002202
//* DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00002300
//DOESLBL1 EXEC PGM=GENT350, 00002300
// COND=(4,LT) 00002300
//SYSOUT DD SYSOUT=* 00002300
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00002300
// UNIT=SYSDA, 00002300
// SPACE=(TRK,1), 00002300
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00002300
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSLBL01), 00002405
// DISP=SHR 00002505

View File

@ -2,7 +2,7 @@
//DTSRSORT PROC
//*
//*********************************************************************
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=DOESTAX.PROD.BE320.RPT(+1),DISP=SHR

View File

@ -36,7 +36,7 @@
//DTSFBTCO DD DUMMY 00050039
//SYSIN DD DDNAME=EXTPARM 00081019
//**** 00090001
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', 00100025
//STEP0200 EXEC PGM=SORT, 00100025
// COND=(0,LT) 00110025
//SYSOUT DD SYSOUT=* 00120025
//SORTIN DD DSN=&&DTSBE332, 00130047

View File

@ -61,7 +61,7 @@
//DTSFVRO1 DD DUMMY
//SYSIN DD DDNAME=EXTPARM
//*********************************************************************
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT
//STEP0200 EXEC PGM=SORT, SORT
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=&&BE770TRN,

112
Procs/DTSUX777 Normal file
View File

@ -0,0 +1,112 @@
//*****
//* UI TAX PERIODIC EXTRACT: DATA VALIDATION
//*
//* 04/02/2009 ADDED TPS STATUS FILES, CHANGED DATA
//* VALIDATION FILES FROM TEMPORARY TO PERMANENT. GD
//*
//*****
//DTSUX777 PROC RUNTYPE='OR',
// PREBACK='N',
// CHKONLY='N',
// IOTRACE='Y'
//****
//STEP0100 EXEC PGM=DTSBD400, PERIODIC EXTRACT
// COND=(0,LT),
// PARM='&RUNTYPE.,&PREBACK.,&CHKONLY.,&IOTRACE.'
//*
//SYSOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//*
//DTSFWGH DD DSN=DOESTAX.PROD.VSAM.TAXWGH,DISP=SHR,
// AMP=('BUFNI=5,BUFND=10')
//*
//*OCSMSTR INCLUDE MEMBER=DOCIMSTR
//*
//DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR, 01760006
// AMP=('BUFNI=5,BUFND=10') 01770006
//DTSFBTCO DD DSN=&&BE770TRN,
// DISP=(NEW,PASS,DELETE),
// SPACE=(16384,(950,750),RLSE),
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//BE770PRM DD DSN=DOESTAX.PROD.BE770PRM,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(77,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=77,BLKSIZE=77)
//TPSSTAT1 DD DSN=DOESTAX.&LVLNODE..TPS.STATUS.QTR1,
//** DISP=(,CATLG,DELETE),
// DISP=(OLD,KEEP,KEEP),
// SPACE=(CYL,(5,5),RLSE),
// DCB=(RECFM=FB,LRECL=56,BLKSIZE=28000)
//*
//TPSSTAT2 DD DSN=DOESTAX.&LVLNODE..TPS.STATUS.QTR2,
//** DISP=(,CATLG,DELETE),
// DISP=(OLD,KEEP,KEEP),
// SPACE=(CYL,(5,5),RLSE),
// DCB=(RECFM=FB,LRECL=56,BLKSIZE=28000)
//*
//TPSSTAT3 DD DSN=DOESTAX.&LVLNODE..TPS.STATUS.QTR3,
//** DISP=(,CATLG,DELETE),
// DISP=(OLD,KEEP,KEEP),
// SPACE=(CYL,(5,5),RLSE),
// DCB=(RECFM=FB,LRECL=56,BLKSIZE=28000)
//*
//TPSSTAT4 DD DSN=DOESTAX.&LVLNODE..TPS.STATUS.QTR4,
//** DISP=(,CATLG,DELETE),
// DISP=(OLD,KEEP,KEEP),
// SPACE=(CYL,(5,5),RLSE),
// DCB=(RECFM=FB,LRECL=56,BLKSIZE=28000)
//*
//DTSFVRO1 DD DUMMY
//SYSIN DD DDNAME=EXTPARM
//*********************************************************************
//STEP0200 EXEC PGM=SORT, SORT
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=&&BE770TRN,
// DISP=(OLD,PASS,DELETE)
//SORTOUT DD DSN=&&BE770SRT,
// DISP=(NEW,PASS,DELETE),
// UNIT=SYSDA,
// SPACE=(16384,(950,700),RLSE),
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSY770),DISP=SHR
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(90,25),RLSE)
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(90,25),RLSE)
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(90,25),RLSE)
//SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(90,25),RLSE)
//*********************************************************************
//STEP0300 EXEC PGM=DTSBX770, BUILD RECONSTRUCTION FILE
// COND=(0,LT)
//*
//BE770PRM DD DSN=DOESTAX.PROD.BE770PRM,
// DISP=(SHR)
//DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR, 01760006
// AMP=('BUFNI=5,BUFND=10') 01770006
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..PER.RPT(+1),
// DISP=(,CATLG,DELETE),
// SPACE=(16394,(900,900),RLSE),
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)
//DTSFBTCI DD DSN=&&BE770SRT,
// DISP=(OLD,PASS,DELETE)
//DTSX771 DD DSN=DOESTAX.&LVLNODE..BX771TRN,
// DISP=(OLD,KEEP,KEEP),
// SPACE=(23500,(200,200),RLSE),
// DCB=(RECFM=FB,LRECL=235,BLKSIZE=23500)
//DTSX772 DD DSN=DOESTAX.&LVLNODE..BX772TRN,
// DISP=(OLD,KEEP,KEEP),
// SPACE=(24800,(200,200),RLSE),
// DCB=(RECFM=FB,LRECL=124,BLKSIZE=24800)
//DTSX773 DD DSN=DOESTAX.&LVLNODE..BX773TRN,
// DISP=(OLD,KEEP,KEEP),
// SPACE=(16300,(500,300),RLSE),
// DCB=(RECFM=FB,LRECL=163,BLKSIZE=16300)
//DTSX774 DD DSN=DOESTAX.&LVLNODE..BX774TRN,
// DISP=(OLD,KEEP,KEEP),
// SPACE=(23250,(1500,500),RLSE),
// DCB=(RECFM=FB,LRECL=155,BLKSIZE=23250)
//DTSX775 DD DSN=DOESTAX.&LVLNODE..BX775TRN,
// DISP=(OLD,KEEP,KEEP),
// SPACE=(24600,(1500,500),RLSE),
// DCB=(RECFM=FB,LRECL=250,BLKSIZE=25000)