Re: TSO LINE COMMAND - EDIT MODE
> On Dec 16, 2016, at 2:35 PM, Gibney, Dave <gib...@wsu.edu> wrote: > > Often, or at least sometimes for me, there will be numbers in the number > columns, but they aren't still valid as ISPF number mode. And the UNNUM > command returns a not in number mode message. Here is what I did. RENUM UNNUM end s > > I find that > NUM ON STD (or COB if appropriate) > Followed by > UNNUM > Clears the area > >> -Original Message- >> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] >> On Behalf Of Edward Gould >> Sent: Friday, December 16, 2016 9:44 AM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: Re: TSO LINE COMMAND - EDIT MODE >> >> Try UNNUM ? >> >> Ed >>> On Dec 16, 2016, at 9:15 AM, willie bunter <001409bd2345-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 ** >>> 0056 >>> 00570001 * >>> 00580003 ** >>> 0059 >>> 0061 * >>> 00610003 ** >>> 0062 >>> 00630001 * >>> 00640003 ** >>> 0065 >>> 00660001 * >>> 00670003 ** >>> 0068 >>> 00690001 * >>> 0073 ** >>> 0071 >>> >>> 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 >> >> -- >> 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
Re: TSO LINE COMMAND - EDIT MODE
Often, or at least sometimes for me, there will be numbers in the number columns, but they aren't still valid as ISPF number mode. And the UNNUM command returns a not in number mode message. I find that NUM ON STD (or COB if appropriate) Followed by UNNUM Clears the area > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] > On Behalf Of Edward Gould > Sent: Friday, December 16, 2016 9:44 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: TSO LINE COMMAND - EDIT MODE > > Try UNNUM ? > > Ed > > On Dec 16, 2016, at 9:15 AM, willie bunter <001409bd2345-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 ** > > 0056 > > 00570001 * > > 00580003 ** > > 0059 > > 0061 * > > 00610003 ** > > 0062 > > 00630001 * > > 00640003 ** > > 0065 > > 00660001 * > > 00670003 ** > > 0068 > > 00690001 * > > 0073 ** > > 0071 > > > > 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 > > -- > 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
Re: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE
If those columns are edit sequence numbers then you can't change those with the change commands. Use UNNUM to remove them. -- Lionel B. Dyck Mainframe Systems Programmer - TRA Enterprise Operations (Station 200) (005OP6.3.10) Information and Technology, IT Operations and Services -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of willie bunter Sent: Friday, December 16, 2016 11:45 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE Sri, I checked. The column positions were 80-95. Not sure why it wouldn't work. anyway, what is good is that with the help I received all is well. Thanks for taking the time to help me out. On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: Subject: Re: TSO LINE COMMAND - EDIT MODE To: IBM-MAIN@LISTSERV.UA.EDU Received: Friday, December 16, 2016, 11:12 AM Willie, Are the column positions 80 thru 95 the correct positions of your data? If it worked partially, I am guessing that your column positions are different from what you described. Make sure you have the right column positions. Thanks, Kolusu IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 12/16/2016 08:59:22 AM: > From: willie bunter <001409bd2345-dmarc-requ...@listserv.ua.edu> > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 12/16/2016 09:03 AM > Subject: Re: TSO LINE COMMAND - EDIT MODE > Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> > > Kolusu, > > I tried your suggestion but the command worked partially. It > removed an ending zero > > before the command: > 0001 > > after the command > 0001000 > > On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: > > Subject: Re: TSO LINE COMMAND - EDIT MODE > To: IBM-MAIN@LISTSERV.UA.EDU > Received: Friday, December 16, 2016, 10:55 AM > > 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 > <001409bd2345-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 ** > > 0056 > > > 00570001 * > > > 00580003 ** > > 0059 > > > 0061 * > > 00610003 ** > > 0062 > > > 00630001 * > > > 00640003 ** > > 0065 > > > 00660001 * > > 00670003 ** > > 0068 > > > 00690001 * > > > 0073 ** > > 0071 > > > > > 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 cons
Re: TSO LINE COMMAND - EDIT MODE
Try UNNUM ? Ed > On Dec 16, 2016, at 9:15 AM, willie bunter > <001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: TSO LINE COMMAND - EDIT MODE
Sri, I checked. The column positions were 80-95. Not sure why it wouldn't work. anyway, what is good is that with the help I received all is well. Thanks for taking the time to help me out. On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: Subject: Re: TSO LINE COMMAND - EDIT MODE To: IBM-MAIN@LISTSERV.UA.EDU Received: Friday, December 16, 2016, 11:12 AM Willie, Are the column positions 80 thru 95 the correct positions of your data? If it worked partially, I am guessing that your column positions are different from what you described. Make sure you have the right column positions. Thanks, Kolusu IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 12/16/2016 08:59:22 AM: > From: willie bunter <001409bd2345-dmarc-requ...@listserv.ua.edu> > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 12/16/2016 09:03 AM > Subject: Re: TSO LINE COMMAND - EDIT MODE > Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> > > Kolusu, > > I tried your suggestion but the command worked partially. It > removed an ending zero > > before the command: > 0001 > > after the command > 0001000 > > On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: > > Subject: Re: TSO LINE COMMAND - EDIT MODE > To: IBM-MAIN@LISTSERV.UA.EDU > Received: Friday, December 16, 2016, 10:55 AM > > 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 > <001409bd2345-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 ** > > 0056 > > > 00570001 * > > > 00580003 ** > > 0059 > > > 0061 * > > 00610003 ** > > 0062 > > > 00630001 * > > > 00640003 ** > > 0065 > > > 00660001 * > > 00670003 ** > > 0068 > > > 00690001 * > > > 0073 ** > > 0071 > > > > > 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 > > > > > --
Re: TSO LINE COMMAND - EDIT MODE
1000% agree, even extended help (after PF1) give the user no clue as to what was not found. Carmen - Original Message - From: "Paul Gilmartin" <000433f07816-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 10:19:15 AM Subject: Re: TSO LINE COMMAND - EDIT MODE On Fri, 16 Dec 2016 08:55:18 -0700, Sri h Kolusu wrote: > >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 > I hate EBCDIC! >> From: willie bunter >> >> I tried out your suggestion but it didn't work. I get the message >> No CHARS '¬' found >> And that message needs to be fixed. It should be "No CHARS P'¬' found", or No PIC '¬' found, making it clear that the unsuccessful search was for a picture string, even as it includes the "X" when reporting the result of a search for a hex string. -- gil -- 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
Re: TSO LINE COMMAND - EDIT MODE
On Fri, 16 Dec 2016 08:55:18 -0700, Sri h Kolusu wrote: > >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 > I hate EBCDIC! >> From: willie bunter >> >> I tried out your suggestion but it didn't work. I get the message >> No CHARS '¬' found >> And that message needs to be fixed. It should be "No CHARS P'¬' found", or No PIC '¬' found, making it clear that the unsuccessful search was for a picture string, even as it includes the "X" when reporting the result of a search for a hex string. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE
This should work: C P'=' ' ' 85 90 all The P'=' tells ISPF Edit any character -- Lionel B. Dyck Mainframe Systems Programmer - TRA Enterprise Operations (Station 200) (005OP6.3.10) Information and Technology, IT Operations and Services -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of willie bunter Sent: Friday, December 16, 2016 9:59 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE Kolusu, I tried your suggestion but the command worked partially. It removed an ending zero before the command: 0001 after the command 0001000 On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: Subject: Re: TSO LINE COMMAND - EDIT MODE To: IBM-MAIN@LISTSERV.UA.EDU Received: Friday, December 16, 2016, 10:55 AM 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 <001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 IB
Re: TSO LINE COMMAND - EDIT MODE
Wow ! OK great, that was my only other guess was your boundary were set to 70 or less. glad it worked OK for you Have a Merry Christmas as well ! Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 10:10:20 AM Subject: Re: TSO LINE COMMAND - EDIT MODE Carmen, The command C P'^' ' ' 73 80 ALL did the trick. I do not know why it wouldn't work before. I checked to see if I BNDS set but it wasn't A massive thank you to you and the all who offered suggestions. For those who are celebrating Christmas please permit me to wish you all a very happy Christmas and a brilliant 2017. 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, 11:00 AM on my terminal the carrot p'^' translates to NE sign, '¬' sure you don't have ant BNDS set that will now allow you to see or change past col80 ? =BNDS> > - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:57:12 AM Subject: Re: TSO LINE COMMAND - EDIT MODE Carmen, I tried C P'¬' ' ' 80 95 ALL as well as C '¬' NX " " ALL but I get : 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:47 AM strange, did you just C ¬' ' ' 80 95 ALL or the correct format Bill provided C P'¬' ' ' 80 95 ALL - you need the 'P" picture clause Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:45:22 AM Subject: Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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
Re: TSO LINE COMMAND - EDIT MODE
Willie, Are the column positions 80 thru 95 the correct positions of your data? If it worked partially, I am guessing that your column positions are different from what you described. Make sure you have the right column positions. Thanks, Kolusu IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 12/16/2016 08:59:22 AM: > From: willie bunter <001409bd2345-dmarc-requ...@listserv.ua.edu> > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 12/16/2016 09:03 AM > Subject: Re: TSO LINE COMMAND - EDIT MODE > Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> > > Kolusu, > > I tried your suggestion but the command worked partially. It > removed an ending zero > > before the command: > 0001 > > after the command > 0001000 > > On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: > > Subject: Re: TSO LINE COMMAND - EDIT MODE > To: IBM-MAIN@LISTSERV.UA.EDU > Received: Friday, December 16, 2016, 10:55 AM > > 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 > <001409bd2345-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 ** > > 0056 > > > 00570001 * > > > 00580003 ** > > 0059 > > > 0061 * > > 00610003 ** > > 0062 > > > 00630001 * > > > 00640003 ** > > 0065 > > > 00660001 * > > 00670003 ** > > 0068 > > > 00690001 * > > > 0073 ** > > 0071 > > > > > 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 prohi
Re: TSO LINE COMMAND - EDIT MODE
Carmen, The command C P'^' ' ' 73 80 ALL did the trick. I do not know why it wouldn't work before. I checked to see if I BNDS set but it wasn't A massive thank you to you and the all who offered suggestions. For those who are celebrating Christmas please permit me to wish you all a very happy Christmas and a brilliant 2017. 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, 11:00 AM on my terminal the carrot p'^' translates to NE sign, '¬' sure you don't have ant BNDS set that will now allow you to see or change past col80 ? =BNDS> > - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:57:12 AM Subject: Re: TSO LINE COMMAND - EDIT MODE Carmen, I tried C P'¬' ' ' 80 95 ALL as well as C '¬' NX " " ALL but I get : 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:47 AM strange, did you just C ¬' ' ' 80 95 ALL or the correct format Bill provided C P'¬' ' ' 80 95 ALL - you need the 'P" picture clause Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:45:22 AM Subject: Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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 -- For IBM-MAIN subscribe / signoff / archive access instru
Re: TSO LINE COMMAND - EDIT MODE
Then maybe the easier way is to set boundaries from 80 to 95 using the BNDS line command then X ALL and shift )200 everything over 200 chars then reset your boundary back ? Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:59:22 AM Subject: Re: TSO LINE COMMAND - EDIT MODE Kolusu, I tried your suggestion but the command worked partially. It removed an ending zero before the command: 0001 after the command 0001000 On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: Subject: Re: TSO LINE COMMAND - EDIT MODE To: IBM-MAIN@LISTSERV.UA.EDU Received: Friday, December 16, 2016, 10:55 AM 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 <001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 -- 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
Re: TSO LINE COMMAND - EDIT MODE
So did you look at the Picture String function in ISPF. When you specify 00 in the P parm p'00' it is ONLY looking for the 00 not anything else. C P'^^' ' ' all 95 96 (the ^ is the Not Sign, keyboard did not translate that well) This changes any NON BLANK character to blanks. You can enter C P'XX' 'XX' x y z a bthis is invalid. But hit PF1 and then again and it will take you to the very good tutorial in ISPF For the CHANGE function. Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of willie bunter > Sent: Friday, December 16, 2016 8:24 AM > To: IBM-MAIN@LISTSERV.UA.EDU > 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 < > 001409bd2345-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 ** > > 0056 > > 00570001 * > > 00580003 ** > > 0059 > > > 0061 * > > > 00610003 ** > > 0062 > > 00630001 * > > 00640003 ** > > 0065 > > > 00660001 * > > > 00670003 ** > > 0068 > > 00690001 * > > 0073 ** > > 0071 > > > > 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
Re: TSO LINE COMMAND - EDIT MODE
Kolusu, I tried your suggestion but the command worked partially. It removed an ending zero before the command: 0001 after the command 0001000 On Fri, 12/16/16, Sri h Kolusu <skol...@us.ibm.com> wrote: Subject: Re: TSO LINE COMMAND - EDIT MODE To: IBM-MAIN@LISTSERV.UA.EDU Received: Friday, December 16, 2016, 10:55 AM 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 <001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: TSO LINE COMMAND - EDIT MODE
Sorry. I tried it out (copy pasted your command) but I get the 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:56 AM finally got logged on and tested and use ISPF help Example - ===> chg all p'^' 'x' 72 change all non-blanks in column 72 to the character "x" - Original Message - From: "Sri h Kolusu" <skol...@us.ibm.com> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:55:18 AM Subject: Re: TSO LINE COMMAND - EDIT MODE 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 <001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 -- 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
Re: TSO LINE COMMAND - EDIT MODE
on my terminal the carrot p'^' translates to NE sign, '¬' sure you don't have ant BNDS set that will now allow you to see or change past col80 ? =BNDS> > - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:57:12 AM Subject: Re: TSO LINE COMMAND - EDIT MODE Carmen, I tried C P'¬' ' ' 80 95 ALL as well as C '¬' NX " " ALL but I get : 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:47 AM strange, did you just C ¬' ' ' 80 95 ALL or the correct format Bill provided C P'¬' ' ' 80 95 ALL - you need the 'P" picture clause Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:45:22 AM Subject: Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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 -- 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
Re: TSO LINE COMMAND - EDIT MODE
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" <001409bd2345-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 < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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=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 Banki
Re: TSO LINE COMMAND - EDIT MODE
Carmen, I tried C P'¬' ' ' 80 95 ALL as well as C '¬' NX " " ALL but I get : 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:47 AM strange, did you just C ¬' ' ' 80 95 ALL or the correct format Bill provided C P'¬' ' ' 80 95 ALL - you need the 'P" picture clause Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:45:22 AM Subject: Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: TSO LINE COMMAND - EDIT MODE
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 <001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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
Re: TSO LINE COMMAND - EDIT MODE
I believe Lionel's example is correct : c p'=' ' ' 85 90 all carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU 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 <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" <001409bd2345-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 < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 -- 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
Re: TSO LINE COMMAND - EDIT MODE
strange, did you just C ¬' ' ' 80 95 ALL or the correct format Bill provided C P'¬' ' ' 80 95 ALL - you need the 'P" picture clause Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:45:22 AM Subject: Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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
Re: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE
I tried it but nothing was changed. Thanks for the suggestion. On Fri, 12/16/16, Dyck, Lionel B. (TRA) <lionel.d...@va.gov> wrote: Subject: Re: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE To: IBM-MAIN@LISTSERV.UA.EDU Received: Friday, December 16, 2016, 10:49 AM Try something like this then: c p'=' ' ' 85 90 all -- Lionel B. Dyck Mainframe Systems Programmer - TRA Enterprise Operations (Station 200) (005OP6.3.10) Information and Technology, IT Operations and Services Office: 512-326-6173 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of willie bunter Sent: Friday, December 16, 2016 9:45 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE
Try something like this then: c p'=' ' ' 85 90 all -- Lionel B. Dyck Mainframe Systems Programmer - TRA Enterprise Operations (Station 200) (005OP6.3.10) Information and Technology, IT Operations and Services Office: 512-326-6173 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of willie bunter Sent: Friday, December 16, 2016 9:45 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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
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 <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" <001409bd2345-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 < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 -- 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
Re: TSO LINE COMMAND - EDIT MODE
In ISPF I use C P'=' ' ' n n ALL Jay Campbell MSSD – IZSSB – IOSSS -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf Of Carmen Vitullo Sent: Friday, December 16, 2016 10:48 AM To: IBM-MAIN@listserv.ua.edu Subject: Re: TSO LINE COMMAND - EDIT MODE strange, did you just C ¬' ' ' 80 95 ALL or the correct format Bill provided C P'¬' ' ' 80 95 ALL - you need the 'P" picture clause Carmen - Original Message - From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Friday, December 16, 2016 9:45:22 AM Subject: Re: TSO LINE COMMAND - EDIT MODE 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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: TSO LINE COMMAND - EDIT MODE
Bobby, I tried your command but it removed only 1 zero from the extreme end i.e. before: 0001 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 < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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
Re: TSO LINE COMMAND - EDIT MODE
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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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
Re: TSO LINE COMMAND - EDIT MODE
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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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
Re: TSO LINE COMMAND - EDIT MODE
Not sure where I got this a while ago, so I apologize to the original author in
advance. I call it BLANKIT.
Bob
/* REXX */
Signal On NoValue
Parse source opsys . exec_name .
If opsys = 'TSO' then
Do
Address ISREDIT
ISREDIT = ''
End
Else
ISREDIT = 'ISREDIT'
ISREDIT 'MACRO (BCOL ECOL)'
If bcol = '' then
Do
Address ISPEXEC
'CONTROL DISPLAY LINE START(12)'
Say 'COMMAND SYNTAX IS: BLANKIT BB EE'
Say
Say 'WHERE BB IS IN THE BEGINNING COLUMN AND EE IS IN THE ENDING COLUMN.'
Say
Say 'ENTER BEGINNING COLUNM:'
Pull bcol
Say 'ENTER ENDING COLUNM:'
Pull ecol
End
If ecol = ' ' then
Do
Address ISPEXEC
'CONTROL DISPLAY LINE START(12)'
Say 'COMMAND SYNTAX IS: BLANKIT BB EE'
Say
Say 'WHERE BB IS IN THE BEGINNING COLUMN AND EE IS IN THE ENDING COLUMN.'
Say
Say "ENTER ENDING COLUNM:"
Pull ecol
End
If ecol < bcol then
Do
Address ISPEXEC
'CONTROL DISPLAY LINE START(12)'
Say "THE VALUE OF THE BEGINNING COLUMN ("bcol") MUST BE LESS THAN"
Say "THE VALUE OF THE ENDING COLUMN ("ecol")."
Exit
End
ISREDIT '(LRECL) = LRECL'
If ecol > lrecl then
Do
zedlmsg = 'INVALID BOUNDRIES SPECIFIED. RIGHT BOUNDRY SET'
Address ISPEXEC 'SETMSG MSG(ISRZ001)'
ecol = lrecl
End
ISREDIT '(LEFT,RIGHT) = BOUNDS'
ISREDIT 'BOUNDS' bcol ecol
ISREDIT "CHANGE P'=' '' ALL" bcol ecol
ISREDIT 'RESET CHANGE'
ISREDIT 'BOUNDS' LEFT RIGHT
Exit
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of willie bunter
Sent: Friday, December 16, 2016 10: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) whi
Re: TSO LINE COMMAND - EDIT MODE
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 < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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
Re: TSO LINE COMMAND - EDIT MODE
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" <001409bd2345-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 < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: TSO LINE COMMAND - EDIT MODE
How about ))15 followed by ((15 on the last line? With complementary )) and (( on the last line. Sent from my iPhone > On Dec 16, 2016, at 10:24, willie bunter > <001409bd2345-dmarc-requ...@listserv.ua.edu> wrote: > > 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 < > 001409bd2345-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 ** >> 0056 >> 00570001 * >> 00580003 ** >> 0059 >> > 0061 * >> > 00610003 ** >> 0062 >> 00630001 * >> 00640003 ** >> 0065 >> > 00660001 * >> > 00670003 ** >> 0068 >> 00690001 * >> 0073 ** >> 0071 >> >> 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
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 < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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
Re: TSO LINE COMMAND - EDIT MODE
Here's a REXX that I wrote to do the same thing as the Roscoe FILL command. PARMS are the start and end columns. /*REXX--*/ /* */ /* FUNCTION:*/ /* BLANK FILL THE COLUMN RANGE SPECIFIED. */ /* */ /*--*/ ISREDIT 'MACRO (PARMS)' TRACE N "ISREDIT C P'=' ' ' " PARMS " ALL" EXIT -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of willie bunter Sent: Friday, December 16, 2016 10: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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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 This email transmission and any accompanying attachments may contain CSX privileged and confidential information intended only for the use of the intended addressee. Any dissemination, distribution, copying or action taken in reliance on the contents of this email by anyone other than the intended recipient is strictly prohibited. If you have received this email in error please immediately delete it and notify sender at the above CSX email address. Sender and CSX accept no liability for any damage caused directly or indirectly by receipt of this email. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: TSO LINE COMMAND - EDIT MODE
You could create a smaller dataset, copy the current one to the new one which truncates the end of the line, then copy it back into you original dataset. You could create a EDIT MACRO to do the change. You could create a batch REXX to do the change Create a sort process to edit the file. It will depend on your objectives. Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of willie bunter > Sent: Friday, December 16, 2016 8: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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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
Re: TSO LINE COMMAND - EDIT MODE
On Fri, Dec 16, 2016 at 9:15 AM, willie bunter < 001409bd2345-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 ** > 0056 > 00570001 * > 00580003 ** > 0059 > 0061 * > 00610003 ** > 0062 > 00630001 * > 00640003 ** > 0065 > 00660001 * > 00670003 ** > 0068 > 00690001 * > 0073 ** > 0071 > > 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
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 ** 0056 00570001 * 00580003 ** 0059 0061 * 00610003 ** 0062 00630001 * 00640003 ** 0065 00660001 * 00670003 ** 0068 00690001 * 0073 ** 0071 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
