IBM Mainframe Forum

Hi all

I need some help to fine tune the below short code.
What i'm trying here is to calculate the number of records that have got the same 6 byte value starting on byte 10. --> ON(10,6,CH)

//SORT002 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=A
//DFSMSG DD SYSOUT=A
//INPUT DD DISP=(OLD),DSN=HLQ.DDD1.DD2
//OUTPUT DD DISP=(OLD),DSN=HLQ.DDD1.XX2
//TOOLIN DD *
OCCUR FROM(INPUT) LIST(OUTPUT) NOHEADER -
ON(10,6,CH) ON(VALCNT,N05)
/*

The above is working fine.
I ,however, need to exclude the first 2 records from processing. I tried the following but it did not work out.
SUBSET FROM(INPUT) TO(OUTPUT) INPUT REMOVE FIRST(2)


Can you help me out as to how to get rid of the first 2 records?
Is there a way to use include/omit in ICETOOL ? I'm reading the docs but any help is welcome.
Both the input and output files are FB, LRECL=80, BLKSIZE=800

thanks,
David

If you just have the OCCUR operator in //TOOLIN, you could add this:



Alternatively, you could also use an INCLUDE or OMIT statement in //DFSPARM.

Just note that anything you put in //DFSPARM will be applied to every ICETOOL operator in //TOOLIN.

Here's another way to do it without using //DFSPARM, but it takes two passes:

Hi Frank

Thanks for your reply.
I tried both ways, both fine. (using option 2)


cheers,
David.