I believe the command you need is:  C P'¬' ' ' 80 95 ALL
The picture P'¬' finds all NON blank characters. 

Bill

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of willie bunter
Sent: Friday, December 16, 2016 7:15 AM
To: [email protected]
Subject: TSO LINE COMMAND - EDIT MODE

Good Day To All,

Is there a way of filling columns 80 95 with blanks?  I have sequence commands 
(please see below for an example) which I would like to remove.

00550003   ** 
00560000      
00570001   *  
00580003   ** 
00590000      
00600001   *  
00610003   ** 
00620000      
00630001   *  
00640003   ** 
00650000      
00660001   *  
00670003   ** 
00680000      
00690001   *  
00700003   ** 
00710000      

I looked at using C P'00' " " 80 95 however since this is a huge dsn I was 
wondering if there is a quicker way.  I also considered pressing the EOF key on 
my keyboard on every line however since the file is quite large it would take 
me a while.

Is there a line command I could issue to do what I want to do?  I remember in 
ROSCOE I could issue the command FILL 80 95  and it would replace the numbers 
with blank spaces.

Thanks

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

______________________________________________________________________
CONFIDENTIALITY NOTICE: This email from the State of California is for the sole 
use of the intended recipient and may contain confidential and privileged 
information. Any unauthorized review or use, including disclosure or 
distribution, is prohibited. If you are not the intended recipient, please 
contact the sender and destroy all copies of this email.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to