Passing Value Through Parm Parameter

rupesh gullu · New User Joined: 12 Dec 2008 Posts: 96 Location: Gurgaon

Hi,

can any one let me know if i am passing a value through Parm and not accepting it in my cobol program will it give me error. If yes what error it will give i mean the error code.

regards,
rupesh gupta

expat · Posted: Thu Jan 15, 2009 3:39 pm

Why not try it and see for yourself.

gcicchet · Posted: Thu Jan 15, 2009 3:42 pm

Hi,

if PARM is not defined in the program then it will just be ignored.

Gerry

rupesh gullu · New User Joined: 12 Dec 2008 Posts: 96 Location: Gurgaon

Gerry,

it didn't gave me any error. I gave exec pgm=RGAUNDR,Parm='rupesh'

and submitted th jcl ot gave no error

Gnanas N · Posted: Thu Jan 15, 2009 4:20 pm

Yes, it won't throw any error!

dick scherrer · Posted: Thu Jan 15, 2009 9:11 pm

Hello,

If the code is not set up to use the parm, suggest it be removed from the jcl. . .

At best, this will cause someone confusion someday. . .

prashanth1 · New User Joined: 27 Sep 2006 Posts: 47 Location: Hyderabad

Rupesh,

Have U declared Linkage section in cobol program with length and actual parameter ?

rupesh gullu · New User Joined: 12 Dec 2008 Posts: 96 Location: Gurgaon

hi Prashanth 1,

no i didnt declare linkage in program . I just wanted to see will jcl give any error if i dont give linkage.

rupesh

ibmmainframesyntel · Posted: Fri Jan 16, 2009 5:33 pm

program will run sucessfully....but the data through the parm will not be available for the source program..

Anuj Dhawan · Posted: Sat Jan 17, 2009 1:12 pm

Hi,

This is like asking "if I code a DD startement in JCL executing my program but that program doesn't do any processing on that DD - what'll happen ?" - well, I would say this is nothing but bad coding practices & we must avoid such thing unless it's for learning purpose.

JCL, as been stated many times on this board, does nothing itself and merely executes programs - but then it needs all the information your program needs for a successful execution.

Your JCL is sending some information via PARM but program is just not bothered about it because nothing was told to it by the programmer so this question

rupesh gullu · New User Joined: 12 Dec 2008 Posts: 96 Location: Gurgaon

Hi Anuj,

I had just created that jcl for testing purpose...

I have one more doubt regading passing values through parm.

say i want to pass 1,2,3 to three variables .code is as shown:

exec pgm-test,parm= '1,2,3'

and in cobol i have linkage as shown:
linkage-section.

01 ws-variable.
49 ws-length pic x(4) comp.
49 ws-var1 pic x(1).
49 ws-var2 pic x(2).
49 ws-var3 pic x(1).

procedure division using ws-var2 ws-var1 ws-var3 or
procedure division using ws-var1 ws-var2 ws-var3

which one of these two procedure divisions will receive values and what will be the values received in variables.

regards,
rupesh

Anuj Dhawan · Posted: Mon Jan 19, 2009 3:52 pm

Hi Rupesh,

Did ypu try the above at your end, what happened ?

rupesh gullu · New User Joined: 12 Dec 2008 Posts: 96 Location: Gurgaon

hi anuj,

i tried with folowing syntax:

exec pgm=test,parm='123'

and in cobol i gave

linkage section.
01 ws-var.
05 ws-length pic s9(4) comp.
05 ws-var1 pic x(3).

it gave me ws-var as 123.

for that sntax which i asked you it gave me error as shown:
A "PICTURE" clause was not found for elementary item "WS-PARMLENGTH". "PIC

Operand "WS-VAR1 (ALPHANUMERIC)" was not defined as a level-01 or level-77

Operand "WS-VAR2 (ALPHANUMERIC)" was not defined as a level-01 or level-77

Operand "WS-VAR3 (ALPHANUMERIC)" was not defined as a level-01 or level-77

what i think i that u cannot get values in different variable. u will get value only of group variable in above case ws-var.

if you want to get value to var1 var 2 .. u have to move it one by one
let me know what i am saying is correct or not