Bobby,

I tried your command but it removed only 1 zero from the extreme end i.e.  

before:
00010000

after:
0001000
--------------------------------------------
On Fri, 12/16/16, Herring, Bobby <bherr...@txfb-ins.com> wrote:

 Subject: Re: TSO LINE COMMAND - EDIT MODE
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Friday, December 16, 2016, 10:33 AM
 
 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:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of willie bunter
 Sent: December 16
 9:24 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 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 <john.archie.mck...@gmail.com>
 wrote:
 
  Subject: Re: TSO
 LINE COMMAND - EDIT MODE
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Friday, December 16, 2016, 10:18
 AM
 
  On Fri, Dec 16, 2016
 at
  9:15 AM, willie bunter <
  0000001409bd2345-dmarc-requ...@listserv.ua.edu>
  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 lists...@listserv.ua.edu 
 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 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
 [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 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