64 lines
5.0 KiB
Plaintext
64 lines
5.0 KiB
Plaintext
//**** 00000100
|
|
//** 00000200
|
|
//** DAILY ATC FILE UPDATE EXTRACT. 00000399
|
|
//** (*NO* MSTR UPDATE) 00000505
|
|
//** 00000605
|
|
//DTSBX347 PROC 00000799
|
|
//* 00000899
|
|
//** DEFNS NEEDED FOR THIS PROC: 00001105
|
|
//** LVLNODE = DEVL/TEST/PROD 00001205
|
|
//**** 00001408
|
|
//STEP0100 EXEC PGM=DTSBX347, PERIODIC EXTRACT 00001599
|
|
// COND=(0,LT) 00001699
|
|
//* 00001819
|
|
//SYSOUT DD SYSOUT=* 00004001
|
|
//SYSABOUT DD SYSOUT=* 00005001
|
|
//SYSUDUMP DD SYSOUT=* 00006001
|
|
//* 00013199
|
|
//**** 00082099
|
|
//DTSFATHI DD DSN=DOESTAX.&MSTNODE..VSAM.ATH,DISP=SHR, 00083099
|
|
// AMP=('BUFNI=5,BUFND=10') 00085099
|
|
//* 00085499
|
|
//ATHFTRNO DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ATHTRN, 00085599
|
|
//* DISP=(NEW,CATLG,CATLG), 00085699
|
|
// DISP=(OLD,KEEP,KEEP), 00085799
|
|
// UNIT=SYSDA, 00085899
|
|
// SPACE=(CYL,(10,5),RLSE), 00085999
|
|
// DCB=(RECFM=FB,LRECL=48,BLKSIZE=24000) 00086099
|
|
//* 00086199
|
|
//ATHFHDRO DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ATHHDR, 00086299
|
|
//* DISP=(NEW,CATLG,CATLG), 00086399
|
|
// DISP=(OLD,KEEP,KEEP), 00086499
|
|
// UNIT=SYSDA, 00086599
|
|
// SPACE=(CYL,(10,5),RLSE), 00086699
|
|
// DCB=(RECFM=FB,LRECL=134,BLKSIZE=26800) 00086799
|
|
//* 00086899
|
|
//ATHFRPTO DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ATHRPT, 00086999
|
|
//* DISP=(NEW,CATLG,CATLG), 00087099
|
|
// DISP=(OLD,KEEP,KEEP), 00087199
|
|
// UNIT=SYSDA, 00087299
|
|
// SPACE=(CYL,(10,5),RLSE), 00087399
|
|
// DCB=(RECFM=FB,LRECL=190,BLKSIZE=28500) 00087499
|
|
//* 00087599
|
|
//ATHFATXO DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ATHATX, 00087699
|
|
//* DISP=(NEW,CATLG,CATLG), 00087799
|
|
// DISP=(OLD,KEEP,KEEP), 00087899
|
|
// UNIT=SYSDA, 00087999
|
|
// SPACE=(CYL,(10,5),RLSE), 00088099
|
|
// DCB=(RECFM=FB,LRECL=234,BLKSIZE=28080) 00088199
|
|
//* 00088299
|
|
//ATHFPAYO DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ATHPAY, 00088399
|
|
//* DISP=(NEW,CATLG,CATLG), 00088499
|
|
// DISP=(OLD,KEEP,KEEP), 00088599
|
|
// UNIT=SYSDA, 00088699
|
|
// SPACE=(CYL,(10,5),RLSE), 00088799
|
|
// DCB=(RECFM=FB,LRECL=113,BLKSIZE=28250) 00088899
|
|
//* 00088999
|
|
//ATHFADJO DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ATHADJ, 00089099
|
|
//* DISP=(NEW,CATLG,CATLG), 00090099
|
|
// DISP=(OLD,KEEP,KEEP), 00100099
|
|
// UNIT=SYSDA, 00110099
|
|
// SPACE=(CYL,(10,5),RLSE), 00120099
|
|
// DCB=(RECFM=FB,LRECL=138,BLKSIZE=28980) 00130099
|
|
//* 00140099
|