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

ISREDIT - How to delete a particular line in rexx


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
cgk_106

New User


Joined: 22 Dec 2006
Posts: 21
Location: chennai

PostPosted: Tue Aug 28, 2007 5:40 pm
Reply with quote

Hi,

Anyone please tell me , How to delete a particular line in rexx.. My intension is to delete all the commented line in a cobol program.. kindly help

Regards,

Gopal.C
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Tue Aug 28, 2007 5:43 pm
Reply with quote

Confused icon_confused.gif

What does REXX have to do with "deleting a line"? Wouldn't you just edit them out?
Back to top
View user's profile Send private message
cgk_106

New User


Joined: 22 Dec 2006
Posts: 21
Location: chennai

PostPosted: Tue Aug 28, 2007 5:48 pm
Reply with quote

Hi Superk,

My intension is to delete the unwanted Commented lines from the COBOL program ( Which lines are all containing '*' in the 7 th column) for that i am writting a REXX code. I don't know, what command should be used to delete a particular line( ISREDIT command ) . Could you please help me in this
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Tue Aug 28, 2007 5:53 pm
Reply with quote

cgk_106,

Suggest that you download all of these manuals in the ISPF Library and look thru them.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Tue Aug 28, 2007 6:03 pm
Reply with quote

OK, I think you need to write an ISPF Edit-Macro.

Edit-Macros can be written in REXX (as in other languages).

I believe you need something like this:
Code:
ADDRESS ISREDIT "X ALL '*' 7 7 "
ADDRESS ISREDIT "DELETE ALL X"


O.
Back to top
View user's profile Send private message
cgk_106

New User


Joined: 22 Dec 2006
Posts: 21
Location: chennai

PostPosted: Tue Aug 28, 2007 6:35 pm
Reply with quote

thanks Ofer71..thanks for your timely help..its working 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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts DELETE SPUFI DB2 1
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
No new posts DSNTIAUL driven delete IBM Tools 0
Search our Forums:

Back to Top