balaji

• Nov 24th, 2006

 

The syntax for passing values is

//step1 exec pgm='pgm1' parm='x y z'

this is simple jcl code

and the corresponding cobol for this is

linkage section

01 parmval

05 parmval-len pic s9(4)

05 parmval-txt pic(100)

procedure division using parmval

this is the corresponding cobol code

ranjith kumar

• Mar 16th, 2012

 

Code
//step  exec  pgm=parms ,parm=5354435212


under linkage section


01 stud-rec.


   02 length pic x(3).


   02stu-roll pic x(10).


 procedure division.


   display length.


   display stu-roll.


   stop run.


output is:


   length is :10


   stu-roll   :5354435212


 

vardhan.frd

 Profile Answers by vardhan.frd Questions by vardhan.frd

• Apr 4th, 2012

 

Can anyone write another answer (in detail along wit PGM) and post it?

raghava

• Apr 12th, 2012

 

In jcl:

Code
 

in cobol :

Code
 

gandikotasiva

 Profile Answers by gandikotasiva Questions by gandikotasiva

• Apr 27th, 2012

 

PARM is used to pass data from JCL to COBOL
we can pass max of 100 bytes
first 2 bytes are reserved to length
thus we can pass only 98 bytes of data
--------------
Let me know if u need more information

satya valluru

• Jun 5th, 2012

 

JCL:
//STEP1 EXEC PGM=SAMPLE,PARM=SATYA

COBOL:

LINKAGE SECTION.

01 PARM-VALUE.
05 PARM-LENGTH PIC S9(2) COMP-----it will store length of data we are passing from JCL
05 PARM-DATA X(10) -------------will store actual data we passed.

PROCEDURE DIVISION USING PARM-VALUE.