Merge 3 files into one file with header of first file

mohd Waseem Ahmed · New User Joined: 30 May 2008 Posts: 9 Location: hyderabad

Hi All,

I want to merge 3 PS files with below requirement

File 1 Having the records in below format
Customer#¦Customer Name¦Project Name¦UserId
7777¦xyz¦Project_7777¦xyza

File 2 Having the records in below format
Customer#¦Customer Name¦Project Name¦UserId
6666¦abc¦Project_6666¦abcd

File 3 Having the records in below format
Customer#¦Customer Name¦Project Name¦UserId
5555¦pqr¦Project_5555¦pqrs
4444¦stu¦Project_4444¦stuv

The output file should have the record in below format(With common Heading):
Customer#¦Customer Name¦Project Name¦UserId
7777¦xyz¦Project_7777¦xyza
6666¦abc¦Project_6666¦abcd
5555¦pqr¦Project_5555¦pqrs
4444¦stu¦Project_4444¦stuv

mmt_bit · New User Joined: 15 Jan 2009 Posts: 14 Location: Bangalore

Not sure this is the best method, but it will work.
It copies and deletes the duplicates:

//STEP01 EXEC PGM=SORT,
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=ISC.ISC09.SORT.DSN1,DISP=SHR
// DD DSN=ISC.ISC09.SORT.DSN2,DISP=SHR
// DD DSN=ISC.ISC09.SORT.DSN3,DISP=SHR
//SORTOUT DD DSN=ISC.ISC09.SORT.DSN4,DISP=SHR
//SYSIN DD *
SORT FIELDS=(1,1,CH,A)
SUM FIELDS=NONE

Ashish Ranjan · New User Joined: 12 Jan 2009 Posts: 2 Location: pune

Try below JCL.
//STEP10 EXEC PGM=ICETOOL,REGION=2048K
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=TEST.PS1,DISP=SHR
// DD DSN=TEST.PS2,DISP=SHR
// DD DSN=TEST.PS3,DISP=SHR
//OUT DD SYSOUT=*
//TOOLIN DD *
DISPLAY FROM(IN1) LIST(OUT) -
HEADER('CUST#') HEADER('CUSTNAME') HEADER('PROJNAME') -
HEADER('USERID') ON(01,4,CH) ON(05,3,CH) ON(08,12,CH) -
ON(20,4,CH)
/*

mohd Waseem Ahmed · New User Joined: 30 May 2008 Posts: 9 Location: hyderabad

I needed DFSORT option instead of ICETOOL.

Also, regarding SUM FIELDS=NONE option. I am afraid if we can use this option as headers might not be identical as there are from .CSV file upload. User may by mistake enter any other characer and hence those header records may not be the duplicates...

Thank once again but i would be grateful if we can use any DFSORT option.

mmt_bit · New User Joined: 15 Jan 2009 Posts: 14 Location: Bangalore

If the position of delimiter '|' of header record and the detail record is fixed and are at different positions in the file then you can use the First discard option.

In the example you have given, the 1 st delimiter for header is at 10th position and 1 st delimiter for detail record is at 5th position. Thus irrespective of what the user has entered you can delete the 2 headers.

Hope this helps....

Frank Yaeger · Posted: Mon Mar 02, 2009 10:16 pm

mohd,

You really haven't made it clear what you're trying to do and you seem to be contradicting yourself in different posts.

You showed an example with three identical headers, but then you say they may not be identical.

But you also say

mohd Waseem Ahmed · New User Joined: 30 May 2008 Posts: 9 Location: hyderabad

Hi All,

I accept that i did not make myself clear, I am sorry about that.
But presently client doesnt want us to use ICETOOL thats why i am not going for that option.

1. Firstly header will have same values(Here i meant format) in all 3 files, but these 3 files are upload from .CSV files so i expected them to be different (insertion of blank or any other characer in any one of the .CSV files so SUM FIELD =NONE will not work)

So, if there is any other option using which i can i would be grateful to you all. Thanks once again and sorry for the confusion.

Please let me know if the above explanation looks fine.

Thanks & Regards,
Waseem

Skolusu · Posted: Tue Mar 03, 2009 10:06 pm

mohd Waseem Ahmed,

I assumed all your 3 files have an lrecl of 80 and recfm fb. Use the following to eliminate the headers and have a single header

Frank Yaeger · Posted: Tue Mar 03, 2009 10:10 pm

Well, you didn't answer my question about which of the non-identical headings you wanted in the output file, so I'll assume you want the heading from input file1. Since you can't use ICETOOL and you can't use SUM, you'll need three steps as shown in this DFSORT job. Be sure to use MOD for step2 and step3.

mohd Waseem Ahmed · New User Joined: 30 May 2008 Posts: 9 Location: hyderabad

Hi Guys,

This is perfect...Frank Yaeger ur assumption was right on target to take the first heading(This is what needed)..I ve got 2 options now from you guys without using ICETOOL..Thats wonderful

I thank once again to Ashish Ranjan, mmt_bit, Frank and Skolusu.
I appreciate your cooperation shown in this regard.

Thanks & Regards,
Waseem