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

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