A maximum of 100 chars can be passed to Cobol through Parm in JCL, If we want

A maximum of 100 chars can be passed to Cobol through Parm
in JCL, If we want to pass more than 100 Chars how we can
do it ?

Question Posted / raj

4 Answers
14404 Views
IBM, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

A maximum of 100 chars can be passed to Cobol through Parm in JCL, If we want to pass more than 10..

Answer / sweetie

As the PARM parameter is not able to pass more that 100
chars, we have to pass the parameter thru Instream with the
help of SYSIN DD *

Is This Answer Correct ?

16 Yes

1 No

A maximum of 100 chars can be passed to Cobol through Parm in JCL, If we want to pass more than 10..

Answer / rookie

RE:To add on

You can also use files to pass values

Is This Answer Correct ?

5 Yes

3 No

A maximum of 100 chars can be passed to Cobol through Parm in JCL, If we want to pass more than 10..

Answer / k.suamn

we can use instrem data throug sysin or by keeping data to
be passed in a ps&theninvoke the ps.

Is This Answer Correct ?

1 Yes

0 No

A maximum of 100 chars can be passed to Cobol through Parm in JCL, If we want to pass more than 10..

Answer / keerthi

We need to use TSQ so tat more data can be passed

Is This Answer Correct ?

0 Yes

6 No

Post New Answer

More JCL Interview Questions

How many positional parameters are there in job statement?

4 Answers

One dataset is creating in the step1 with LRECL of 133 and the same dataset is used in the next step in DISP=SHR mode, but while scanning the JCL the following error is thrwon. Please verify the below JCL $/SEPP030.PROVIDER DD DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868 //ERRORRPT DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, --ERRORRPT DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=&DISNCD,UNIT=&DELQ, -- DISP= (NEW,CATLG,DELETE),UNIT=DELQ, // SPACE=(TRK, (30,15),RLSE), // DCB=&DCB2 -- DCB= (PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB) $/SEPP030.ERRORRPT DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT //SEPP040 EXEC PGM=FILEAID,COND= (0002,EQ,SEPP030) //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //DD01 DD DSN=SYSCMN.PROD.CCLIB (F5910EP1),DISP=SHR $/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB (F5910EP1) E1 - DSS20791E - DATA SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL WAS 80. // DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, -- DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=SHR $/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT please find the error code in the above mentioned lines and please suggest me about the error and the solution for that.

3 Answers Cognizant,

How can we increment subscript and index?

1 Answers CTS, IBM,

what happens if job falls in loop ? how to resolve it ?

3 Answers Patni,

Describe the JOB statement, its meaning, syntax and significant keywords?

1 Answers

What is the purpose of include statement in a JCL?

2 Answers

can u execute a proc from another proc?

5 Answers Logica CMG,

how many max steps can we use in a job? pls answer to my question