by shivkumar » Sun Oct 28, 2007 11:34 am
I m using ICETOOL utility ,,,and for ur info..please see below code..
I m looking into it ,,,but always geeting user code 16 .
//TOOL EXEC PGM=ICETOOL,PARM='MINLIM=1M',REGION=2M
//**STEP EXEC PGM=SORT,REGION=1M
//DFSMSG DD SYSOUT=*
//TOOLMSG DD SYSOUT=*
//SORTWK01 DD UNIT=D,SPACE=(CYL,(100,50),RLSE)
//SORTWK02 DD UNIT=D,SPACE=(CYL,(100,50),RLSE)
//SORTWK03 DD UNIT=D,SPACE=(CYL,(100,50),RLSE)
//SORTWK04 DD UNIT=D,SPACE=(CYL,(100,50),RLSE)
//SORTWK05 DD UNIT=D,SPACE=(CYL,(100,50),RLSE)
//SORTIN DD DSN=PIL0.UI0504B0(0),DISP=SHR
//SORTOUT DD DSN=@LIQ2UZ.SORT2.OUT,DISP=(NEW,CATLG,DELETE),
// UNIT=D,SPACE=(CYL,(750,400),RLSE),
// DCB=(RECFM=VB,BLKSIZE=35045)
//SYSIN DD *
//TOOLIN DD *
//SYSIN DD *
//TOOLIN DD *
SORT FROM(SORTIN) TO(SORTOUT) USING(CND1)
/*
//CND1CNTL DD *
SORT FIELDS=COPY
INCLUDE COND=(25,12,CH,EQ,C'000LH0012420',OR,
25,12,CH,EQ,C'000LH0100691',OR,
25,12,CH,EQ,C'000LH0252274',OR,
25,12,CH,EQ,C'000LH0254739',OR,
25,12,CH,EQ,C'000LH0254769',OR,
25,12,CH,EQ,C'000LH0260369',OR,
25,12,CH,EQ,C'000LH0261605',OR,
25,12,CH,EQ,C'000LH0261669',OR,
25,12,CH,EQ,C'000LH0274868',OR,
25,12,CH,EQ,C'000LH0276483',OR,
25,12,CH,EQ,C'000LH0287683',OR,
25,12,CH,EQ,C'000L01268855',OR,
.....
..... these condtions having 2500 records.
.....
/*
//