55 lines
4.3 KiB
Plaintext
55 lines
4.3 KiB
Plaintext
//**** 00000100
|
|
//** 00000200
|
|
//** DAILY CREDITS AND DEBITS - REPORT PROC. 00000339
|
|
//** 00000605
|
|
//DTSRP330 PROC 00000739
|
|
//** DEFNS NEEDED FOR THIS PROC: 00001105
|
|
//** LVLNODE = DEVL/TEST/PROD 00001205
|
|
//**** 00001408
|
|
//* 00410039
|
|
//STEP0100 EXEC PGM=SORT, SORT REPORT RECORDS 00420039
|
|
// COND=(0,LT), 00421039
|
|
// REGION=0K 00422039
|
|
//SYSOUT DD SYSOUT=* 00423039
|
|
//SORTIN DD DSN=&&BE330RPT, 00424039
|
|
// DISP=(OLD,DELETE,DELETE) 00424139
|
|
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE) 00425039
|
|
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE) 00426039
|
|
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE) 00427039
|
|
//SORTOUT DD DSN=&&SRTRPT, 00428039
|
|
// DISP=(,PASS,DELETE), 00429039
|
|
// UNIT=SYSDA, 00429139
|
|
// SPACE=(8192,(1000,1000),RLSE), 00429239
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00429339
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSRREC),DISP=SHR 00429441
|
|
//**** 00429539
|
|
//* REPORT GENERATION 00430037
|
|
//STEP0200 EXEC PGM=DTSBD800, 00440039
|
|
// COND=(0,LT) 00450037
|
|
//SYSOUT DD SYSOUT=* 00460037
|
|
//SYSABOUT DD SYSOUT=* 00470037
|
|
//SYSUDUMP DD SYSOUT=* 00480037
|
|
//** 00490037
|
|
//PARMIN DD DUMMY 00500037
|
|
//** 00510037
|
|
//ATLSTIN DD DUMMY 00520037
|
|
//** 00530037
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00530143
|
|
//DTSFVRI1 DD DSN=&&SRTRPT,DISP=(OLD,DELETE,DELETE) 00531037
|
|
//DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR, 00532037
|
|
// AMP=('BUFNI=5,BUFND=10') 00533037
|
|
//* 00534037
|
|
//** DEBITS AND CREDITS REPORT 00535039
|
|
//RPT330R1 DD SYSOUT=Z, 00536042
|
|
// HOLD=&LHOLD., 00537037
|
|
// DEST=U@PRT65 00538037
|
|
//* 00539037
|
|
//RPT330R2 DD SYSOUT=Z, 00539142
|
|
// HOLD=&LHOLD., 00539237
|
|
// DEST=U@PRT65 00539337
|
|
//* 00539437
|
|
//RPT980R1 DD SYSOUT=Q,COPIES=2, 00539537
|
|
// HOLD=&LHOLD., 00539637
|
|
// DEST=U@PRT65 00539737
|
|
//* 00540037
|