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

JCL to search a string
IBM Mainframe Forums -> SYNCSORT
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
rahuindo

New User


Joined: 09 Apr 2008
Posts: 83
Location: Chennai
PostPosted: Tue Sep 24, 2013 3:49 am
 Reply with quote
Hi,
I have an input VB QSAM file and I need to copy the records which are having the string "RA00PF" or "RA00FP". These 2 strings can occur between the position 10 and 200 and are of 6-bytes in length. Currently, I am doing using the following:

Code:

// '          ORIF=(10,EQ,C''RA00PF''),   ',
// '          ORIF=(10,EQ,C''RA00FP''),   ',
// '          ORIF=(16,EQ,C''RA00PF''),   ',
// '          ORIF=(16,EQ,C''RA00FP''),   ',
// '          ORIF=(22,EQ,C''RA00PF''),   ',
// '          ORIF=(22,EQ,C''RA00FP''),   ',
// '          ORIF=(28,EQ,C''RA00PF''),   ',
// '          ORIF=(28,EQ,C''RA00FP''),   ',
// '          ORIF=(34,EQ,C''RA00PF''),   ',
// '          ORIF=(34,EQ,C''RA00FP''),   ',
// '          ORIF=(40,EQ,C''RA00PF''),   ',
// '          ORIF=(40,EQ,C''RA00FP''),   ',

Is there a better way of doing this through JCL?
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
PostPosted: Tue Sep 24, 2013 4:01 am
 Reply with quote
Not with JCL.

You can do it with your SORT product, which we know is SyncSort

Code:
  INCLUDE COND=(6,195,SS,EQ,C'RA00PF',
             OR,6,195,SS,EQ,C'RA00FP')
Back to top
View user's profile Send private message
rahuindo

New User


Joined: 09 Apr 2008
Posts: 83
Location: Chennai
PostPosted: Tue Sep 24, 2013 4:14 am
 Reply with quote
Thanks Bill. How will this work? As per my knowledge, "6" corresponds to the starting position and 195 will be the lenght of the string. So, will the above condition start searching at 6th position and look for the character "RAA0PF" for the next 195 bytes?
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
PostPosted: Tue Sep 24, 2013 4:43 am
 Reply with quote
Yes, I didn't read your post clearly enought. So change the start and the length appropriately. Make sure you test values at and beyond the extremes.

The SS does a "Sub String" search for the character value being present anywhere within the field.

SS is even cleverer than that:

Code:
(1,1,SS,EQ,C'A,B,C')


Will search of any value of A, B or C in the one-byte field at position one. Look it up in your manual. Experiment.
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 -> SYNCSORT

 

Similar Topics
Topic Forum Replies
No new posts Copy only TEXT or String from a record SYNCSORT 4
No new posts ICETOOL to SUM String DFSORT/ICETOOL 1
No new posts Mark Previous & next lines when a... DFSORT/ICETOOL 9
No new posts sort to find out the char which repea... Mainframe Interview Questions 10
No new posts Help with C character vs C string All Other Mainframe Topics 3
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us