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

How to search a particular charater in a Given word in EZT


IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
amit_tater

New User


Joined: 22 Dec 2006
Posts: 9
Location: Indore

PostPosted: Thu Mar 15, 2007 11:11 am
Reply with quote

How to search for a particular charater in a Given word in EZT. We may have single or multiple occurence.
Back to top
View user's profile Send private message
IQofaGerbil

Active User


Joined: 05 May 2006
Posts: 183
Location: Scotland

PostPosted: Thu Mar 15, 2007 5:05 pm
Reply with quote

by searching for it?
in this case looking for a comma ','
Code:

   SCAN-COMMA-NAME        1     30  A               
      SCAN-FIELD  SCAN-COMMA-NAME    1   A  OCCURS 30
   SUB                    W      3  N  VALUE 1   
   
JOB

SCAN-COMMA-NAME = ' '               
SCAN-COMMA-NAME = field to be tested     
 
PERFORM STRIP-COMMA             

STRIP-COMMA. PROC                                               
   SUB = 1                                           
   DO WHILE SUB < 31                                             
      IF SCAN-FIELD (SUB) = ','                       
         do something                     
      END-IF                                         
      SUB = SUB + 1                                   
   END-DO                                             
END-PROC                                             
*                                                     
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 -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts PARSE Syntax for not fix length word ... JCL & VSAM 7
No new posts Search two or more word with FILEAID Compuware & Other Tools 15
No new posts Sortjoin and Search for a String and ... DFSORT/ICETOOL 1
No new posts replace word 'MONTH' with current mon... SYNCSORT 11
No new posts first column truncated in search result IBM Tools 13
Search our Forums:

Back to Top