Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Search a character multiple times in a line

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
siva102

New User


Joined: 28 Nov 2007
Posts: 64
Location: Chennai

PostPosted: Mon Jan 31, 2011 7:49 pm    Post subject: Search a character multiple times in a line
Reply with quote

Hi,

I need a help on searching a string.

The i/p File is : -

Code:

----+----1----+----2----+----3----+----4----+----5----+----6
123bn 1234nh1234 534568nvkxc8945ynm,k
2345nilm,bf94utksdnhf
gh237i%hawd
khughygygf%asjbamdbh%amsjdhajkd%989898


Whenever % encounters it need to do some process.

I am using the below code for getting the character %,
Code:

 do k = 1 to readin.0       
    if pos("%",readin.k) > 0


But i am always able to find the first occurance of the % character in any line and the rest are getting bypassed.

Can anyone please let me know to get the next occurance of the character % in the same line.
Back to top
View user's profile Send private message

Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2058
Location: Silicon Valley

PostPosted: Mon Jan 31, 2011 8:29 pm    Post subject: Reply to: Search a character multiple times in a line
Reply with quote

Whenever you find the percent sign, you know the position and can break up the variable into smaller parts. And use the POS again on the remainder.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Mon Jan 31, 2011 8:48 pm    Post subject:
Reply with quote

you could also consider using the START parameter of the POS command which is exactly what you need.
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Extra character appears in file when ... Balu5491 All Other Mainframe Topics 1 Wed Jul 26, 2017 2:39 pm
No new posts Changeman get multiple "Browse C... elixir1986 Compuware & Other Tools 4 Fri Jul 14, 2017 1:48 am
No new posts How to write Specific Fields from Mul... Padhu SYNCSORT 6 Thu Jul 06, 2017 10:26 am
No new posts Search utility(3.14) using JCl and Cobol RKS3 COBOL Programming 12 Sat Jun 10, 2017 10:24 pm
No new posts Reduce CPU Times for Join Sort santoshn SYNCSORT 12 Sat Jun 10, 2017 1:40 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us