how can u pass the values into db2 values from cobol ?
Answer Posted / uday
In your Execution jcl
//JOB1 JOB NOTIFY=&SYSUID
//STEP1 EXEC PGM=IKJEFT01
//STEPLIB DD DSN=PSHRPD.PROD.LOADLIB,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(DB2X)
RUN PROGRAM(PXXXXXXX) PLAN(DB2XXXXX) PARM('1234')
END
/*
In your Program = PXXXXXXX
Linkage section.
01 LK-PARM.
05 LK-LEN PIC S9(04) COMP.
05 LK-DATA PIC X(04).
PROCEDURE DIVISION USING LK-PARM.
So through Parm data also you can pass the data.
| Is This Answer Correct ? | 3 Yes | 1 No |
Post New Answer View All Answers
Hi pls anybody tell me about " ANALYSIS DOCUMENT PREPARATION AND ESTIMATION OF TASK " (in real time project)."I want to update a sequential file in my project" for that purpose i need both structures i mean analysis document and estimation of task.
What are declaratives and what are their uses in cobol?
what is difference between cobol and cobol/400
how to refer the data field?
Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?
What is comp-1 and comp-2?
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
What are various search techniques in cobol? Explain.
For rewrite, why is it mandatory that file needs to be opened?
What is the difference between PIC 9.99 and PIC9v99?
What are the cobol coding sheets?
Write a program to explain size error.
How can i load all the data from a file to Table (array) in cobol.How i manage the occurs clause with out reading the file.Any options avilable ? Please can any one help me it is urgent?
HOw can I get the negative sign while deduct high value from low value
What is the LINKAGE SECTION used in COBOL?