SYNCSORT E15 exit routine- tapping the ommitted records

Bharath Bhat · Posted: Tue Jan 27, 2009 5:27 pm

Hi,

Do we have a way to tap the omitted records from E15 exit routine?

My requirement is to split the input file into two based on some criteria (Match-merge processing). The processing will be done inside E15. Here we can eliminate the unwanted records. I wanted to check if we have a method to form another sort out file.

Bharath Bhat · Posted: Tue Jan 27, 2009 5:29 pm

One method I could think of is writing the unwanted records into a new file inside the program. But, I guess that will increase the I/O processing. It could be efficient if SORT could take care of it.

Thanks,

expat · Posted: Tue Jan 27, 2009 5:37 pm

Perhaps if you elaborated on the conditions for omitting records we may be able to suggest

Bharath Bhat · Posted: Tue Jan 27, 2009 7:04 pm

We have something called a rolled out department. I'll have the rolled out departments in an input file which will be compared against SORTIN. If they match, I want the record in SORTIN in SORTOUT. If they do not match, I need the record in another file. I do not have any key in the SORTIN to identify which type of record is it(Rolled out/non-rolled out). We do not want to append anything extra(which could have made the solution simpler).

SORTIN
----------

DEPT13409dknvfkh
DEPT23409dknvfkh
DEPT33409dknvfkh
DEPT43409dknvfkh
DEPT43409dknvfkh
DEPT23409dknvfkh
DEPT33409dknvfkh

ROLL-DEPT
--------------
DEPT1
DEPT4
DEPT9

SORTOUT
-----------
DEPT13409dknvfkh
DEPT43409dknvfkh
DEPT43409dknvfkh

Desired SORTOUT02
-----------------------

DEPT23409dknvfkh
DEPT33409dknvfkh
DEPT23409dknvfkh
DEPT33409dknvfkh

We would set a return code of 0 if matches or 4 if does not match.
0 would write into SORTOUT.
Where will the record go if return code = 4?
Will it be Lost? or could it be found somewhere else somehow?

enrico-sorichetti · Posted: Tue Jan 27, 2009 7:48 pm

It looks like You are hiding something...
for a simple two files match problem ( as Your data seems to describe )
there is no need for a E15 exit
search the forums with syncsort two files match and You will find many samples for Your need

Anuj Dhawan · Posted: Tue Jan 27, 2009 8:06 pm

Hi,

I'm in agreement with Expat, however, you may check this link www.ibmmainframes.com/about36475.html

Arun Raj · Posted: Tue Jan 27, 2009 11:24 pm

Bharath Bhat,

As already mentioned in this thread, you'll find many examples in this forum for two-file matches using SyncSort JOIN. If you find it difficult to adapt those to your requirement , post your requirement here so that somebody might have alternatives.

Bharath Bhat · Posted: Wed Jan 28, 2009 9:59 am

Pardon me.
For I forgot to mention the soul reason for using E15.

The reason behind this is, I would append another field to the SORTOUT after processing the rolled out departments. I would use another input file for getting this new field.

So my SORTOUT would look like,

DEPT13409dknvfkhID1
DEPT43409dknvfkhID5
DEPT43409dknvfkhID5

I do not have the liberty to change the LRECL of mentioned SORTOUT02.
If I would go for a sort on the last field, that would result in a file with large LRECL for SORTOUT02 than that of SORTIN. In that case I would need to use E35 exit in the same step to trim SORTOUT02.

Till now, the best I could think is to write it into a new file inside E15.

I hope I am clear this time.

Bharath Bhat · Posted: Wed Jan 28, 2009 10:59 am

Arun Raj · Posted: Wed Jan 28, 2009 11:24 am

Bharath Bhat · Posted: Wed Jan 28, 2009 12:48 pm

Arun,

If you compare the SORTIN and SORTOUT, the LRECL of SORTOUT is incremented by the length of ID. That is acceptable for me. But I want the LRECL of the second file(SORTOUT02) to be same as the LRECL of SORTIN. Had it not been a constraint, I could have just appended the ID on rolled out records and split the file into two, based on the last field.

That would create 2 files having LRECL larger than SORTIN.

The ID has a one to one relationship with Department. That will be unloaded from table to a file. With the help of that file, I'll find out the ID that has to be appended.

Arun Raj · Posted: Wed Jan 28, 2009 1:23 pm

Bharath Bhat,

From whatever you've posted so far, I believe this can achieved without exit routines. Also are you trying to force an RC=4 if any single record is written into the unmatched file - SORTOUT2?

Bharath Bhat · Posted: Wed Jan 28, 2009 2:08 pm

dick scherrer · Posted: Wed Jan 28, 2009 2:15 pm

Hello,

It will probably help if the requirement was posted in terms of what input data (all files) is to be processed and what output (all files) is to be written from the process along with suitable explanations of why each sample input record was selected or not selected and what rules were followed to create the output.

The volume of sample data does not need to be large, but just enough to demonstrate the full requirement.