MVSFORUMS.com

[SAHANA]

Hi,

Can anyone please give me the solution for the below requirement.

File1 has agent nos in Column 1 and in Column 51. The agent no field is 5 digits.

File2 has agents nos starting from Column 2 and is 5 digits.

I have to OMIT the agent nos present in File1 from File2. and the output can be in File2 itself. I have to exlcude all the agents present in File1 in column1 and in column 51 from File2.

Thanks
Sahana

[papadi]

[SAHANA]

File1:

Column1 and column 51 in File1 has the agent nos. i.e. for example A0001 and A0002

A0001 SAHANA A0002 SADHANA
A0003 SATHYA A0004 SEKAR

File2:

File2 has agent nos in column1..

A0001 SAHANA
A0004 SEKAR
A0003 SATHYA
A0008 SUJAY
A0006 SUJAN

A0001 and A0004 agent nos present in File1 have to be excluded from File2 since these agent nos are present in File2 as well...

So the output File2 should have records like below...

File2:

A0008 SUJAY
A0006 SUJAN

Thanks
Sahana

[Nic Clouston]

A0003 is in both files so what happens to that? You say only A0001 and A0004 get dropped but you are not showing A0003 in your output.

You say the output can be 'file 2 itself' - if you follow the threads in the forum you would know that that is a BAD thing to do.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

[SAHANA]

Hi All,

I am really sorry I missed out to say that A0003 should not be in File2.

I will be cautious in the future while I post.

Thanks
Sahana

[kolusu]

SAHANA,

The following DFSORT jcl will give you the desired results. Since you need to validate the account numbers in pos 1 and 51 , we concatenate the same file twice and using when=group we propagate the file number and key on to end of record and then sort on the common key.

Using another when=group we push the file number when there is match and get the desired results using an include on OUTFIL

I assumed that your input is FB recfm and 80 bytes LRECL

[SAHANA]

Hi Kolusu,

File1 is 100 bytes LRECL and File2 is 80bytes LRECL.

Records in the File1 are like below. Agent nos are present in Column 1 and 51.

[kolusu]

SAHANA,

You could have saved a lot of time had you been clear with the requirements. You canNOT concatenate different FB LRECL files. Please provide detailed information on what you're trying to accomplish. Do not make people guess what you mean. This will give you a much better chance of getting a good answer to your question.

Any use the following DFSORT JCL which will give you the desired results

[SAHANA]

Thanks Kolusu.. It worked!!

But there was a change in requirement.. The client wanted me to reverse the logic of what was stated earlier.. i.e.

File1 has below records: