How can we pass data from cobol to JCl?
Answer Posted / 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 |
Post New Answer View All Answers
A table has two indexes defined. Which one will be used by the SEARCH?
What is the difference between goback, stop run and exit program in cobol?
Explain sorting techniques in cobol program? Provide the sort file definition, the sort statement, its syntax and meaning
what are decleratives in cobol?
What is the default value(s) for an initialize and what keyword allows for an override of the default?
What are the cobol coding sheets?
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
What is the difference between structured cobol programming and object alternativelyiented cobol programming?
What are the various section in data division and briefly explain them.
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
What is the difference between a binary search and a sequential search? What are the pertinent cobol commands?
What are various search techniques in cobol? Explain.
How to print 10 to 1 if the input have only 10 digit number?
Discuss about changing dataset name in proc.
what is difference between cobol and cobol/400