MVSFORUMS.com

Premkumar

Using File Tailoring

Jeba · Posted: Wed Dec 04, 2002 12:17 am Post subject:

Hai all,

We can submit a batch job using the following rexx code also

Manas Biswal · Posted: Wed Dec 04, 2002 4:21 am Post subject:

Jeba,
What Premkumar meant was that you can submit a JCL dynamically through a REXX program using Queues or skels. You can prepare your own JCL in the REXX program dynamically taking user inputs or based upon some conditions and then submit it.
Its not simply submitting a static JCL already there in a dataset. For that you don't need to write a REXX. You can simply put a SUB in the command line of the member.

Regards,
Manas

Dibakar · Posted: Sat Mar 29, 2003 4:36 am Post subject:

Premkumar,

When I use your REXX method (To construct the JCL on the fly and submit from stack) the JCL is created in upper case. Is there any way to preserve the case while using 'SUBMIT *' in REXX.

Thanks,
Diba.

Cogito-Ergo-Sum · Posted: Sat Mar 29, 2003 4:54 am Post subject:

Diba,
Why would you want lower/mixed case in JCL in the first place? If the lower/mixed case is to be a part of some SYSIN, PARM, etc, then it could be worked out. I think, the lower/mixed case strings coded as literal in the REXX code should do.
_________________
ALL opinions are welcome.

Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes.

Dibakar · Posted: Sat Mar 29, 2003 5:38 am Post subject:

Cogito-Ergo-Sum,

Yes, lower case is part of 'DD *' data, built dyanamically. Input is in lower case. Flow is like this -

"MACRO (emailid)"
queue "To: "emailid
"SUB * END($$)"

The job is working fine with upper case but since it is sending email, one of my colleage didn't like to receive mails with email id in upper case. So I wan't to preserve the case of input email.

Diba.

Cogito-Ergo-Sum · Posted: Sat Mar 29, 2003 6:27 am Post subject:

Dibakar,
In that case, I guess, you will have to code a small procedure in your EXEC to convert uppercase to lowercase. I do not think, there is a direct way of conversion from upper case to lower case and vice-versa. The code could be something as follows:

Dibakar · Posted: Sat Mar 29, 2003 6:46 am Post subject:

Cogito-Ergo-Sum,

Maybe I didn't explain the problem properly. It is not that my data is in upper case. If I provide emailid in lower case then the program accepts it in lower case (confirmed by 'display'). But either 'queue' or 'SUB' is converting it into upper case.

Dibakar.

raj051076 · Beginner Joined: 05 Dec 2002 Posts: 64 Topics: 21

Cognito I kow for sure that Queue will always convert to uppercase..I did not go thru the whole string of messages above..but I feel your problem will be solved if you put your jcl statements into a stem variable and then write them to a file and submit it..

e.g; 'EXECIO * DISKW OUTDD (STEM STMT.'

DO I = 1 TO STEM.0
PUSH STEM.I
EXECIO 1 DISKW JCLDD
END

Try this and let me know if it works..
_________________
Rajib

Cogito-Ergo-Sum · Posted: Sun Mar 30, 2003 10:55 pm Post subject:

Rajib,
The query is of Dibakar's and not mine! BTW, my logonid is Cogito and not Cognito.

Dibakar,
I understand your question now. Have you tried Rajib's method?
_________________
ALL opinions are welcome.

Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes.

raj051076 · Beginner Joined: 05 Dec 2002 Posts: 64 Topics: 21

Sorry Cogito.........
_________________
Rajib

Dibakar · Posted: Mon Mar 31, 2003 4:06 am Post subject:

Rajib,

Problem is with submit command, queue does not convert to uppercase, you can verify this by -

Mike · Posted: Mon Mar 31, 2003 10:12 pm Post subject:

You could try writing directly to the internal reader e.g.

ADDRESS TSO "ALLOC F(INTRDR) RECFM(F) LRECL(80) SYSOUT(A) ",
"WRITER(INTRDR)"
ADDRESS TSO "EXECIO * DISKW INTRDR (STEM j. FINIS"
ADDRESS TSO "FREE F(INTRDR)"
_________________
Regards,
Mike.

semigeezer · Posted: Mon Mar 31, 2003 11:20 pm Post subject:

I haven't really been following this, but I'll add a little trivia just to 'muddy the waters'.

Dibakar · Posted: Tue Apr 01, 2003 8:21 am Post subject:

Thanks everybody,

I am getting my data in lower case after implementing these suggestions but me exec is not running smoothly, problem is coming at submit statement. With the following code -