sandeep4u
New User
Joined: 12 Aug 2005 Posts: 32
|
|
|
|
Here is the JCL which compiles the IE report.............
//CLAXA35A JOB ACCT,'PREP DEV3',
//* TYPRUN=SCAN,
// NOTIFY=&SYSUID,
// CLASS=A,MSGLEVEL=(1,1),MSGCLASS=X,REGION=0M
//*************************************************
//* CONVERTED TO IE9601 LEIGH SMITH 20-OCT-98
//*************************************************
//FSTTST3 JCLLIB ORDER=FST.DEVP.IE9601.PROCLIB
//STEP0001 EXEC PREPIE96,
// IN1=DEV3,
//* IN1=TST3,
// SRC=DEV3,
//* SRC=TST3,
// WORK=SYSDA,
// SRTCYL='12',
// XTRCYL='12',
// WRKCYL='12',
// SIGNON='SIGNON',
// SOURCE='REPORTS',
// MEMBER=TPMX105
//*
here is the main JCL which uses ie program...
//FSLPAMS2 JOB ACCT,'AMSOFT SUSPENSE S2',
//* TYPRUN=SCAN,
// CLASS=6,MSGLEVEL=(1,1),MSGCLASS=J,REGION=0M
#SCC,COND=(5,LT,FSTNJSUS.RTNCDESU)
#SCC,COND=(4,LT,FSTSCOL2.SUSL2203)
//*
//* SCORPIO VERSION
//*
//FSTPRD3 JCLLIB ORDER=(SYS50.CA7PROC.FST)
//*
//SETVARS SET XENV='PRD3'
// SET XFEED='ASC'
// SET XSRCE='SUS'
// SET OUTENV1='PRD3'
// SET XLOAD='FST.PRD3'
// SET XLOADUID='FSTPAMS2'
// SET XDB2SYS='DSN1'
// SET XDB2PLAN='FSTIEP3'
// SET SORT1='SORTDYN6'
// SET SORTIE1='SORTDYN1'
// SET SORTIE2='SORTDYN1'
// SET SORTIE3='SORTDYN5'
// SET XSYSOUT='(Q)'
//* --- CHANGE THIS FROM '+1' TO '0' FOR RESTARTS AT THE FSTGENJV STEP
// SET GENJVGDG='+1'
//** SET RPTCYL1=10
//** SET RPTCYLX1=5
// SET TRNCYL1=200
// SET TRNCYLX1=100
// SET TRNCYL2=200
// SET TRNCYLX2=100
// SET WRKCYL1=300
// SET WRKCYLX1=100
//FSTEMPS2 INCLUDE MEMBER=FSTAMSS2
//*
//FSTCTLJ2 EXEC FSTCTLJ2,
// OUT=&OUTENV1,
// FEED=&XFEED,
// GDG=&GENJVGDG,
// SRCE=&XSRCE,
// SYSOUT=&XSYSOUT
//*
//FSTAUDSU EXEC FSTAUDSU,COND=(0,NE,FSTNJSUS.RTNCDESU),
// SRTCYL=100,
// XTRCYL=100,
// WRKCYL=100,
// ENV=&XLOAD
//FSTFMTRE DD DSN=FST.&XENV..&XFEED..&XSRCE..VALID.GDG(&GENJVGDG),
// DISP=SHR
//*
//FSTSURUN EXEC FSTSURUN,COND=(0,NE,FSTNJSUS.RTNCDESU),
// CA7MEM='SETAMS2'
//*
//FSTSURU2 EXEC FSTSURUN,
// COND=((5,LT,FSTNJSUS.RTNCDESU),(3,EQ,FSTSCOL2.SUSL2203)),
// CA7MEM='SETAMSC'
//
thanks...
Sandy |
|