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
 
How to find the particular word?

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

New User


Joined: 15 Apr 2009
Posts: 43
Location: Mumbai

PostPosted: Mon Sep 21, 2009 9:20 am    Post subject: How to find the particular word?
Reply with quote

Hi,
I have a dataset of LRECL 80. I want to remove records, if the positions from 10 to 40 has contained value '123'. For example,
Input file:
-----------
abcdefghijklmnop123
abcdefghijsnop123
abcdefghijkp123
zzzzzzzzzzdfafsdfasdf
abcdefghidghjklmnop123
abcdefghijklmsdfsdfhhnop123
abcdefghijklmnop

Output file:
-------------
zzzzzzzzzzdfafsdfasdf
abcdefghijklmnop

Is there any looping conditions in DFSORT will help on this?
Back to top
View user's profile Send private message

gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Mon Sep 21, 2009 11:20 am    Post subject:
Reply with quote

Hi Manoj,

I'm not sure I understand what you mean by "any looping condition" but here is something that might assist
Code:
//STEP0001 EXEC PGM=SORT                       
//SYSOUT   DD SYSOUT=*                         
//SORTIN   DD *                               
ABCDEFGHIJKLMNOP123                           
ABCDEFGHIJSNOP123                             
ABCDEFGHIJKP123                               
ZZZZZZZZZZDFAFSDFASDF                         
ABCDEFGHIDGHJKLMNOP123                         
ABCDEFGHIJKLMSDFSDFHHNOP123                   
ABCDEFGHIJKLMNOP                               
/*                                             
//SORTOUT  DD SYSOUT=*                         
//SYSIN    DD *                               
  OPTION COPY                                 
  OMIT COND=(10,31,SS,EQ,C'123')               


Gerry
Back to top
View user's profile Send private message
manojkumar.sesuraj

New User


Joined: 15 Apr 2009
Posts: 43
Location: Mumbai

PostPosted: Mon Sep 21, 2009 11:37 am    Post subject:
Reply with quote

Thanks Gerry... It works... icon_smile.gif
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 converting a mainframe file with ASA ... Lynne Schuler All Other Mainframe Topics 5 Wed Apr 04, 2018 9:44 am
No new posts Find & Replace string in CA-SORT mrgnndhmk CA Products 1 Fri Mar 30, 2018 12:58 am
No new posts Find a string in PS file opened in br... mukkas CLIST & REXX 3 Sat Feb 24, 2018 2:15 pm
No new posts Copying only first and last word from... chandan.inst SYNCSORT 4 Wed Jan 31, 2018 4:19 pm
No new posts Command to find TMEMBER name for a TPIPE Siva NKK Kothamasu IMS DB/DC 0 Wed Aug 16, 2017 6:08 pm

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