IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

SPLICE Command with multiple common fields


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
cpuhawg

Active User


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

PostPosted: Wed Nov 14, 2007 2:12 am
Reply with quote

I need some assistance on how to SPLICE the following together

Input 1
Code:

ABENDAID                                              TSCICS   ALTER        0002
ABJ                                                   TSPWR    ALTER        0001
ACTP                                                  CICSSTC  ALTER        0001
ACTP                                                  CR9999   ALTER        0001
ADT0                                                  AD       ALTER        0001
ADT0                                                  CR9999   ALTER        0001
ADT0                                                  CSS      ALTER        0001
ADT0                                                  IS       ALTER        0001


Input 2
Code:

ABENDAID ABENDAID.**                                  TSCICS   ALTER   0002     
ABENDAID ABENDAID.CICS*.**                            TSCICS   ALTER   0002     
ABJ      ABJ.**                                       TSPWR    ALTER   0001     
ACTP     ACTP.**                                      CICSSTC  ALTER   0001     
ACTP     ACTP.**                                      CR9999   ALTER   0001     
ADT0     ADT0.**                                      AD       ALTER   0002     
ADT0     ADT0.**                                      CR9999   ALTER   0002     
ADT0     ADT0.**                                      CSS      ALTER   0002     
ADT0     ADT0.CIMS.**                                 IS       ALTER   0002     


Output should look like:


Code:

ABENDAID ABENDAID.**                                  TSCICS   ALTER   0002 0002
ABENDAID ABENDAID.CICS*.**                            TSCICS   ALTER   0002 0002
ABJ      ABJ.**                                       TSPWR    ALTER   0001 0001
ACTP     ACTP.**                                      CICSSTC  ALTER   0001 0001
ACTP     ACTP.**                                      CR9999   ALTER   0001 0001
ADT0     ADT0.**                                      AD       ALTER   0002 0001
ADT0     ADT0.**                                      CSS      ALTER   0002 0001
ADT0     ADT0.CIMS.**                                 IS       ALTER   0002 0001


The splicing has to occur by position 1 for 8 and position 55 for 17. There may be multiple records on INPUT2 for a single record on INPUT1 (like the ABENDAID records).
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


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

PostPosted: Wed Nov 14, 2007 2:48 am
Reply with quote

Just use two ON fields - ON(1,8,CH) ON(55,17,CH) and WITHALL in the SPLICE operator.
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 14, 2007 3:00 am
Reply with quote

I attempted to use your suggestion and received the following error:

Code:

          * Splice the needed data from File1 and File2 together           
          SPLICE FROM(TEMP2) TO(COMBINE) ON(1,8,CH) ON(55,17,CH) WITHALL   
ICE613A 0 REQUIRED KEYWORD MISSING:  WITH                                   
ICE602I 0 OPERATION RETURN CODE:  12                                       
                                                                           
                                                                           
ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE:  12
             
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 14, 2007 3:08 am
Reply with quote

I used the following and was successful. Thank you for your time and input.

Code:

SPLICE FROM(TEMP2) TO(COMBINE) ON(1,8,CH) ON(55,17,CH) WITHALL -       
       WITH(10,44) WITH(72,4)                                         
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts RACF - Rebuild SETROPTS command which... All Other Mainframe Topics 3
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Routing command Address SDSF to other... TSO/ISPF 2
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts DTL - how to define key with stacked ... TSO/ISPF 3
Search our Forums:

Back to Top