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:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Thursday, August 10, 2017 09:10
To: IBM-MAIN@LISTSERV.UA.EDU
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:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of John McKown
> Sent: Thursday, August 10, 2017 7:05 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ISPF LINE COMMAND
> 
> On Thu, Aug 10, 2017 at 8:55 AM, John Dawes < 000000ff0e22811f-dmarc-
> requ...@listserv.ua.edu> 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to