Syncsort - Removing set of records.

jose.jeyan · New User Joined: 28 Jul 2006 Posts: 60 Location: Mumbai

Hi ,

Please do advise me on the below query.

While merging two files i need to remove the set of records if any header record is duplicated in both the file.

For Example:

File1 contains records as

jose.jeyan · New User Joined: 28 Jul 2006 Posts: 60 Location: Mumbai

1)Sequence Number for first 4 bytes is nothing but the ISPF screen number. Nothing to worry about it. Actual record start from X in header and A in detail.
2) LRECL is 68 and recfm is FB
3) Headers can be identfied as XXXXXX for first 6 bytes.
4) DFSORT Z/OS v1.10

And CICS guy i will post my JCL soon..

Frank Yaeger · Posted: Mon Jul 19, 2010 10:04 pm

I removed the sequence numbers from your first post and used ubb code tags.

It looks like you're showing what you got for output, not what you want for output - right? Please show an example of your expected output that corresponds to your example of input.

Please run this job and post the //SYSOUT messages so I can determine your DFSORT level:

jose.jeyan · New User Joined: 28 Jul 2006 Posts: 60 Location: Mumbai

Hi Frank,

First input file1 contains three set of records.
Second input file2 contains four set of records.
One set contains (One header and mutiple detail records).

The below given header record is duplicated in both the file.

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX7777XXXXX

If we merge both the files we will have all seven set of records in output file.But in the given output file(File3) we have only six set of records where
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX7777XXXXX and its detail records are carried from first file to the output file. Second file data is eliminated for this duplicated header record.

The output file given below is what i am expecting.

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX7777XXXXX
AAAAAAAAAAAAAA
BBBBBBBBBBBBBB
CCCCCCCCCCCCCC
dddddddddddddd
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX8888XXXXX
AAAAAAAAAAAAAA
BBBBBBBBBBBBBB
CCCCCCCCCCCCCC
DDDDDDDDDDDDDD
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX9999XXXXX
AAAAAAAAAAAAAA
BBBBBBBBBBBBBB
CCCCCCCCCCCCCC
dddddddddddddd
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX1111XXXXX AAAAAAAAAAAAAA
BBBBBBBBBBBBBB
CCCCCCCCCCCCCC
dddddddddddddd
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX1122XXXXX
AAAAAAAAAAAAAA
BBBBBBBBBBBBBB
CCCCCCCCCCCCCC
DDDDDDDDDDDDDD
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX1233XXXXX
AAAAAAAAAAAAAA
BBBBBBBBBBBBBB
CCCCCCCCCCCCCC
DDDDDDDDDDDDDD

Given below is the sysout message to determine DFSORT level.

SYNCSORT FOR Z/OS 1.3.2.1R U.S. PATENTS: 4210961, 5117495 (C)
z/OS 1.10.0

SYSIN :
OPTION COPY
WER108I SORTIN : RECFM=FB ; LRECL= 80; BLKSIZE= 80
WER110I SORTOUT : RECFM=FB ; LRECL= 80; BLKSIZE= 80
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER054I RCD IN 1, OUT 1
WER169I RELEASE 1.3 BATCH 0506 TPF LEVEL 2.1
WER052I END SYNCSORT -
S1,,DIAG=AE00,6002,822E,00CE,E6D2,

Please advise.

Arun Raj · Posted: Tue Jul 20, 2010 3:34 pm

You dont have DFSORT. The SYSOUT messages suggest that your shop uses Syncsort. The topic will be moved to JCL forum where Syncsort topics are discussed.

jose.jeyan · New User Joined: 28 Jul 2006 Posts: 60 Location: Mumbai

Hi Arun is there some options available in syncsort to perform the above query.
I have used ICTOOL splice, and it does works fine with the syncsort. So does that mean i am not able to use ICETOOL commands.

expat · Posted: Tue Jul 20, 2010 6:18 pm

ICETOOL will almost certainly be an alias pointing to SYNCTOOL, which may or may not contain the same functionalities.

Arun Raj · Posted: Wed Jul 21, 2010 7:22 pm

jose.jeyan,

The below SYNCTOOL application might be of help. I assumed the input/output LRECLs be 86 and the postion of the key in the header as 35,4. I could nt test this with actual files as I am yet to get my mainframe id