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
 

 

Delete more than one lines in Edit Mode

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
sandra

New User


Joined: 06 Apr 2005
Posts: 27

PostPosted: Mon May 23, 2005 8:36 pm    Post subject: Delete more than one lines in Edit Mode
Reply with quote

In my cobol pgm ,in the edit mode,I need to delete all the fields present from colum 66 to 70.Is there any command /short cut to delete these columns?
Back to top
View user's profile Send private message

priya

Moderator


Joined: 24 Jul 2003
Posts: 568
Location: Bangalore

PostPosted: Mon May 23, 2005 9:27 pm    Post subject:
Reply with quote

Go to Line 66 and type DD

Then Come to Line no 70 to type DD.

Now Press Enter.
Back to top
View user's profile Send private message
grepusr3

New User


Joined: 10 May 2005
Posts: 29

PostPosted: Tue May 24, 2005 4:06 am    Post subject: Re: Delete more than one lines in Edit Mode
Reply with quote

The question here is to delete columns (and not the lines)!

Please try these command in order listed under ISPF/PDF editor and confirm with a reply.

Command ===> reset
Command ===> bounds 66 70
Command ===> change p'^' x'40' ALL
Command ===> reset c

or

Command ===> reset
Command ===> change p'^' x'40' 66 70 ALL
Command ===> reset c

This will change all character (p'^') in columns 66 through 70 to a blank (x'40') in ALL lines. It will leave other colums as is and will not delete lines.

-Pelad
Back to top
View user's profile Send private message
SteveConway

New User


Joined: 26 May 2005
Posts: 28
Location: Northern VA, USA

PostPosted: Fri May 27, 2005 8:59 pm    Post subject: Re: Delete more than one lines in Edit Mode
Reply with quote

Similarly, coding
Code:
c p'=' ' ' 66 70 all

will change -anything- contained within columns 66 to 70 to a blank (x'40'). The '=' is the key, it says disregard what is in the column now, whether numeric, character, or undefined, and change it to the given value.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
No new posts Edit large number of datasets (QSAM) zh_lad TSO/ISPF 3 Tue Apr 04, 2017 6:08 pm
No new posts Mass comment and edit elixir1986 IBM Tools 3 Thu Mar 02, 2017 10:09 pm
No new posts syncsort: copy lines after the keyword shreya19 SYNCSORT 7 Fri Dec 02, 2016 9:47 am
No new posts JCL to delete component in a package sundaram.naveen Compuware & Other Tools 14 Tue Nov 29, 2016 6:21 pm


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