John is correct.. This is how I've used it.
Command ===> ****** ************************** c00001 Line to copy ak0002 Other lines ak0003 Other lines ak0004 Other lines a00005 Other lines 000006 Other lines ****** ************************** ****** ************************ 000001 Line to copy 000002 Other lines 000003 Line to copy 000004 Other lines 000005 Line to copy 000006 Other lines 000007 Line to copy 000008 Other lines 000009 Line to copy 000010 Other lines ****** ************************ Thanks.. Paul Feller AGT Mainframe Technical Support -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Lizette Koehler Sent: Thursday, August 10, 2017 09:10 To: [email protected] Subject: Re: ISPF LINE COMMAND @John, I thought I knew all the line commands. Now I need to run over to z/OS and try this out. Thanks for the info Lizette > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of John McKown > Sent: Thursday, August 10, 2017 7:05 AM > To: [email protected] > Subject: Re: ISPF LINE COMMAND > > On Thu, Aug 10, 2017 at 8:55 AM, John Dawes < 000000ff0e22811f-dmarc- > [email protected]> wrote: > > > G'Day, > > Is there a line command equivalent to ROSCOE line command using CR? > > Let me explain. > > 000001 HSEND FIXCDS D TESTJOB.D286.T2041375.TTQM0003 DELETE > > - > > 000002 PATCH(X'06' BITS(0.....1.)) ODS(SYSTEST.FIXCDS) > > 000003 HSEND FIXCDS D TESTJOB.D286.T2101225.TTQM0003 DELETE > > - > > 000004 HSEND FIXCDS D TESTJOB.D286.T2120595.TTQM0003 DELETE > > - > > 000005 HSEND FIXCDS D TESTJOB.D286.T2141244.TTQM0003 DELETE > > - > > 000006 HSEND FIXCDS D TESTJOB.D286.T2203302.TTNRON70 DELETE > > - > > 000007 HSEND FIXCDS D TESTJOB.D286.T2221294.TTQM0003 DELETE > > - > > 000008 HSEND FIXCDS D TESTJOB.D288.T1345356.TMDMDE21 DELETE > > - > > 000009 HSEND FIXCDS D TESTJOB.D295.T1345250.TMDMDE21 DELETE > > - > > 000010 HSEND FIXCDS D TESTJOB.D298.T1045337.TPDMDE21 DELETE > > - > > 000011 HSEND FIXCDS D TESTJOB.D299.T1345302.TMDMDE21 DELETE > > - > > 000012 HSEND FIXCDS D TESTJOB.D300.T1045286.TPDMDE21 DELETE > > - > > In the above member I would like to copy line 000002 PATCH(X'06' > > BITS(0.....1.)) ODS(SYSTEST.FIXCDS) after each HSEND command. > > In ROSCOE (miss it dearly) all I had to do is type CR in 000002 and > > an A in 000003 up to 000012. Does ISPF have something similar? > > Thanks in advance > > > > Yes, > > Put a "C" (Copy)on line 2. On lines 3 through 11 put an "AK" (After Keep) and > a single "A" (After) on line 12. > > > -- > If you look around the poker table & don't see an obvious sucker, it's you. > > Maranatha! <>< > John McKown > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
