Classification: Public This might depend on your code page settings. For me, using IBM-1047, it's:
C P'^' ' ' 80 95 ALL Where the '^' is the shift-6 character (on my UK keyboard!). To find out what character you're expected to use, in EDIT, issue: HELP 14 2 CHANGE 1 3 This should take you to the "'CHANGE' STRINGS" help panel, where it describes picture strings. Andy Styles z/Series Systems Programmer -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of willie bunter Sent: 16 December 2016 15:52 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TSO LINE COMMAND - EDIT MODE -- This email has reached the Bank via an external source -- Carmen, I gave it a shot but I get message :No CHARS '¬' found -------------------------------------------- On Fri, 12/16/16, Carmen Vitullo <cvitu...@hughes.net> wrote: Subject: Re: TSO LINE COMMAND - EDIT MODE To: IBM-MAIN@LISTSERV.UA.EDU 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" <0000001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU 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 <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. https://clicktime.symantec.com/a/1/KVxojQoIkexmDISImZfwJJKx0WsF-g_avKf51EJRYt0=?d=aZAKo4NbKUrg-nctvDhGZmLi3vtfqldw-YQn71uyFMgO32ZxMiiI3ZLusip8R8fOSXDIYAQB9LTumZPFYtICapDZi5-QSlS_GRyR7GYUM7SoPEEnCCCGNpppOr_W2qeTdN34YQmsecMNx1rjuEYOiC5qIzHcOjpLFsEIyMbZqXua2jmuV7Jxz0MXgObw4DZyId2UzGdPWAmcDUIbZyRZvfgEG2jo6deRvb445haHWqb3CtThOAvYbWzR1BY2_4G3ERnKtNskXcGPB8ADiVLYn488FEUMwF9gof380FxmWlttpkHu3M9gs6C8yS0oliu2cBlyWuf9jmdT2bjqG4AWSy-GzEnKs5feUsrDTcuwXuX2JKnyWKUU3ExM39N9bap_aao%3D&u=http%3A%2F%2Fxkcd.com%2F1770%2F 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 ---------------------------------------------------------------------- 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 Lloyds Banking Group plc. Registered Office: The Mound, Edinburgh EH1 1YZ. Registered in Scotland no. SC95000. Telephone: 0131 225 4555. Lloyds Bank plc. Registered Office: 25 Gresham Street, London EC2V 7HN. Registered in England and Wales no. 2065. Telephone 0207626 1500. Bank of Scotland plc. Registered Office: The Mound, Edinburgh EH1 1YZ. Registered in Scotland no. SC327000. Telephone: 03457 801 801. Cheltenham & Gloucester plc. Registered Office: Barnett Way, Gloucester GL4 3RL. Registered in England and Wales 2299428. Telephone: 0345 603 1637 Lloyds Bank plc, Bank of Scotland plc are authorised by the Prudential Regulation Authority and regulated by the Financial Conduct Authority and Prudential Regulation Authority. Cheltenham & Gloucester plc is authorised and regulated by the Financial Conduct Authority. Halifax is a division of Bank of Scotland plc. Cheltenham & Gloucester Savings is a division of Lloyds Bank plc. HBOS plc. Registered Office: The Mound, Edinburgh EH1 1YZ. Registered in Scotland no. SC218813. This e-mail (including any attachments) is private and confidential and may contain privileged material. If you have received this e-mail in error, please notify the sender and delete it (including any attachments) immediately. You must not copy, distribute, disclose or use any of the information in it or any attachments. Telephone calls may be monitored or recorded. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
