How can we pass data from cobol to JCl?
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 |
COMP field occupy ?
How to remove 2 duplicate records and copy only one using job control language?
write a program to eliminate duplicate records in a input file and send them to output file.
How to recover a deleted source physical file from library?
What kind of error is trapped by on size error option?
01 WS-NAME PIC X(10) OCCURES 2. by this we can get ws-name 2 times. My qustion is how can we access the second name
suppose there is one PF having two members PF1 PF2.PF has one unique key Emp ID.could you tell me uniqueness in PF will be effective across members as well ? assume emp iD 3333 is in member PF1 would same Emp id be exist also in member PF2 ?
if one main program ,n -subprograms are then which call you follow ?why reasonuhg
i have two file, each file having : file1 is having 2 fields field1 field2 file2 is having 3 fields field1 field2 field3 my req is to make it one file like: field1 field2 field1 field2 field3 if anyone know please send me syntax, i tried this with DFSORT but could not succeed.
What care has to be taken to force program to execute above 16 Meg line?
Whats the difference between search & search ALL?
INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?