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

2
Procs/CHGRT300
View File

@ -67,7 +67,7 @@
//** CHRG SUMMARY-DC GOVERNMENT 00640282
//RPC160R1 DD DUMMY 00640390
//**** SORT REPORT RECORDS (901/907) 00640689
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641046
//STEP0150 EXEC PGM=SORT, 00641046
// COND=(0,LT), 00642046
// REGION=0M 00643046
//SYSOUT DD SYSOUT=* 00644046

8
Procs/CHGXX100
View File

@ -9,7 +9,7 @@
//**** 00003602
//************ NO CHARGE DATE CHECKING *********************** ZL1 00003702
//**** 00003802
//STEP0050 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00003902
//STEP0050 EXEC PGM=SORT, SORT REPORT RECORDS 00003902
// COND=(0,LT) 00004002
//SYSOUT DD SYSOUT=* 00004102
//SORTIN DD DSN=DOESTAX.CONV.UIBSCHRG.DAILY.UPLOAD, 00004202
@ -47,7 +47,7 @@
//* DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00008800
//** 00008900
// IF (STEP0100.RC EQ 0) THEN 00009000
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00009100
//STEP0200 EXEC PGM=SORT, SORT REPORT RECORDS 00009100
// COND=(0,LT) 00009200
//SYSOUT DD SYSOUT=* 00009300
//SORTIN DD DSN=&&BD100CHG, 00009400
@ -119,7 +119,7 @@
//***** BYPASS REMAINING JOB STEPS IF RETURN-CODE = +1 00150200
// IF (STEP0500.RC EQ 0) THEN 00151000
//** 00152000
//STEP0600 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00160000
//STEP0600 EXEC PGM=SORT, SORT CHARGE RECORDS 00160000
// COND=(0,LT) 00170000
//SYSOUT DD SYSOUT=* 00180000
//SORTIN DD DSN=&&CHGBD207, 00190000
@ -153,7 +153,7 @@
// SPACE=(22000,(500,100),RLSE), 00380000
// DCB=(RECFM=FB,LRECL=22,BLKSIZE=22000) 00390000
//* 00400000
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00410000
//STEP0800 EXEC PGM=SORT, SORT CHARGE RECORDS 00410000
// COND=(0,LT) 00420000
//SYSOUT DD SYSOUT=* 00430000
//SORTIN DD DSN=&&BD230CHG, 00440000

8
Procs/DES300T1
View File

@ -58,7 +58,7 @@
//*
//****
//**************************************************************** 00001700
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', SORT IN EMPLYER ORDER 00007602
//STEP0500 EXEC PGM=SORT, SORT IN EMPLYER ORDER 00007602
// COND=(0,LT) 00007702
//SYSOUT DD SYSOUT=* 00007802
//SORTIN DD DSN=DOESTAX.&MSTNODE..BACKUP.TAXWGH(+1),DISP=SHR
@ -103,7 +103,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//**************************************************************** 00001700
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY EMP 00790055
//STEP0400 EXEC PGM=SORT, SORT BY EMP 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -181,7 +181,7 @@
// DISP=SHR 00770053
//*********************************************************************
//*
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/SSN/QTR 00790055
//STEP0800 EXEC PGM=SORT, SORT WESQ - EMP/SSN/QTR 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -219,7 +219,7 @@
//* DCB=(RECFM=FB,LRECL=25,BLKSIZE=25000)
//*
//*
//STEP1000 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/QTR/SSN 00790055
//STEP1000 EXEC PGM=SORT, SORT WESQ - EMP/QTR/SSN 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055

8
Procs/DESBD300
View File

@ -27,7 +27,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00014000
//* 00014000
//**************************************************************** 00001700
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT IN EMPLYER ORDER 00007602
//STEP0200 EXEC PGM=SORT, SORT IN EMPLYER ORDER 00007602
// COND=(0,LT) 00007702
//SYSOUT DD SYSOUT=* 00007802
//SORTIN DD DSN=&&WGEOUT1, 00007917
@ -73,7 +73,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//**************************************************************** 00001700
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY EMP 00790055
//STEP0400 EXEC PGM=SORT, SORT BY EMP 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -147,7 +147,7 @@
// DISP=SHR 00770053
//*********************************************************************
//*
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/SSN/QTR 00790055
//STEP0800 EXEC PGM=SORT, SORT WESQ - EMP/SSN/QTR 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -181,7 +181,7 @@
// DCB=(RECFM=FB,LRECL=25,BLKSIZE=25000)
//*
//*
//STEP1000 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/QTR/SSN 00790055
//STEP1000 EXEC PGM=SORT, SORT WESQ - EMP/QTR/SSN 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055

4
Procs/DESBD320
View File

@ -51,7 +51,7 @@
//IB6960F1 DD DSN=UI.PROD.DOCS.IB6960F1,DISP=SHR 02779599
//* 02779699
//********************************************************************* 02780099
//STEP0300 EXEC PGM=SORT,PARM='VLTEST=0', /* SORT WAGE NAMES 02790099
//STEP0300 EXEC PGM=SORT, /* SORT WAGE NAMES 02790099
// COND=(0,LT) /* SSN ASC, DATE DESC 02800002
//SYSOUT DD SYSOUT=* 02810002
//SORTIN DD DSN=&&DESFB320,DISP=(OLD,DELETE,DELETE) 02820099
@ -87,7 +87,7 @@
// SPACE=(CYL,(100,10)), 03330099
// DCB=(RECFM=FB,LRECL=46,BLKSIZE=31280) 03340099
//**** 03350099
//STEP0700 EXEC PGM=SORT,PARM='VLTEST=0', /* SORT NEW NAME FILE 03650099
//STEP0700 EXEC PGM=SORT, /* SORT NEW NAME FILE 03650099
// COND=(0,LT) /* SSN ASC, DATE DESC 03660002
//SYSOUT DD SYSOUT=* 03670002
//SORTIN DD DSN=&&DESFB322, 03680017

8
Procs/DESBZ300
View File

@ -27,7 +27,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00014000
//* 00014000
//**************************************************************** 00001700
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT IN EMPLYER ORDER 00007602
//STEP0200 EXEC PGM=SORT, SORT IN EMPLYER ORDER 00007602
// COND=(0,LT) 00007702
//SYSOUT DD SYSOUT=* 00007802
//SORTIN DD DSN=&&WGEOUT1, 00007917
@ -73,7 +73,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//**************************************************************** 00001700
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY EMP 00790055
//STEP0400 EXEC PGM=SORT, SORT BY EMP 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -129,7 +129,7 @@
// DCB=(RECFM=FB,LRECL=14,BLKSIZE=14)
//*
//*
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/SSN/QTR 00790055
//STEP0800 EXEC PGM=SORT, SORT WESQ - EMP/SSN/QTR 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -163,7 +163,7 @@
// DCB=(RECFM=FB,LRECL=25,BLKSIZE=25000)
//*
//*
//STEP1000 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/QTR/SSN 00790055
//STEP1000 EXEC PGM=SORT, SORT WESQ - EMP/QTR/SSN 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055

2
Procs/DESOLARS
View File

@ -5,7 +5,7 @@
//DESOLARS PROC LVLNDIN='PROD',LVLNDOUT='PROD',
// BKUPGEN='(+0)'
//****
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0',
//STEP0100 EXEC PGM=SORT,
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=DOESTAX.&LVLNDIN..BKP.EMTOLA&BKUPGEN.,

2
Procs/DESRSORT
View File

@ -1,7 +1,7 @@
//****
//DESRSORT PROC LGEN='(+0)'
//****
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS
// COND=(0,LT),
// REGION=0M
//SYSOUT DD SYSOUT=*

4
Procs/DESUAIX
View File

@ -27,7 +27,7 @@
//DTSFAIXO DD DSN=&&AIX,DISP=(MOD,PASS,DELETE)
//******************************************************************
//STEP0300 EXEC PGM=SORT, SORT AIX RECORDS
// PARM='VLTEST=0',
//
// COND=(0,LT),
// REGION=0M
//SYSOUT DD SYSOUT=*
@ -49,7 +49,7 @@
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDAIX),DISP=SHR
//*********************************************************************
//STEP0500 EXEC PGM=SORT, LOAD AIX FROM SORTED EXTRACT
// PARM='VLTEST=0',
//
// COND=(0,LT),
// REGION=0M
//SYSOUT DD SYSOUT=*

4
Procs/DEZBD300
View File

@ -27,7 +27,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00014000
//* 00014000
//**************************************************************** 00001700
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT IN EMPLYER ORDER 00007602
//STEP0200 EXEC PGM=SORT, SORT IN EMPLYER ORDER 00007602
// COND=(0,LT) 00007702
//SYSOUT DD SYSOUT=* 00007802
//SORTIN DD DSN=&&WGEOUT1, 00007917
@ -67,7 +67,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//**************************************************************** 00001700
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY EMP 00790055
//STEP0400 EXEC PGM=SORT, SORT BY EMP 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055

2
Procs/DTSACHD1
View File

@ -3,7 +3,7 @@
//* DAILY RUN. * * 00020305
//* * 00020405
//******************************************************************* 00020805
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00031000
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS 00031000
// COND=(4,LT) 00032011
//SYSOUT DD SYSOUT=(*) 00040000
//SYSPRINT DD SYSOUT=(*) 00041000

2
Procs/DTSACHM1
View File

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

2
Procs/DTSACHW1
View File

@ -3,7 +3,7 @@
//* WEEKLY RUN DTSPDAY7. (RPT433R1 SI 2ND LETTER) * 00020301
//* * 00020400
//******************************************************************** 00020500
//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

2
Procs/DTSAR414
View File

@ -3,7 +3,7 @@
//* MONTHLY SOA WHEN DTSRQ414 RUNS STANDALONE. THIS JOB IS PART OF * 00020301
//* THE MONTH END PROCESSING * 00020401
//******************************************************************** 00020500
//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

2
Procs/DTSAR417
View File

@ -2,7 +2,7 @@
//* THIS JOB WILL EXTRACT REPORT TYPE 417 TO BE ARCHIVED FROM THE * 00020201
//* 1ST DELINQUENCY DTSRQ417. * 00020301
//******************************************************************** 00020500
//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

2
Procs/DTSAR420
View File

@ -2,7 +2,7 @@
//* THIS JOB WILL EXTRACT REPORT TYPE 421 TO BE ARCHIVED FROM THE * 00020201
//* 2ND DELINQUENCY DTSRQ420. * 00020301
//******************************************************************** 00020500
//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

2
Procs/DTSAR433
View File

@ -2,7 +2,7 @@
//* THIS JOB WILL EXTRACT REPORT TYPE 433 TO BE ARCHIVED FROM THE * 00020201
//* SELF INSURED DELINQUENCY DTSRQ433. * 00020301
//******************************************************************** 00020500
//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

2
Procs/DTSAR451
View File

@ -3,7 +3,7 @@
//* ANNUAL DELINQUENCY RUN DTSRQ451 * 00020301
//* * 00020400
//******************************************************************** 00020500
//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

2
Procs/DTSAR500
View File

@ -2,7 +2,7 @@
//* THIS JOB WILL EXTRACT REPORT TYPE 503 TO BE ARCHIVED FROM THE * 00020200
//* ANNUAL RATE NOTICES (RATED & SI) DTSRQ517 * 00020304
//******************************************************************** 00020500
//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

2
Procs/DTSAR518
View File

@ -2,7 +2,7 @@
//* THIS JOB WILL EXTRACT REPORT TYPE 503 TO BE ARCHIVED FROM THE * 00020201
//* ANNUAL FILERS RATE NOTICES DTSRQ518 * 00020302
//******************************************************************** 00020500
//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

2
Procs/DTSBD551
View File

@ -120,7 +120,7 @@
//CBDATA DD DSN=DOES.CICS.FIN730.CBDATA.EX100102,DISP=SHR
//CBCTYST DD DSN=DOES.CICS.FIN730.CBCTYST.EX100102,DISP=SHR
//* 00080002
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS
//STEP0200 EXEC PGM=SORT, SORT REPORT RECORDS
// COND=(05,LT),
// REGION=0K
//SYSOUT DD SYSOUT=*

2
Procs/DTSBK770
View File

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

4
Procs/DTSBX148
View File

@ -9,7 +9,7 @@
//*****************************************************************
//* SORT TDEC FILE
//*****************************************************************
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY BATCH/EMP/YRQ/SSN
//STEP0100 EXEC PGM=SORT, SORT BY BATCH/EMP/YRQ/SSN
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*
@ -154,7 +154,7 @@
// DCB=(RECFM=FB,LRECL=37,BLKSIZE=3700)
//****************************************************
//**
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', REBUILD PENDING FILE
//STEP0500 EXEC PGM=SORT, REBUILD PENDING FILE
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBX305
View File

@ -24,7 +24,7 @@
// SPACE=(5050,(100,200),RLSE),
// DCB=(RECFM=FB,LRECL=101,BLKSIZE=5050)
//* 00001700
//X305IMP DD DSN=DOESTAX.&FTPNODE..FTP.REFUND.X305IMP,
//X305IMP DD DSN=DOESTAX.&FTPNODE..FTP.REFUND.X305IMP.SORTED,
// DISP=SHR,
// UNIT=SYSDA,
// SPACE=(5450,(100,200),RLSE),

4
Procs/DTSBX330
View File

@ -35,7 +35,7 @@
//DTSFBTCO DD DUMMY 00050000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRQ330),DISP=SHR 00082001
//**** 00090000
//STEP0992 EXEC PGM=SORT,PARM='VLTEST=0', 00100001
//STEP0992 EXEC PGM=SORT, 00100001
// COND=(0,LT) 00110000
//SYSOUT DD SYSOUT=* 00120000
//SORTIN DD DSN=&&DTSBE330, 00130000
@ -78,7 +78,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00409000
//* REPORT RECORD SORT 00410000
//* 00420001
//STEP0994 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00430001
//STEP0994 EXEC PGM=SORT, SORT REPORT RECORDS 00430001
// COND=(0,LT), 00440001
// REGION=0K 00450001
//SYSOUT DD SYSOUT=* 00460001

18
Procs/DTSBX340
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, 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, 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, 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, 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, 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, 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, SORT ERR 00511099
//STEP0600 EXEC PGM=SORT, SORT ERR 00511099
// COND=(0,LT) 00520099
//SYSOUT DD SYSOUT=* 00530099
//* 00540099

14
Procs/DTSBX354
View File

@ -242,7 +242,7 @@
//** SPACE=(CYL,(2,1),RLSE), 00106499
//** DCB=(RECFM=FB,LRECL=41,BLKSIZE=4100) 00106599
//* 00106699
//*STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT ACCOUNTING DETAIL 00106799
//*STEP0200 EXEC PGM=SORT, SORT ACCOUNTING DETAIL 00106799
//* COND=(0,LT) 00106899
//*SYSOUT DD SYSOUT=* 00106999
//** 00107099
@ -264,7 +264,7 @@
//* 00108699
//**** 00108799
//*SYSIN DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSSX342),DISP=SHR 00108899
//STEP0210 EXEC PGM=SORT,PARM='VLTEST=0', SORT ACCT INCREMENTAL 00108999
//STEP0210 EXEC PGM=SORT, SORT ACCT INCREMENTAL 00108999
// COND=(0,LT) 00109099
//SYSOUT DD SYSOUT=* 00109199
//* 00109299
@ -283,7 +283,7 @@
//**** 00110599
//SYSIN DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSSX342),DISP=SHR 00110699
//**** 00110799
//*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
@ -303,7 +303,7 @@
//**** 00280099
//*YSIN DD DSN=DOESTAX.&LVLNODE..PARMLIB(DTSSX342),DISP=SHR 00290099
//**** 00300099
//**EP0310 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANS INCREMENTAL 00301099
//**EP0310 EXEC PGM=SORT, SORT TRANS INCREMENTAL 00301099
//** COND=(0,LT) 00302099
//**SOUT DD SYSOUT=* 00303099
//* 00304099
@ -321,7 +321,7 @@
//**** 00309799
//**SIN DD DSN=DOESTAX.DEVL.PARMLIB(DTSSX342),DISP=SHR 00309899
//**** 00309999
//**EP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT QUARTER DETAIL 00310099
//**EP0400 EXEC PGM=SORT, SORT QUARTER DETAIL 00310099
//** COND=(0,LT) 00320099
//**SOUT DD SYSOUT=* 00330099
//* 00340099
@ -342,7 +342,7 @@
//**** 00480099
//**SIN DD DSN=DOESTAX.DEVL.PARMLIB(DTSSX342),DISP=SHR 00490099
//**** 00500099
//**EP0500 EXEC PGM=SORT,PARM='VLTEST=0', SORT PAY DIST 00501099
//**EP0500 EXEC PGM=SORT, SORT PAY DIST 00501099
//** COND=(0,LT) 00502099
//**SOUT DD SYSOUT=* 00503099
//* 00504099
@ -362,7 +362,7 @@
//**** 00509999
//**SIN DD DSN=DOESTAX.DEVL.PARMLIB(DTSSX342),DISP=SHR 00510099
//**** 00510199
//**EP0600 EXEC PGM=SORT,PARM='VLTEST=0', SORT ERR 00511099
//**EP0600 EXEC PGM=SORT, SORT ERR 00511099
//** COND=(0,LT) 00520099
//**SOUT DD SYSOUT=* 00530099
//** 00540099

2
Procs/DTSBX410
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBX410 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT X101 FILE
//STEP0100 EXEC PGM=SORT, SORT X101 FILE
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBX415
View File

@ -15,7 +15,7 @@
//*&& MAGNETIC MEDIA WAGE (X144) FILES.
//******* NO LONGER NEEDED 11/14/19 ZL1 00001700
//*************************************************************** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', COMBINE INPUT FILES
//STEP0100 EXEC PGM=SORT, COMBINE INPUT FILES
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

4
Procs/DTSBX420
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBX420 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*
@ -101,7 +101,7 @@
// SPACE=(8192,(100,200),RLSE),
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//STEP0300 EXEC PGM=SORT,PARM='VLTEST=0', COMBINE BATCH XREF FILES
//STEP0300 EXEC PGM=SORT, COMBINE BATCH XREF FILES
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX422.BX214,DISP=SHR

2
Procs/DTSBX425
View File

@ -7,7 +7,7 @@
//DTSBX420 PROC
//** 00001700
//***** 00001700
//STEP0110 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0110 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBX427
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBX427 PROC
//** 00001700
//STEP0080 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0080 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBX430
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBX430 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBX432
View File

@ -14,7 +14,7 @@
//SYSIN DD *
REPRO INFILE(INDD01) OUTFILE(INDD02)
/*
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT X101 FILE
//STEP0100 EXEC PGM=SORT, SORT X101 FILE
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

4
Procs/DTSBX442
View File

@ -10,7 +10,7 @@
//** CREATE A FILE WITH X163 AND X164 RECORDS ONLY 00001700
//** 00001700
//*********************************************************** 00001700
//STEP4421 EXEC PGM=SORT,PARM='VLTEST=0',
//STEP4421 EXEC PGM=SORT,
// COND=(0,NE)
//SYSOUT DD SYSOUT=*
//*
@ -30,7 +30,7 @@
//** SORT BY RECORD TYPE/EMPLOYER/QUARTER 00001700
//** 00001700
//*********************************************************** 00001700
//STEP4422 EXEC PGM=SORT,PARM='VLTEST=0',
//STEP4422 EXEC PGM=SORT,
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBX452
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBX452 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBX530
View File

@ -7,7 +7,7 @@
//** 00001700
//DTSBX530 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

6
Procs/DTSBXACH
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBXACH PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*
@ -93,7 +93,7 @@
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN DD DUMMY
//
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0500 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(4,LT)
//SYSOUT DD SYSOUT=*
//*
@ -177,7 +177,7 @@
//*
//*********************************************************************
//** 00001700
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0800 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(4,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBXCHK
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBXCHK PROC
//** 00001700
//STEP0210 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0210 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

4
Procs/DTSBXDTS
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBXPEN PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*
@ -150,7 +150,7 @@
//*YSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
//*YSIN DD DUMMY
//*
//*TEP0300 EXEC PGM=SORT,PARM='VLTEST=0', COMBINE BATCH XREF FILES
//*TEP0300 EXEC PGM=SORT, COMBINE BATCH XREF FILES
//* COND=(0,LT)
//*YSOUT DD SYSOUT=*
//*ORTIN DD DSN=DOESTAX.&LVLNODE..BX422.BX214,DISP=SHR

2
Procs/DTSBXPAY
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBXPAY PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBXREG
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBXREG PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBXRPT
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBXRPT PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSBZ415
View File

@ -10,7 +10,7 @@
//* COMBINE THE DEBIT MEMO (X150), REFUND (X151) FILES
//* CREDIT MEMO (X152), CASE TRACKING EVENT LOG (X155) FILES.
//*************************************************************** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', COMBINE INPUT FILES
//STEP0100 EXEC PGM=SORT, COMBINE INPUT FILES
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

4
Procs/DTSBZ420
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBX420 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*
@ -97,7 +97,7 @@
// SPACE=(8192,(100,200),RLSE),
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//STEP0300 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00405000
//STEP0300 EXEC PGM=SORT, SORT REPORT RECORDS 00405000
// COND=(0,LT), 00406000
// REGION=0K 00407000
//SYSOUT DD SYSOUT=* 00408000

2
Procs/DTSCGRD1
View File

@ -7,7 +7,7 @@
//* LDEST=LOCAL (OR SOME PARTICULAR QUE DESTINATION) 00100071
//* LHOLD=NO/YES 00110036
//**** /* SORT 901/907 RPT RECORDS 00130071
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00140046
//STEP0150 EXEC PGM=SORT, 00140046
// COND=(0,LT), 00150046
// REGION=0M 00160046
//SYSOUT DD SYSOUT=* 00170046

2
Procs/DTSCGRPT
View File

@ -88,7 +88,7 @@
//** CHRG SUMMARY-DC GOVERNMENT 00640282
//RPC160R1 DD SYSOUT=0 /* COPIES=1, 00640389
//**** SORT REPORT RECORDS (901/907) 00640687
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641046
//STEP0150 EXEC PGM=SORT, 00641046
// COND=(0,LT), 00642046
// REGION=0M 00643046
//SYSOUT DD SYSOUT=* 00644046

2
Procs/DTSCHGQ1
View File

@ -80,7 +80,7 @@
//*PC160R1 DD SYSOUT=(V,DTSCG4Q1),HOLD=&LVDHOLD, 00609199
//* DEST=&LDEST. 00610099
//**** SORT REPORT RECORDS (901/907) 00640176
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641046
//STEP0150 EXEC PGM=SORT, 00641046
// COND=(0,LT), 00642046
// REGION=0M 00643046
//SYSOUT DD SYSOUT=* 00644046

2
Procs/DTSCHGQ2
View File

@ -68,7 +68,7 @@
//** CHRG SUMMARY-DC GOVERNMENT 00640282
//RPC160R1 DD DUMMY 00640390
//**** SORT REPORT RECORDS (901/907) 00640689
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641046
//STEP0150 EXEC PGM=SORT, 00641046
// COND=(0,LT), 00642046
// REGION=0M 00643046
//SYSOUT DD SYSOUT=* 00644046

2
Procs/DTSCHGQ3
View File

@ -62,7 +62,7 @@
//** CHRG SUMMARY-DC GOVT 00608000
//RPC160R1 DD DUMMY 00609001
//**** SORT REPORT RECORDS (901/907) 00640100
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641000
//STEP0150 EXEC PGM=SORT, 00641000
// COND=(0,LT), 00642000
// REGION=0M 00643000
//SYSOUT DD SYSOUT=* 00644000

2
Procs/DTSCHGQ4
View File

@ -54,7 +54,7 @@
//** CHRG SUMMARY-DC GOVT 00608000
//RPC160R1 DD SYSOUT=0 00610003
//**** SORT REPORT RECORDS (901/907) 00640100
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641000
//STEP0150 EXEC PGM=SORT, 00641000
// COND=(0,LT), 00642000
// REGION=0M 00643000
//SYSOUT DD SYSOUT=* 00644000

2
Procs/DTSCHGXM
View File

@ -58,7 +58,7 @@
// SPACE=(16384,(1000,1000),RLSE), 00640001
// DCB=(RECFM=FB,LRECL=134,BLKSIZE=1340) 00640101
//**** SORT REPORT RECORDS (901/907) 00640200
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641000
//STEP0150 EXEC PGM=SORT, 00641000
// COND=(0,LT), 00642000
// REGION=0M 00643000
//SYSOUT DD SYSOUT=* 00644000

2
Procs/DTSCVRPY
View File

@ -66,7 +66,7 @@
//** CHRG SUMMARY-DC GOVT 00608002
//RPC160R1 DD DUMMY /* COPIES=1, 00609002
//**** SORT REPORT RECORDS (901/907) 00640100
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641000
//STEP0150 EXEC PGM=SORT, 00641000
// COND=(0,LT), 00642000
// REGION=0M 00643000
//SYSOUT DD SYSOUT=* 00644000

4
Procs/DTSDCCGP
View File

@ -31,7 +31,7 @@
// SPACE=(8192,(5000,5000),RLSE), 00008900
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00009000
//**** 00009100
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00009200
//STEP0200 EXEC PGM=SORT, SORT CHARGE RECORDS 00009200
// COND=(0,LT) 00009300
//SYSOUT DD SYSOUT=* 00009400
//SORTIN DD DSN=&&CHGBD205, 00009500
@ -85,7 +85,7 @@
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00290000
// AMP=('BUFNI=5,BUFND=10') 00300000
//**** 00371000
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00371100
//STEP0400 EXEC PGM=SORT, SORT CHARGE RECORDS 00371100
// COND=(0,LT) 00371200
//SYSOUT DD SYSOUT=* 00371300
//SORTIN DD DSN=&&CHGBD210, 00371500

6
Procs/DTSDUPD2
View File

@ -108,7 +108,7 @@
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929600
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00929700
//****************************************************************** 00929800
//STEP0480 EXEC PGM=SORT,PARM='VLTEST=0', SORT BTC RECORDS 00930000
//STEP0480 EXEC PGM=SORT, SORT BTC RECORDS 00930000
// COND=(0,LT) 00940000
//SYSOUT DD SYSOUT=* 00960000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX415.BTC,DISP=SHR 00970001
@ -150,7 +150,7 @@
// DCB=(RECFM=FB,LRECL=30,BLKSIZE=30000) 01279001
//* 01279101
//****************************************************************** 01280000
//STEP0495 EXEC PGM=SORT,PARM='VLTEST=0', COMBINE BX214 FILES 01281001
//STEP0495 EXEC PGM=SORT, COMBINE BX214 FILES 01281001
// COND=(0,LT) 01282001
//SYSOUT DD SYSOUT=* 01283001
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX422.BX214,DISP=SHR 01284001
@ -247,7 +247,7 @@
// SPACE=(8192,(100,200),RLSE), 02050000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 02060000
//****************************************************************** 02070000
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 02080000
//STEP0910 EXEC PGM=SORT, SORT REPORT RECORDS 02080000
// COND=(0,LT) 02090000
//SYSOUT DD SYSOUT=* 02110000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.RPT(&S0100.),DISP=SHR 02120000

4
Procs/DTSDUPDT
View File

@ -154,7 +154,7 @@
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929600
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00929700
//****************************************************************** 00929800
//STEP0480 EXEC PGM=SORT,PARM='VLTEST=0', SORT BTC RECORDS 00930000
//STEP0480 EXEC PGM=SORT, SORT BTC RECORDS 00930000
// COND=(0,LT) 00940000
//SYSOUT DD SYSOUT=* 00960000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX415.BTC,DISP=SHR 00970000
@ -341,7 +341,7 @@
// AMP=('BUFNI=5,BUFND=10') 02079500
//* 02079600
//****************************************************************** 02079700
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 02080000
//STEP0910 EXEC PGM=SORT, SORT REPORT RECORDS 02080000
// COND=(0,LT) 02090000
//SYSOUT DD SYSOUT=* 02110000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.RPT(&S0100.),DISP=SHR 02120000

4
Procs/DTSDUPDU
View File

@ -117,7 +117,7 @@
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929657
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00929713
//****************************************************************** 00929813
//STEP0480 EXEC PGM=SORT,PARM='VLTEST=0', SORT BTC RECORDS 00930005
//STEP0480 EXEC PGM=SORT, SORT BTC RECORDS 00930005
// COND=(0,LT) 00940042
//SYSOUT DD SYSOUT=* 00960005
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX415.BTC,DISP=SHR 00970097
@ -286,7 +286,7 @@
// AMP=('BUFNI=5,BUFND=10') 02079599
//* 02079699
//****************************************************************** 02079799
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 02080036
//STEP0910 EXEC PGM=SORT, SORT REPORT RECORDS 02080036
// COND=(0,LT) 02090042
//SYSOUT DD SYSOUT=* 02110006
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.RPT(&S0100.),DISP=SHR 02120025

4
Procs/DTSDUPDX
View File

@ -114,7 +114,7 @@
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929600
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00929700
//****************************************************************** 00929800
//STEP0480 EXEC PGM=SORT,PARM='VLTEST=0', SORT BTC RECORDS 00930000
//STEP0480 EXEC PGM=SORT, SORT BTC RECORDS 00930000
// COND=(0,LT) 00940000
//SYSOUT DD SYSOUT=* 00960000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX415.BTC,DISP=SHR 00970000
@ -259,7 +259,7 @@
// SPACE=(29600,(1000,1000),RLSE), 02064000
// DCB=(RECFM=FB,LRECL=148,BLKSIZE=29600) 02065000
//****************************************************************** 02070000
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 02080000
//STEP0910 EXEC PGM=SORT, SORT REPORT RECORDS 02080000
// COND=(0,LT) 02090000
//SYSOUT DD SYSOUT=* 02110000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.RPT(&S0100.),DISP=SHR 02120000

4
Procs/DTSDUPDY
View File

@ -100,7 +100,7 @@
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929600
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00929700
//****************************************************************** 00929800
//STEP0480 EXEC PGM=SORT,PARM='VLTEST=0', SORT BTC RECORDS 00930000
//STEP0480 EXEC PGM=SORT, SORT BTC RECORDS 00930000
// COND=(0,LT) 00940000
//SYSOUT DD SYSOUT=* 00960000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.BTC(&S0100.),DISP=SHR 00970000
@ -184,7 +184,7 @@
// SPACE=(8192,(100,200),RLSE), 02050000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 02060000
//****************************************************************** 02070000
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 02080000
//STEP0910 EXEC PGM=SORT, SORT REPORT RECORDS 02080000
// COND=(0,LT) 02090000
//SYSOUT DD SYSOUT=* 02110000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.RPT(&S0100.),DISP=SHR 02120000

2
Procs/DTSDWTC
View File

@ -49,7 +49,7 @@
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(&MSTDWTC),DISP=SHR
//*
//************************************************************
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT WTC TRANSACTIONS
//STEP0400 EXEC PGM=SORT, SORT WTC TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=&&WTCTRN1,

4
Procs/DTSDX148
View File

@ -11,7 +11,7 @@
//* THE PENDING FILE CONTAINS TDEC WAGE DATA WHEN NO REPORTS
//* CAN BE FOUND ON DUTAS, IT WIL BE MERGED UNTIL REPORTS ARE FOUND
//*****************************************************************
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY BATCH/EMP/YRQ/SSN
//STEP0100 EXEC PGM=SORT, SORT BY BATCH/EMP/YRQ/SSN
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*
@ -169,7 +169,7 @@
//****************************************************
//** SAVE PENDING FILE FOR NEXT RUN
//****************************************************
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', REBUILD PENDING FILE
//STEP0500 EXEC PGM=SORT, REBUILD PENDING FILE
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSESDAY
View File

@ -242,7 +242,7 @@
//** SPACE=(CYL,(2,1),RLSE), 00106400
//** DCB=(RECFM=FB,LRECL=41,BLKSIZE=4100) 00106500
//* 00106600
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT ACCT INCREMENTAL 00108900
//STEP0200 EXEC PGM=SORT, SORT ACCT INCREMENTAL 00108900
// COND=(0,LT) 00109000
//SYSOUT DD SYSOUT=* 00109100
//* 00109200

8
Procs/DTSGSIDZ
View File

@ -23,7 +23,7 @@
//**** RECORDS ARE ADDED AND DELETED FROM THE MASTER FILE
//**** USE UIBS.WWGH IF NEEDE TO ADD RECRODS FROM OUTSIDE
//**************************************************************** 00001700
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', SORT IN EMPLYER ORDER 00007602
//STEP0500 EXEC PGM=SORT, SORT IN EMPLYER ORDER 00007602
// COND=(0,LT) 00007702
//SYSOUT DD SYSOUT=* 00007802
//SORTIN DD DSN=DOESTAX.&MSTNODE..BACKUP.TAX09WGH(+1),DISP=SHR
@ -74,7 +74,7 @@
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//**************************************************************** 00001700
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY EMP 00790055
//STEP0400 EXEC PGM=SORT, SORT BY EMP 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -152,7 +152,7 @@
// DISP=SHR 00770053
//*********************************************************************
//*
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/SSN/QTR 00790055
//STEP0800 EXEC PGM=SORT, SORT WESQ - EMP/SSN/QTR 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055
@ -190,7 +190,7 @@
// DCB=(RECFM=FB,LRECL=25,BLKSIZE=25000)
//*
//*
//STEP1000 EXEC PGM=SORT,PARM='VLTEST=0', SORT WESQ - EMP/QTR/SSN 00790055
//STEP1000 EXEC PGM=SORT, SORT WESQ - EMP/QTR/SSN 00790055
// COND=(0,LT) 00800055
//SYSOUT DD SYSOUT=* 00810055
//SYSPRINT DD SYSOUT=* 00820055

2
Procs/DTSNXPEN
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSNXPEN PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSNXREG
View File

@ -6,7 +6,7 @@
//** 00001700
//DTSBXREG PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSNXREL
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBXPEN PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

4
Procs/DTSOX148
View File

@ -11,7 +11,7 @@
//* THE PENDING FILE CONTAINS TDEC WAGE DATA WHEN NO REPORTS
//* CAN BE FOUND ON DUTAS, IT WIL BE MERGED UNTIL REPORTS ARE FOUND
//*****************************************************************
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY BATCH/EMP/YRQ/SSN
//STEP0100 EXEC PGM=SORT, SORT BY BATCH/EMP/YRQ/SSN
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*
@ -169,7 +169,7 @@
//****************************************************
//** SAVE PENDING FILE FOR NEXT RUN
//****************************************************
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', REBUILD PENDING FILE
//STEP0500 EXEC PGM=SORT, REBUILD PENDING FILE
// COND=(3,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSQ1RPT
View File

@ -53,7 +53,7 @@
//RPC160R1 DD SYSOUT=(O,DTSCG4Q1),HOLD=&LVDHOLD, 00609001
// DEST=&LDEST. 00610000
//**** SORT REPORT RECORDS (901/907) 00640100
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641000
//STEP0150 EXEC PGM=SORT, 00641000
// COND=(0,LT), 00642000
// REGION=0M 00643000
//SYSOUT DD SYSOUT=* 00644000

2
Procs/DTSRP330
View File

@ -7,7 +7,7 @@
//** LVLNODE = DEVL/TEST/PROD 00001205
//**** 00001408
//* 00410039
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00420039
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS 00420039
// COND=(0,LT), 00421039
// REGION=0K 00422039
//SYSOUT DD SYSOUT=* 00423039

2
Procs/DTSRP451
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBX450 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSRQ540
View File

@ -97,7 +97,7 @@
// SPACE=(27600,(1000,1000),RLSE), 00058599
// DCB=(RECFM=FB,LRECL=92,BLKSIZE=27600) 00058699
//* 00058799
//STEP0500 EXEC PGM=SORT,PARM='VLTEST=0', SORT BY SSN 00059099
//STEP0500 EXEC PGM=SORT, SORT BY SSN 00059099
// COND=(0,LT) 00060099
//SYSOUT DD SYSOUT=* 00070099
//SORTIN DD DSN=&&OUTFILE1, 00080099

25
Procs/DTSRQRPT
View File

@ -5,15 +5,22 @@
//DTSRQRPT PROC LDEST='LOCAL',
// LVDHOLD='YES'
//**** /* GEN A DUMMY RECORD FOR THE LABELS FILE 00001702
//DOESLBL1 EXEC PGM=IEBDG, 00001806
// COND=(4,LT) 00001906
//SYSPRINT DD SYSOUT=* 00002006
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00002106
// UNIT=SYSDA, 00002206
// SPACE=(TRK,1), 00002306
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00002406
//SYSIN DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSLBL01), 00002506
// DISP=SHR 00002606
//*DOESLBL1 EXEC PGM=IEBDG, 00001806
//* COND=(4,LT) 00001906
//*SYSPRINT DD SYSOUT=* 00002006
//*LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE), 00002106
//* UNIT=SYSDA, 00002206
//* SPACE=(TRK,1), 00002306
//* DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00002406
//*SYSIN DD DSN=DOESTAX.DEVL.PARMLIB(DTSLBL01), 00002506
//* DISP=SHR 00002606
//DOESLBL1 EXEC PGM=GENT350,
// COND=(4,LT)
//SYSOUT DD SYSOUT=*
//LBLOUT DD DSN=&&TMP901,DISP=(NEW,PASS,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,1),
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//**** /* POPULATE THE LABELS WORK FILE 00003105
//DOESLBL2 EXEC PGM=IDCAMS, 00003206
// COND=(4,LT) 00003306

2
Procs/DTSRS320
View File

@ -2,7 +2,7 @@
//DTSRSORT PROC
//*
//*********************************************************************
//STEP0100 EXEC PGM=SORT, 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

2
Procs/DTSRS321
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.BE321.RPT(+1),DISP=SHR

2
Procs/DTSRS459
View File

@ -1,7 +1,7 @@
//****
//DTSRS459 PROC
//****
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT BE459 CLEAN FILE
//STEP0100 EXEC PGM=SORT, SORT BE459 CLEAN FILE
// COND=(0,LT),
// REGION=0K
//SYSOUT DD SYSOUT=*

2
Procs/DTSRS460
View File

@ -1,7 +1,7 @@
//****
//DTSRS460 PROC
//****
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT BE460 CLEAN FILE
//STEP0100 EXEC PGM=SORT, SORT BE460 CLEAN FILE
// COND=(0,LT),
// REGION=0K
//SYSOUT DD SYSOUT=*

2
Procs/DTSRS602
View File

@ -1,7 +1,7 @@
//****
//DTSRS602 PROC
//****
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS
// COND=(0,LT),
// REGION=0K
//SYSOUT DD SYSOUT=*

2
Procs/DTSRSESP
View File

@ -6,7 +6,7 @@
//DTSRSESP PROC RPTNODE=&RPTNODE.,
// RPTGEN='(+0)' /* ASSUMES USE WITHIN THE JOB
//****
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS
// COND=(4,LT),
// REGION=0K
//SYSOUT DD SYSOUT=*

2
Procs/DTSRSORT
View File

@ -3,7 +3,7 @@
// RPTGEN='(+1)'
//* RPTGEN='.G5549V00'
//*********************************************************************
//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.&RPTNODE.&RPTGEN.,DISP=SHR

2
Procs/DTSSN451
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBX450 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSSR451
View File

@ -5,7 +5,7 @@
//** 00001700
//DTSBX450 PROC
//** 00001700
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS
//STEP0100 EXEC PGM=SORT, SORT TRANSACTIONS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//*

2
Procs/DTSTPRPT
View File

@ -178,7 +178,7 @@
//RPT611R1 DD SYSOUT=Z,
// DEST=&LDEST.
//****CBDATA DD DUMMY
//CBDATA DD DSN=DOES.CICS.FIN730.CBDATA.EX100102,DISP=SHR
//*CBDATA DD DSN=DOES.CICS.FIN730.CBDATA.EX100102,DISP=SHR
//** AUDIT ASSGNMNTS W/NO AUDIT RESULTS
//RPT612R1 DD SYSOUT=Z,
// DEST=&LDEST.

2
Procs/DTSTSORT
View File

@ -2,7 +2,7 @@
//DTSRSORT PROC RPTNODE='PER.RPT',
// RPTGEN='(+1)'
//*********************************************************************
//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.&MSTNODE..&RPTNODE.&RPTGEN.,DISP=SHR

2
Procs/DTSUX120
View File

@ -10,7 +10,7 @@
//*
//*********************************************************************
//*
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHRG RECORDS
//STEP0100 EXEC PGM=SORT, SORT CHRG RECORDS
// COND=(0,LT),
// REGION=0M
//SYSOUT DD SYSOUT=*

2
Procs/DTSUX330
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=&&DTSBE330, 00130039

2
Procs/DTSUX332
View File

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

2
Procs/DTSUX335
View File

@ -99,7 +99,7 @@
// SPACE=(CYL,(10,5),RLSE), 00089599
// DCB=(RECFM=FB,LRECL=73,BLKSIZE=21900) 00089699
//** 00089799
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT ACCOUNTING DETAIL 00089899
//STEP0100 EXEC PGM=SORT, SORT ACCOUNTING DETAIL 00089899
// COND=(0,LT) 00089999
//SYSOUT DD SYSOUT=* 00090099
//* 00090199

2
Procs/DTSUX737
View File

@ -29,7 +29,7 @@
// SPACE=(8192,(10000,2000),RLSE),
// DCB=(RECFM=FB,LRECL=83)
//*
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT WAGE RECORDS
//STEP0200 EXEC PGM=SORT, SORT WAGE RECORDS
// COND=(0,LT)
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=&&WAGEXT,DISP=(OLD,DELETE,DELETE)

2
Procs/DTSUX770
View File

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

6
Procs/DTSUXCD1
View File

@ -22,7 +22,7 @@
// SPACE=(8192,(3000,1000),RLSE), 00007825
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00007907
//** 00008007
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00008107
//STEP0200 EXEC PGM=SORT, SORT REPORT RECORDS 00008107
// COND=(0,LT) 00008207
//SYSOUT DD SYSOUT=* 00008307
//SORTIN DD DSN=&&BD100CHG, 00008407
@ -93,7 +93,7 @@
//***** BYPASS REMAINING JOB STEPS IF RETURN-CODE = +1 00150101
// IF (STEP0500.RC EQ 0) THEN 00151001
//** 00152001
//STEP0600 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00160000
//STEP0600 EXEC PGM=SORT, SORT CHARGE RECORDS 00160000
// COND=(0,LT) 00170000
//SYSOUT DD SYSOUT=* 00180000
//SORTIN DD DSN=&&CHGBD207, 00190000
@ -127,7 +127,7 @@
// SPACE=(22000,(500,100),RLSE), 00380003
// DCB=(RECFM=FB,LRECL=22,BLKSIZE=22000) 00390003
//* 00400000
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00410000
//STEP0800 EXEC PGM=SORT, SORT CHARGE RECORDS 00410000
// COND=(0,LT) 00420000
//SYSOUT DD SYSOUT=* 00430000
//SORTIN DD DSN=&&BD230CHG, 00440000

6
Procs/DTSUXCGE
View File

@ -20,7 +20,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
@ -69,7 +69,7 @@
//DTSFVRO1 DD DUMMY 00680099
//**** 00680199
//**** 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.&CHGNODE..VSAM.REF,DISP=SHR, 01230099
// 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

4
Procs/DTSUXCGP
View File

@ -31,7 +31,7 @@
// SPACE=(8192,(5000,5000),RLSE), 00008999
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00009099
//**** 00009199
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00009299
//STEP0200 EXEC PGM=SORT, SORT CHARGE RECORDS 00009299
// COND=(0,LT) 00009399
//SYSOUT DD SYSOUT=* 00009499
//SORTIN DD DSN=&&CHGBD205, 00009599
@ -85,7 +85,7 @@
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00290076
// AMP=('BUFNI=5,BUFND=10') 00300037
//**** 00371076
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00371124
//STEP0400 EXEC PGM=SORT, SORT CHARGE RECORDS 00371124
// COND=(0,LT) 00371211
//SYSOUT DD SYSOUT=* 00371311
//SORTIN DD DSN=&&CHGBD210, 00371531

10
Procs/DTSUXCGR
View File

@ -20,7 +20,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
@ -70,7 +70,7 @@
//DTSFVRO1 DD DUMMY 00680099
//**** 00680199
//**** 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
@ -118,7 +118,7 @@
//DTSFREF DD DSN=DOESTAX.&CHGNODE..VSAM.REF,DISP=SHR, 01230099
// 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
@ -177,7 +177,7 @@
//* 01880099
//******* 01950099
//* 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..VSAM.CHGM005, 02099599
@ -221,7 +221,7 @@
//*OP960F1 DD DSN=UI.PROD.DOCS.EOP960F1,DISP=SHR 02110899
//*B6960F1 DD DSN=UI.PROD.DOCS.IB6960F1,DISP=SHR 02110999
//* 02111099
//STEP1300 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 02111199
//STEP1300 EXEC PGM=SORT, SORT CHARGE RECORDS 02111199
// COND=(0,LT) 02111299
//SYSOUT DD SYSOUT=* 02111399
//SORTIN DD DSN=&&CHGBD216, 02111499

4
Procs/DTSUXCWC
View File

@ -32,7 +32,7 @@
// SPACE=(8192,(2000,2000),RLSE), 00008900
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00009000
//**** 00009100
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00009200
//STEP0200 EXEC PGM=SORT, SORT CHARGE RECORDS 00009200
// COND=(0,LT) 00009300
//SYSOUT DD SYSOUT=* 00009400
//SORTIN DD DSN=&&CHGBD205, 00009500
@ -86,7 +86,7 @@
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00290000
// AMP=('BUFNI=5,BUFND=10') 00300000
//**** 00371000
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00371100
//STEP0400 EXEC PGM=SORT, SORT CHARGE RECORDS 00371100
// COND=(0,LT) 00371200
//SYSOUT DD SYSOUT=* 00371300
//SORTIN DD DSN=&&CHGBD210, 00371500

8
Procs/DTSUXGSI
View File

@ -7,7 +7,7 @@
//**** 00003400
//**** DOESTAX.PROD.BACKUP.CHGM002.G0948V00 LAST DOCS BACKUP ZL1 00003502
//**** 00003602
//STEP0050 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00003702
//STEP0050 EXEC PGM=SORT, SORT REPORT RECORDS 00003702
// COND=(0,LT) 00003802
//SYSOUT DD SYSOUT=* 00003902
//SORTIN DD DSN=DOESTAX.CONV.UIBSCHRG.DAILY.UPLOAD, 00004015
@ -45,7 +45,7 @@
//* DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00008814
//** 00008904
// IF (STEP0100.RC EQ 0) THEN 00009004
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 00009104
//STEP0200 EXEC PGM=SORT, SORT REPORT RECORDS 00009104
// COND=(0,LT) 00009204
//SYSOUT DD SYSOUT=* 00009304
//SORTIN DD DSN=&&BD100CHG, 00009404
@ -117,7 +117,7 @@
//***** BYPASS REMAINING JOB STEPS IF RETURN-CODE = +1 00150204
// IF (STEP0500.RC EQ 0) THEN 00151000
//** 00152000
//STEP0600 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00160000
//STEP0600 EXEC PGM=SORT, SORT CHARGE RECORDS 00160000
// COND=(0,LT) 00170000
//SYSOUT DD SYSOUT=* 00180000
//SORTIN DD DSN=&&CHGBD207, 00190000
@ -151,7 +151,7 @@
// SPACE=(22000,(500,100),RLSE), 00380000
// DCB=(RECFM=FB,LRECL=22,BLKSIZE=22000) 00390000
//* 00400000
//STEP0800 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00410000
//STEP0800 EXEC PGM=SORT, SORT CHARGE RECORDS 00410000
// COND=(0,LT) 00420000
//SYSOUT DD SYSOUT=* 00430000
//SORTIN DD DSN=&&BD230CHG, 00440000

4
Procs/DTSUXMCC
View File

@ -31,7 +31,7 @@
// SPACE=(8192,(2000,2000),RLSE), 00008900
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00009000
//**** 00009100
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00009200
//STEP0200 EXEC PGM=SORT, SORT CHARGE RECORDS 00009200
// COND=(0,LT) 00009300
//SYSOUT DD SYSOUT=* 00009400
//SORTIN DD DSN=&&CHGBD205, 00009500
@ -85,7 +85,7 @@
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00290000
// AMP=('BUFNI=5,BUFND=10') 00300000
//**** 00371000
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0', SORT CHARGE RECORDS 00371100
//STEP0400 EXEC PGM=SORT, SORT CHARGE RECORDS 00371100
// COND=(0,LT) 00371200
//SYSOUT DD SYSOUT=* 00371300
//SORTIN DD DSN=&&CHGBD210, 00371500

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

2
Procs/DTSZGRPT
View File

@ -88,7 +88,7 @@
// DEST=&LDEST., 00640400
// HOLD=&LHOLD. 00640500
//**** SORT REPORT RECORDS (901/907) 00640600
//STEP0150 EXEC PGM=SORT,PARM='VLTEST=0', 00641000
//STEP0150 EXEC PGM=SORT, 00641000
// COND=(0,LT), 00642000
// REGION=0M 00643000
//SYSOUT DD SYSOUT=* 00644000

2
Procs/DTSZSORT
View File

@ -2,7 +2,7 @@
//DTSRSORT PROC RPTNODE='SRTDAILY.RPT',
// RPTGEN='(+0)'
//*********************************************************************
//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.&RPTNODE.&RPTGEN.,DISP=SHR

4
Procs/DTSZUPDT
View File

@ -154,7 +154,7 @@
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929600
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00929700
//****************************************************************** 00929800
//STEP0480 EXEC PGM=SORT,PARM='VLTEST=0', SORT BTC RECORDS 00930000
//STEP0480 EXEC PGM=SORT, SORT BTC RECORDS 00930000
// COND=(0,LT) 00940000
//SYSOUT DD SYSOUT=* 00960000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BX415.BTC,DISP=SHR 00970000
@ -339,7 +339,7 @@
// AMP=('BUFNI=5,BUFND=10') 02079500
//* 02079600
//****************************************************************** 02079700
//STEP0910 EXEC PGM=SORT,PARM='VLTEST=0', SORT REPORT RECORDS 02080000
//STEP0910 EXEC PGM=SORT, SORT REPORT RECORDS 02080000
// COND=(0,LT) 02090000
//SYSOUT DD SYSOUT=* 02110000
//SORTIN DD DSN=DOESTAX.&LVLNODE..BD110.RPT(&S0100.),DISP=SHR 02120000

Some files were not shown because too many files have changed in this diff Show More