I use this command to do that:

C P'^' '' 80 95 ALLThat carat character tells it to change non-blank characters 
to null.

Bobby Herring
Texas Farm Bureau Insurance

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of willie bunter
Sent: December 16 9:24 AM
To: [email protected]
Subject: Re: [IBM-MAIN] 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
[http://www.txfb-ins.com/TFBICImages/email.jpg]
J.D. Power Disclaimer<https://www.txfb-ins.com/terms-conditions#disclaimer>


CONFIDENTIALITY STATEMENT: The foregoing message (including attachments) is 
covered by the Electronic Communication Privacy Act, 18 U.S.C. sections 
2510-2521, and is CONFIDENTIAL. If you believe that it has been sent to you in 
error, do not read it. If you are not the intended recipient, you are hereby 
notified that any retention, dissemination, distribution, or copying of this 
communication is strictly prohibited. Please reply to the sender that you have 
received the message in error, then delete it. Thank you.

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

Reply via email to