Willie,

You need to use '^' instead of '¬' 

C P'^' '' 80 95 ALL

^  is the non blank character when your encoding scheme is 1047 on the 
mainframe

Thanks,
Kolusu

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 
12/16/2016 08:45:22 AM:

> From: willie bunter <0000001409bd2345-dmarc-requ...@listserv.ua.edu>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 12/16/2016 08:45 AM
> Subject: Re: TSO LINE COMMAND - EDIT MODE
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
> 
> Bill,
> 
> I tried out your suggestion but it didn't work.  I get the message 
> No CHARS '¬' found
> --------------------------------------------
> On Fri, 12/16/16, George, William@FTB <bill.geo...@ftb.ca.gov> wrote:
> 
>  Subject: Re: TSO LINE COMMAND - EDIT MODE
>  To: IBM-MAIN@LISTSERV.UA.EDU
>  Received: Friday, December 16, 2016, 10:39 AM
> 
>  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:IBM-MAIN@LISTSERV.UA.EDU]
>  On Behalf Of willie bunter
>  Sent: Friday,
>  December 16, 2016 7:15 AM
>  To: IBM-MAIN@LISTSERV.UA.EDU
>  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 lists...@listserv.ua.edu
>  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 lists...@listserv.ua.edu
>  with the message: INFO IBM-MAIN
> 
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 



----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to