Heres how we do it:
Using a PARM= in your JCL.
LINKAGE SECTION.
01 RUN-PARM.
05 RUN-PARM-LEN PIC S9(4) COMP.
05 RUN-PARM-DATA PIC X(100).
PROCEDURE DIVISION USING RUN-PARM.
000-MAIN.
UNSTRING RUN-PARM-DATA
DELIMITED BY ',' OR ' '
OR ALL LOW-VALUES
INTO TCP-JOBNAME-IN
TCP-IPNUM-IN
TCP-PORTNUM-IN
RUN-DEBUG-IN
END-UNSTRING.
This has been working for a long time we use Cobol V4.2.
Scott
On Tue, Dec 17, 2019 at 9:52 PM Wayne Bickerdike <wayn...@gmail.com> wrote:
> PL/1 works the same way. Been like that for a while...(JCL parms with
> slash).
>
> On Wed, Dec 18, 2019 at 1:29 PM Attila Fogarasi <fogar...@gmail.com>
> wrote:
>
> > "/" in program parms is fully supported and only gets complex for old
> Cobol
> > programs which are a special case. Normally LE parms come first,
> > PARM='leparm/programparm' with any chars allowed by LE for program
> > parms.... for compatibility with old cobol (OS/VS Cobol and couple of
> other
> > compilers, all decades obsolete :) ), reverse sequence is supported. For
> > new Cobol this is controlled by yet another option CBLOPTS. Lots of
> > complexity to keep things working as is for old programs (and often set
> > wrong for new programs :) ).
> >
> > On Wed, Dec 18, 2019 at 12:53 PM Paul Gilmartin <
> > 0000000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > On Tue, 17 Dec 2019 19:44:37 -0600, Dale R. Smith wrote:
> > > > ..
> > > >Followup for those who might be interested. For COBOL Programs, parms
> > to
> > > the program are before the "/" and parms to LE are after the "/".
> > > >
> > > What if the parm to the program needs to contain a "/", as e.g.
> > > a UNIX pathname?
> > >
> > > -- 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
> >
>
>
> --
> Wayne V. Bickerdike
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
--
*IDMWORKS *
Scott Ford
z/OS Dev.
“By elevating a friend or Collegue you elevate yourself, by demeaning a
friend or collegue you demean yourself”
www.idmworks.com
scott.f...@idmworks.com
Blog: www.idmworks.com/blog
*The information contained in this email message and any attachment may be
privileged, confidential, proprietary or otherwise protected from
disclosure. If the reader of this message is not the intended recipient,
you are hereby notified that any dissemination, distribution, copying or
use of this message and any attachment is strictly prohibited. If you have
received this message in error, please notify us immediately by replying to
the message and permanently delete it from your computer and destroy any
printout thereof.*
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
