Interested to Buy Any Domain ? << Click Here >> for more details...
How can we pass data from cobol to JCl?
- 7 Answers
- 48791 Views
- ADP, Amdocs, IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / sri
When someone ask you that question first thing you need to
do is you post a question to him.
Passing data from COBOL to JCL means where in JCL ?
Do you mean a file? File is also a part of JCL. If it is
file then your answer is WRITE the data into the file.
Do you mean a PDS member ? Then WRITE the data or what ever
into the PDS member.
Do you mean SYSOUT ? If so just DISPLAY the value.
If he says not these three then he need to tell what is the
purpose of moving data to JCL ? for you to give an answer.
| Is This Answer Correct ? | 42 Yes | 2 No |
Answer / guest
We can pass the data from cobol to JCl
ex: Move 4 t0o return code.
| Is This Answer Correct ? | 31 Yes | 4 No |
Answer / anil prajapati
we can pass data from cobol to jcl by using return-code
like
move 450 to return-code
if we are passing data likeit then at run time the maxx
return code will be this code if move code is a negative
number then after subtracting from 4096 maximum return code
will be displayed
| Is This Answer Correct ? | 19 Yes | 2 No |
Answer / rosi
hi.
i need help
i need Passing a variable parm from JCL to a cobol/db2
program
I'm trying to write a batch cobol/db2 pgm wich receive in
linkage section some paremeters
I succeeded to pass a static string of characters but what
I need is variable parameters (INPUT )
//DDB5A59 JOB CLASS=A,MSGCLASS=R,MSGLEVEL=
(1,1),NOTIFY=xxxx
//
REGION=0M
// SET INPUT=MYNAME
<=====
//PH01S01 EXEC PGM=IKJEFT01,DYNAMNBR=20,COND=
(4,LT)
//SYSTSPRT DD
SYSOUT=*
//SYSTSIN DD
*
DSN SYSTEM
(DBSN)
RUN PROGRAM(COBPROG) PLAN(NACPLN) -
PARMS('INPUT') -
LIB
('MYDB.TRNSCTN.LOADLIB')
//SYSPRINT DD
SYSOUT=*
//SYSUDUMP DD
SYSOUT=*
//INFILE DD DSN=MYDB(&INPUT),DISP=SHR
//ERRLST DD
SYSOUT=P,DCB=RECFM=F,FCB=L56
The program (cobprog) is that when I run the job ,if PARMS
('&INPUT') returns :&INPUT and
if PARMS(&INPUT) returns :null
i need "myname" to the cobol/db2 program and name of the
member (DSN=MYDB(&INPUT),DISP=SHR)
Do you think helpe me?
Thanks
| Is This Answer Correct ? | 6 Yes | 4 No |
Answer / mr2981
by using file we can pass data ,by using return code
| Is This Answer Correct ? | 9 Yes | 14 No |
Answer / gigish thomas
create a Symbolic Parameter in jcl woith out goiving any
value.In the job step passthis symbolic parameter through
PARM parameter to cobol program.in the linkage section of
the cobol program assign the value/string to the symbolic
variable. It will automatically reflect to the symbolic
variable which was defined in JCL program.
| Is This Answer Correct ? | 4 Yes | 18 No |
Answer / vip
By using the parm parameter in jcl and defining the
datanames in the linkage section of the cobol program.
| Is This Answer Correct ? | 9 Yes | 30 No |
What is diff betn PS and ESDS file? What is the diffrent compiler options in cobol and there discription? What is retrive nth maximum salary from salary DB2 table. Can we redefine COM-3 variable with varchar variable?
what is rediffine clause?in what situation it can use?give me real time example?
if someone is using my file,how can i find which user id is using?
Hi All, Can anyone tell me how we can MOVE value of a X(19) variable to a S9(17) COMP-3 variable? Answer with an Example will be of great help.
Which division and paragraphs are mandatory for a COBOL program?
I have sequential file recl 1000 i want to add another 15 bytes to it. The record length should not change..How?
how can you identify wheather the program is using search or search all in the cobol program?
what is the use of filler in cobol programing?
in the TIME parameter we r giving hours r minutes
How do you set a return code to the JCL from a COBOL program?
consider the following FD FILE-1 01 REC-1 PIC X(80) ...... WORKING-STORAGE SECTION 01 W-REC PIC X(90) ........ PROCEDURE DIVISION FIRST-PARA ....... READ FILE-1 INTO W-REC AT END MOVE 1 TO EOF-FLAG which of the following is true with respect to the above? a.REC-1 will contain nothing and W-REC will contain the contains of the record read b.REC-1 and W-REC contain the same data c.syntex is invalid and error will occur d.REC-1 and W-REC must be of same size
We have 3 programms A,B,C.In the middle of the program A the controls goes to program B and in the middle of the program B control wants to go program C,after completion of program C again control comes to program B and again after completion of program B control comes to program A.How the process will takes and what are the controls we use for that process.If it is possible anybody of you explain with example?
COBOL 
