how can u pass the values into db2 values from cobol ?
Answers were Sorted based on User's Feedback
Answer / 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 |
what is search and searchall?what is the diffrence between them?give an best example?
What are the pertinent COBOL
Hi , I am posting some questons which are asked at interview. These may help u for ur interview... what is static and dynamic call?
Whtz the specialty of 77 level number ?
What is redefines clause in COBOL?
What are the different ways to run a COBOL DB2 program using JCL?
how do you define single dimensional array and multidimensional array in your cobol?
Write down the divisions of cobol program?
I have a source program compiled with Cobol-2. The output file has a record length of 100 defined in the program but a record of 60 bytes getting written into it. i.e. The rest of 40 bytes I am not Writing anything. But it by default puts some values into the last 40 bytes. However it does not impact anything. But when Compiled the module with Enterprise Cobol the last 40 bytes were spaces as fillers. Can anyone explain?
Explain how you can characterize tables in cobol?
What is the difference between working storage copybook and linkage section copybook?
How do you reference the fixed block file formats from cobol programs