So write an edit macro to copy the all the lines onto a Rexx stack and use
"SUBMIT * END(//)" (or similar) to submit it! You can then use OUTTRAP() to
capture the message from SUBMIT and stop the screen breaking up.
Robin
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
David Spiegel
Sent: 24 June 2021 17:09
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ISPF Edit: Introduce New SUBMIT Module
Hi Brian,
I am familiar with the Command Table. I want to set up a command to do an ISPF
Edit SUBMIT, not a TSO SUBMIT. That also means no &ZPARM for DSNAME.
That is, SUBMIT what is being EDITd/BROWSEd/VIEWd.
Thanks and regards,
David
On 2021-06-24 02:36, Brian Westerman wrote:
> You can call you program anything you want and create a command table entry
> for it. That way you can leave IBM's submit where it was/is is SYS1.CMDLIB.
>
>
> i.e. (look in option 3.9 of ISPF) and add
>
> YourCMD SELECT PGM(yourPGM PRM('&ZPARM')) NEWAPPL(anything)
>
>
> Then when the user types "yourCMD" it will invoke "yourPGM"
>
> The PRM part is to pass a parm to yopur program, (in case they type "SUBMIT
> 'somedataset(member)'".
>
> However, if you call your program SUBMIT then it will work outside of ISPF as
> well, although it will work if you called it yourPGM just as well. The
> command table just keeps them from having to type "TSO yourPGM" instead of
> just yourPGM or yourCMD.
>
>
> In any case, you don't want to replace IBM's submit, you just want to make
> sure that yours is located before IBM's in either a steplib or in a linklist
> dataset that occurs BEFORE sys1.cmdlib.
>
> I think using the name SUBMIT is a really really bad idea, unless you are
> going to create a alias for IBM's submit (maybe call it IBMSUB), so that if
> need be you can use it in case yours fails.
>
> ----------------------------------------------------------------------
> 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
