Answer / bhaskar

using host variables

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.

Answer / raghunathareddy

loadmodule

how will you define vsam file in select clause?

3 Answers   Patni,

---

If i initialize the 01 level variable in array, will it initialize all the array elements (occurs)?

8 Answers   CTS,

---

plz,could any one tell me? what about EBCDIC in cobol?briefly?

1 Answers  

---

in cobol main pgm is calling sub pgm but sub pgm does not exists , what abend i get if submit the job?

2 Answers   HSBC,

---

What is perform what is varying?

0 Answers  

---

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

1 Answers  

---

what is the difference between Normal vaiable and comp variable.

5 Answers   DELL,

---

What are INPUT PROCEDURE and OUTPUT PROCEDURE?

0 Answers  

---

What are the different ways to run a COBOL DB2 program using JCL?

2 Answers  

---

When and how can we use index & subscript ?

2 Answers  

---

I am getting S00F abend when i try to compare two variable of different pic class,one variable is of 9(09) and another is S9(09) comp-3. First i moved the data from S9(09) comp-3 to 9(09), but no luck. So i tried to move the data from S9(09) comp-3 to X (09) and move to 9(09). I am getting same error message, Please help me to find solution for this ptoblem. ERROR MESSAGE - "The system or user abend S00F R=NULL was issued."

1 Answers  

---

Can printer files (having 133 characters) be of variable length?

3 Answers  

---