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
 
ISPF command to shift records which start with specific char

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
milind suman
Warnings : 1

New User


Joined: 19 Aug 2009
Posts: 55
Location: Pune

PostPosted: Wed Feb 03, 2010 3:42 pm    Post subject: ISPF command to shift records which start with specific char
Reply with quote

Hi ,

While editing a file I have to reposition all the records starting with 'WS-' to column 16 . The other records have to stay at their original column. Is there any ISPF command to do this .

For example :

Code:

1234567891011121314151617181920212223242526
         record1 xyz
      record2   abc
        ws-varaiable   pic x(9)
      record3     xyz
              ws-varaible   x(9)


After :

Code:

1234567891011121314151617181920212223242526
         record1 xyz
      record2   abc
                      ws-varaiable   pic x(9)
      record3     xyz
                      ws-varaible   x(9)

Back to top
View user's profile Send private message

prino

Senior Member


Joined: 07 Feb 2009
Posts: 1101
Location: Oostende, Belgium

PostPosted: Wed Feb 03, 2010 4:31 pm    Post subject:
Reply with quote

Put a label (eg .from) on the first line of the area that needs to be changed, put another (eg .to) on the last, enter the command
Code:
&c 'WS-' ' WS-' 1 17 all .from .to
and press Enter until nothing more changes.
Back to top
View user's profile Send private message
milind suman
Warnings : 1

New User


Joined: 19 Aug 2009
Posts: 55
Location: Pune

PostPosted: Wed Feb 03, 2010 4:43 pm    Post subject:
Reply with quote

thanks much Prino ..fentastic way !
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Limit in Length for a CICS START seahawk789 CICS 6 Mon Apr 02, 2018 8:34 pm
No new posts Extract the records with a PD field's... sudhakar84 DFSORT/ICETOOL 11 Mon Apr 02, 2018 7:26 pm
No new posts Merge 2 records sancraig16 SYNCSORT 19 Tue Mar 27, 2018 8:17 pm
No new posts SORT 3 files,extract specific fields ... Kiransr DFSORT/ICETOOL 13 Fri Mar 23, 2018 10:54 am
No new posts Need help with 002-030 ABEND in TSO R... Terry Tallian TSO/ISPF 0 Sat Mar 17, 2018 1:13 am

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