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 |
whn do i get soc7 abend while moving alphanumeric to numeric or while moving numeric to aplhanumeric please reply ASAP?
I have a files containing both duplicate and non-duplicate records.The file is already sorted by a key.I want to determine those records that are duplicate and records that are non-duplicate.If duplicate the record is move to a duplicate file and if non-duplicate that will be move to valid file.thank you
How can you display the SPOOL information ?
whats the difference between search and search all?
select TURE Statement(s) aboUt eject statemenet in cobol? a)The eject statememnt must be the only statement on the line b.It causes the program to edit abnormally c. eject statement can be written in either area A or area B d. specifies that the next source statement is to be printed at Top of the next page e.The EJECTstatement has no effect on the compilation of the source program itself
In an array processing what is the thing that can be done by using subscripts but not by using index
The following entries appear in the WORKING-STORAGE SECTION: 01 DATE-TODAY. 05 YY PIC XX VALUE "90". 05 MM PIC XX VALUE "12". 05 DD PIC XX VALUE :31". 01 DATE-EDIT PIC XX/XX/XX. MOVE DATE-TODAY TO DATE-EDIT. (a) 901231 (b) 90/12/31 (c) 31/12/90 (d) 311290
How to read records in reverse order in flat file? I know we can do it by reading all records into an array.... Then read records in reverse order by using subscript or index but can any body give me the exact code.
What are the cobol coding sheets?
how can u find out just by seeing wheater it is main program or sub program ? any two ways to identify reply soon ?
How can you add a particular field/coloumn in copybook?
i have n records in one file and in this file there is some fields and i want to count that how many sharma in my file so plz give the coding that how we read sharma ?