Passing 200 Characters to the Program from JCL

Vijay_ml · New User Joined: 20 Mar 2007 Posts: 7 Location: India

I have cataloged proc.And I want pass 200 character to the program.Can you please suggest me how I can pass.

For my knowledge i know two ways to pass a data for the program.
1.By using parm parameter.
2.By sysin dd *(But we can't use sysin dd * in the proc).

expat · Posted: Tue Apr 10, 2007 2:21 pm

PARM is limited to 100 characters.

No, you can't use SYSIN DD * in the PROC, so you define SYSIN DD DUMMY and override it in the execution JCL.

Vijay_ml · New User Joined: 20 Mar 2007 Posts: 7 Location: India

Ya,I know the two ways won't work.Can u please suggest me any other way.

expat · Posted: Tue Apr 10, 2007 3:55 pm

I've just told you how you could use the SYSIN option.

ashwinreddy · Posted: Tue Apr 10, 2007 4:00 pm

Hi,

As Expat as said used the SYSIN DD DUMMY in the proc and while executing the proc overide the Dummy with SYSIN data.

I think this might clear you doubt.

Cheers
Ashwin

Vijay_ml · New User Joined: 20 Mar 2007 Posts: 7 Location: India

Thank you Verymuch

dick scherrer · Posted: Wed Apr 11, 2007 12:07 am

Hello,

Do you have it working?

If you post your proc and execute jcl, we can offer suggestions.

superk · Posted: Wed Apr 11, 2007 12:18 am

Of course, if you ran the program in a TSO session rather than in the JCL itself, you could pass a parameter that's pretty much as big as TSO will support:

//SYSTSIN DD *
CALL 'loadlib(program)' 'a long parm string of 200 bytes'
/*

Also, I wonder if the O/P will use a 200-byte LRECL for the JCL PDS so that the string can be coded on one line.

expat · Posted: Wed Apr 11, 2007 1:13 pm

Not a bad thought from superk there,

using a VB 251 dataset for the REXX you could code 200 characters for the PARM.

//SYSTSIN DD *
EXEC 'my REXX lib (my rexx)'

And the REXX could then contain
CALL 'loadlib(program)' 'a long parm string of 200 bytes'