Ok,I think that I know what the errors are.
You spelt SYMBOL2 as SYSBOL2 in the parm statement.
You can only use up to 71 characters on a line for JCL. To Continue the
parm use a x in col 72 such as my sample below.
----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
//*---------------------------------------------------------------------
//STEP1 EXEC PGM=IEFBR14,
// PARM=('&SYMBOL1.&SYMBOL1.&SYMBOL1.&SYMBOL1.&SYMBOL1.X&SYMBOL2.YX
// &SYMBOL3.Z')
//SYSUDUMP DD SYSOUT=D
//*---------------------------------------------------------------------
Tim Hillock
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Eric Bielefeld
Sent: Wednesday, June 04, 2008 3:27 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Enhanced JCL processor? (and maybe a few other thoughts)
I think the key is when doing SJ, as long as you don't go past column
71,
you will be ok. Your statement said only that you wanted to be able to
use
wider than 80 columns, although I suppose that would mean putting
something
past column 80. I think the JCL book would say you can't go beyond col
71,
thus your JCL error.
Eric Bielefeld
Sr. z/OS Systems Programmer
Milwaukee, Wisconsin
414-475-7434
----- Original Message -----
From: "McKown, John" <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
To: <IBM-MAIN@BAMA.UA.EDU>
Sent: Wednesday, June 04, 2008 2:13 PM
Subject: Re: Enhanced JCL processor? (and maybe a few other thoughts)
>I think so. I editted a JCL in a VB/259 dataset and made a really long
> PARM.
>
> // SET SYMBOL1=A
> // SET SYMBOL2=B
> // SET SYMBOL3=C
> // SET SYM=Q
> //STEP1 EXEC PGM=IEFBR14,
> //
>
PARM=('&SYMBOL1.&SYMBOL1.&SYMBOL1.&SYMBOL1.&SYMBOL1.X&SYSBOL2.Y&SYMBOL3.
> Z')
> //SYSUDUMP DD SYSOUT=D
>
> This got a JCL error:
>
> J E S 2 J O B L O G -- S Y S T E M D E V 1
> -- N O D E L I H 1
>
> 14.11.09 JOB57436 ---- WEDNESDAY, 04 JUN 2008 ----
> 14.11.09 JOB57436 IRR010I USERID TSH009 IS ASSIGNED TO THIS JOB.
> 14.11.09 JOB57436 IEFC452I TSH009A - JOB NOT RUN - JCL ERROR 177
> ------ JES2 JOB STATISTICS ------
> 9 CARDS READ
> 24 SYSOUT PRINT RECORDS
> 0 SYSOUT PUNCH RECORDS
> 1 SYSOUT SPOOL KBYTES
> 0.00 MINUTES EXECUTION TIME
> 1 //TSH009A JOB (H00000I),MCKOWN,CLASS=Z,
> JOB57436
> // MSGCLASS=X
> 2 // SET SYMBOL1=A
> 3 // SET SYMBOL2=B
> 4 // SET SYMBOL3=C
> 5 // SET SYM=Q
> 6 //STEP1 EXEC PGM=IEFBR14,
> //
> PARM=('&SYMBOL1.&SYMBOL1.&SYMBOL1.&SYMBOL1.&SYMBOL1.X&SYSBOL2.Y&S
> IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM=('AAAAAX&SY
> 7 //SYSUDUMP DD SYSOUT=D
> STMT NO. MESSAGE
> 6 IEFC621I EXPECTED CONTINUATION NOT RECEIVED
>
> --
> John McKown
> Senior Systems Programmer
> HealthMarkets
> Keeping the Promise of Affordable Coverage
> Administrative Services Group
> Information Technology
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
