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.

How to use the same COBOL program in Batch and CICS on lines? explain with an example

2402

---

What is inspect in cobol ?

1309

---

can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there

2381

---

What is report-item in COBOL?

1160

---

What are the different types of condition in cobol and write their forms.

1118

---

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.

2155

---

How do you reference the fixed block file formats from cobol programs

1235

---

What are different data types in cobol?

1327

---

What is the difference between structured cobol programming and object alternativelyiented cobol programming?

1249

---

What is Pic 9v99 Indicates in COBOL?

1269

---

How do you get the data to code the BMS macro?

1981

---

A table has two indexes defined. Which one will be used by the SEARCH?

1285

---

What is the difference between comp and comp-3?

1192

---

i want a program using by if, evaluate , string, unstring, perform, occurs?

4731

---

i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?

1329

---