Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
ICETOOL SPLICE Problem

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Tue Nov 25, 2008 11:56 pm    Post subject: ICETOOL SPLICE Problem
Reply with quote

I have two files that have been sort together and am having a problem finding the appropriate SPLICE control cards to have them merged.

Code:

----+----1----+----2----+----3----+----4----+----5----+----6----+----7
                            GROUP1            X           
FIELD1:AAAAAAAAAAAAAAAAAAAA:GROUP1  :RRRRRRRR:
FIELD1:BBBBBBBBBBBBBBBBBBBB:GROUP1  :RRRRRRRR:
FIELD1:CCCCCCCCCCCCCCCCCCCC:GROUP1  :AAAAAAAA:
FIELD1:DDDDDDDDDDDDDDDDDDDD:GROUP2  :UUUUUUUU:
FIELD1:EEEEEEEEEEEEEEEEEEEE:GROUP2  :AAAAAAAA:
FIELD1:FFFFFFFFFFFFFFFFFFFF:GROUP2  :RRRRRRRR:
                            GROUP3            Y           
FIELD2:GGGGGGGGGGGGGGGGGGGG:GROUP3  :RRRRRRRR:
FIELD2:HHHHHHHHHHHHHHHHHHHH:GROUP3  :RRRRRRRR:
FIELD3:IIIIIIIIIIIIIIIIIIII:GROUP4  :RRRRRRRR:
FIELD3:JJJJJJJJJJJJJJJJJJJJ:GROUP4  :UUUUUUUU:


I want match on "GROUP? " in positions 29-36 and if they match..... the "X" or "Y" in position 47 should overlay the matched records. I also want to keep all the other records intact. The problem I am having is the records with GROUP2 or GROUP4 attempt to SPLICE according to field 29-36 and I lose records.

Code:

----+----1----+----2----+----3----+----4----+----5----+----6----+----7
FIELD1:AAAAAAAAAAAAAAAAAAAA:GROUP1  :RRRRRRRR:X
FIELD1:BBBBBBBBBBBBBBBBBBBB:GROUP1  :RRRRRRRR:X
FIELD1:CCCCCCCCCCCCCCCCCCCC:GROUP1  :AAAAAAAA:X
FIELD1:DDDDDDDDDDDDDDDDDDDD:GROUP2  :UUUUUUUU:
FIELD1:EEEEEEEEEEEEEEEEEEEE:GROUP2  :AAAAAAAA:
FIELD1:FFFFFFFFFFFFFFFFFFFF:GROUP2  :RRRRRRRR:
FIELD2:GGGGGGGGGGGGGGGGGGGG:GROUP3  :RRRRRRRR:Y
FIELD2:HHHHHHHHHHHHHHHHHHHH:GROUP3  :RRRRRRRR:Y
FIELD3:IIIIIIIIIIIIIIIIIIII:GROUP4  :RRRRRRRR:
FIELD3:JJJJJJJJJJJJJJJJJJJJ:GROUP4  :UUUUUUUU:


Any suggestion or solution would be appreciated.
Back to top
View user's profile Send private message

Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Wed Nov 26, 2008 12:09 am    Post subject:
Reply with quote

You can use KEEPBASE to keep the first record of each group. According to your example, that would keep these records:

Code:

                            GROUP1            X
...
FIELD1:DDDDDDDDDDDDDDDDDDDD:GROUP2  :UUUUUUUU:
...
                            GROUP3            Y
...
FIELD3:IIIIIIIIIIIIIIIIIIII:GROUP4  :RRRRRRRR:


Now you can just use an appropriate OUTFIL OMIT to get rid of those first GROUP1 and GROUP3 records based on blanks in some position (e.g. 1-5).
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Nov 26, 2008 12:27 am    Post subject: Reply to: ICETOOL SPLICE Problem
Reply with quote

KEEPBASE solved the primary problem, but I was still losing some records which turned out to be records that were not duplicates according to positions 29-36. I found an example on page 602 of the V1R8.0 DFSORT Application Programming Guide that suggested using KEEPNODUPS (with WITHALL and KEEPBASE) and now all records are accounted for.

Thank you for your help Frank and have a Happy Thanksgiving. Your assistance to this board is invaluable.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Wed Nov 26, 2008 12:42 am    Post subject:
Reply with quote

Right. You need KEEPNODUPS for nondups. I'm glad you figured it out.

Thanks for the kind words and I wish you a Happy Thanksgiving as well.
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Wed Nov 26, 2008 3:52 am    Post subject:
Reply with quote

Hi,

do you mind posting the code.


Thanks



Gerry
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts ICETOOL - RESIZE DYNAMICALLY kranthikumarb DFSORT/ICETOOL 0 Tue Nov 21, 2017 5:30 pm
No new posts Having a problem FTP'ng to the MF pahiker All Other Mainframe Topics 2 Fri Nov 10, 2017 8:20 pm
No new posts Splice more than 50 occurances rajatbagga DFSORT/ICETOOL 1 Wed Oct 11, 2017 9:36 am
No new posts Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts LMINIT problem - not finding DDNAME Danielle.Filteau CLIST & REXX 7 Tue Sep 19, 2017 9:57 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us