I believe Lionel's example is correct 




: c p'=' ' ' 85 90 all 


carmen 

----- Original Message -----

From: "willie bunter" <[email protected]> 
To: [email protected] 
Sent: Friday, December 16, 2016 9:51:58 AM 
Subject: Re: TSO LINE COMMAND - EDIT MODE 

Carmen, 

I gave it a shot but I get message :No CHARS '¬' found 
-------------------------------------------- 
On Fri, 12/16/16, Carmen Vitullo <[email protected]> wrote: 

Subject: Re: TSO LINE COMMAND - EDIT MODE 
To: [email protected] 
Received: Friday, December 16, 2016, 10:32 AM 

you can rerun that 
command for any other char or use the command to change any 
non blank char in those fields 
I don't 
have a system right now to test but I believe 
C P'¬' NX " " ALL 
will change any NO BLANK CHAR to " " 
BLANK 
Carmen 

----- Original Message ----- 

From: "willie 
bunter" <[email protected]> 

To: [email protected] 

Sent: Friday, December 16, 2016 9:24:29 AM 

Subject: Re: TSO LINE COMMAND - EDIT MODE 


John, 

I tried out your suggestion and it pariallly 
worked.. The 00 were removed however the non-00 were left. 


63 
64 02 
** 
65 

Thanks for your help. 
-------------------------------------------- 

On Fri, 12/16/16, John McKown <[email protected]> 
wrote: 

Subject: Re: TSO 
LINE COMMAND - EDIT MODE 
To: [email protected] 

Received: Friday, December 16, 2016, 10:18 
AM 

On Fri, Dec 16, 2016 at 

9:15 AM, willie bunter < 
[email protected]> 

wrote: 

> 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. 
> 

​In the 
ISPF editor or the 
TSO line editor. With ISPF, just put the 
word 
"ALL" at the 
end of your 
command: 

C P'00' 
" " 
80 95 ALL​ 



> 
> 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 
> 



-- 
Heisenberg 
may have been 
here. 

http://xkcd.com/1770/ 

Maranatha! <>< 
John McKown 

---------------------------------------------------------------------- 

For IBM-MAIN subscribe / signoff / archive 

access instructions, 
send 
email to [email protected] 

with the message: INFO IBM-MAIN 

---------------------------------------------------------------------- 

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


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

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


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

Reply via email to