enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
Downloaded and inlined the attachment
| Code: |
//BBW040 EXEC RUNZXI,PROG=BBW040,PSB=BBW040
//IEFRDER DD DSN=SYSGEN.WORK.BBW040.BACKOZM.DLILOG,
// BLKSIZE=22528,LRECL=22524,RECFM=VB,
// SPACE=(CYL,(5,50),RLSE),
// DISP=(NEW,CATLG,CATLG)
//BA0ACCD DD DSN=ICAACC.WORK.GBYYNF.AGNTACCS.DBDATA,DISP=(OLD)
//BA0ACCE DD DSN=ICAACC.WORK.GBYYNF.AGNTAREA.DBDATA,DISP=(OLD)
//RECON1 DD DSN=SYSGEN.MAST.CPYD.RECON1.KSDS,DISP=SHR
//RECON2 DD DSN=SYSGEN.MAST.CPYD.RECON2.KSDS,DISP=SHR
//RECON3 DD DSN=SYSGEN.MAST.CPYD.RECON3.KSDS,DISP=SHR
//AGYEXCEP DD DSN=ICAACC.WORK.BBW040.EXCEPT.DATA,DCB=(RECFM=FB,
// BLKSIZE=27960,LRECL=60),SPACE=(CYL,(20,10),RLSE),
// DISP=(NEW,CATLG,DELETE),UNIT=3390
//BCSYSDTE DD DSN=ICAACC.DEVL.GBYYNF.BCSYSDTE.KSDS,DISP=(SHR)
//PRINT30 DD SYSOUT=B
//*
//BBW050 EXEC RUNZXI,PROG=BBW050,PSB=BBW050
//STEPLIB DD DSN=ICAACC.UNI3.LM.BATCH.LOAD,DISP=SHR
//IEFRDER DD DSN=SYSGEN.WORK.BBW050.BACKOZM.DLILOG,
// BLKSIZE=22528,LRECL=22524,RECFM=VB,
// SPACE=(CYL,(5,50),RLSE),
// DISP=(NEW,CATLG,CATLG)
//BA0ACCD DD DSN=ICAACC.WORK.GBYYNF.AGNTACCS.DBDATA,DISP=(OLD)
//BA0ACCE DD DSN=ICAACC.WORK.GBYYNF.AGNTAREA.DBDATA,DISP=(OLD)
//BA0ACBD DD DSN=ICAACC.WORK.GBYYNF.BRCHACCS.DBDATA,DISP=(OLD)
//BA0ACB2 DD DSN=ICAACC.WORK.GBYYNF.BRCHACCS.DBSX2,DISP=(OLD)
//RECON1 DD DSN=SYSGEN.MAST.CPYD.RECON1.KSDS,DISP=SHR
//RECON2 DD DSN=SYSGEN.MAST.CPYD.RECON2.KSDS,DISP=SHR
//RECON3 DD DSN=SYSGEN.MAST.CPYD.RECON3.KSDS,DISP=SHR
//BREXCEP DD DSN=ICAACC.WORK.BBW050.EXCEPT.DATA,DCB=(RECFM=FB,
// BLKSIZE=27960,LRECL=60),SPACE=(CYL,(20,10),RLSE),
// DISP=(NEW,CATLG,DELETE),UNIT=3390
//BCSYSDTE DD DSN=ICAACC.DEVL.GBYYNF.BCSYSDTE.KSDS,DISP=(SHR)
//PRINT30 DD SYSOUT=B
/*
|
the formatting was already clobbered |
|
