I'm keeping this as my set of examples - Thanks Charles <grin>

Jerry Whitteridge
Delivery Manager / Mainframe Architect
GTS - Safeway Account
602 527 4871 Mobile
jerry.whitteri...@ibm.com

IBM Services

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
02/14/2019 02:07:07 PM:

> From: Charles Mills <charl...@mcn.org>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 02/14/2019 02:07 PM
> Subject: Re: PARMDD and Symbols in a Started PROC
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
>
> @Tom's got it. Thanks.
>
> EXPORT works in a PROC and so forth but must come before the
> definition of the symbols it exports. (Again, seems kind of
> backwards, but what do I know?)
>
> I think I could have done
>
> //jobname JOB ...
> // EXPORT SYMLIST=*
> //procname PROC ...
>
> But I have never coded a started PROC with a JOB (and I know you
> can, but it was just a wormhole I did not want to go down at this
> moment) so I did more or less what Tom suggests.
>
> //procname PROC PARM1=value1,PARM2=value2
> // EXPORT SYMLIST=*
> // SET $PARM1=PARM1
> // SET $PARM2=PARM2
> ...
> //MYPARMDD DD *,SYMBOLS=JCLONLY
>    $PARM1,$PARM2,...
>
> And it is all working. Gosh some better doc AND SOME MEANINGFUL
> EXAMPLES would be appreciated.
>
> Thanks all here for the help.
>
> Charles
>
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU
> ] On Behalf Of Tom Marchant
> Sent: Thursday, February 14, 2019 11:16 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: PARMDD and Symbols in a Started PROC
>
> On Thu, 14 Feb 2019 11:01:44 -0800, Charles Mills <charl...@mcn.org>
wrote:
>
> >> // EXPORT gets specified first before any //  SET stmts
> >
> >How do I do that in a PROC where the SETs are implicit in the PROC
> >statement, which is the very first statement?
> >
> >//procname PROC PARM1=value,PARM2=value
>
> Try this:
> //procname PROC PARM1=value,PARM2=value
> //   EXPORT SYMLIST=*
> //   SET PARM1=&PARM1
> //   SET PARM2=&PARM2
>
> ----------------------------------------------------------------------
> 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