MVSFORUMS.com

[koolspark]

hi,

I would like to pass 2 numeric values to a cobol program through JCL PARM parameter. my cobol declaration is shown below
LINKAGE SECTION.
01 VAR1.
05 VAR1-LEN PIC S9(4) COMP.
05 VAR1DATA PIC 9(2).
05 VAR2DATA PIC 9(2).

procedure division using var1.

my jcl step is as shown below.

//step1 exec pgm=cobpgm,parm=(10,20)

But, my cobol program is getting the first value only, and not reading the second value.

Please advise...

[superk]

Worked OK for me, although I did account for the comma:

01 VAR1.
05 VAR1-LEN PIC S9(4) COMP.
05 VAR1DATA PIC 9(2).
05 FILLER PIC X.
05 VAR2DATA PIC 9(2).

[Nic Clouston]

Try putting quotes around the parm
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

[papadi]

The PARM data is one field. It is not multiple "arguments".

You need to allow for the filler as superk has done. If you code it this way, both numbers must always be 2 positions. a value of 1,1 or 2,34 would not work. To use these, you would define an x(5) field and break it down in the code.
_________________
All the best,

di

[koolspark]

Thanks Superk. It did worked..