MVSFORUMS.com

[nsantos]

Hello,

I have 1 file who looks like this (they are letters from 2 different companys):

[Dummy]

This might be possible depending on our input.

Is the Address always 4 lines?

Will it be alternate addresses like 1,3, 5 & 7 records will be company-1. 2,4,6 & 8 will be company-2?

[nsantos]

The address is variable, it can be 4 lines or 3 lines, and each adress belongs at each client. The adresses are always different, because the clients changes. The only thing that repeats is the name of the company at the beginning of each letter.
There are only 2 companys.

[Frank Yaeger]

With z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 (Dec, 2004), you can use the new functions IFTHEN, KEEPBASE, VLENOVLY along with SPLICE to do what you want. I assume when you say "I want to sort the letters from Company1 and Company2 into 2 different files" you mean you want the letters from Company1 in one output file in their original order, and the letters from Company2 in another output file in their original order, and that there's really no sorting involved. I also assumed that your VB input file has LRECL=80, but the job can be adjusted for other LRECLs.

If you have DFSORT, but you don't have the Dec, 2004 PTF, ask your System Programmer to install it (it's free). Note that the job will not work with Syncsort, because it doesn't have these new functions.

Here's the DFSORT/ICETOOL job: