Answer / mithun kilikdar

If we need to pass variables from one procedure to another
procedure or from one pgm to another pgm then we can
directlt pass the variables. Or one more way is to pass
poiters. Below is the example:

PROGRAM_A: OPTIONS(MAIN) REENTRANT:

DCL FORE_NAME CHAR(20) INIT('');
DCL SUR_NAME CHAR(20) INIT('');
DCL PTR1, PTR2 POINTER;
:
:
PTR1 = ADDRESS(FORE_NAME);
PTR2 = ADDRESS(SUR_NAME);
CALL PROGRAMB_( PTR1
, PTR2
);
:
:
END; /*PROGRAM_A*/



PROGRAM_B: OPTIONS(P_PTR1
,
P_PTR2
);

/*DECLARATION*/
DCL PTR1, PTR2 POINTER;

/*INTERNALIZATION*/
PTR1 = P_PTR1;
PTR2 = P_PTR2;
:
:
/* USE PTR1 AND PTR2 TO USE FORE_NAME AND SUR_NAME
END; /*PROGRAM_B*/

I want to increse the size of one existing dataset, can anyone tell me the TSO command throgh that I can edit it.

4 Answers   HCL, Xansa,

---

What is RRange and ARange?

0 Answers  

---

What is the distinction amongst include and copy?

0 Answers  

---

My program has an array defined to have 10 items. Due to a bug, I find that even if the program access the 11th item in this array, the program does not abend. What is wrong with it?

0 Answers  

---

What is the difference between general testing and mainframe testing?

0 Answers  

---

by using xpeditor if we want to debug the subpgm, how can you code in x-ped for mai-pgm n sub-pgm ?

0 Answers  

---

What is z os in mainframe?

0 Answers  

---

What is the difference between hidam and hdam databases?

0 Answers  

---

what is the meaning of notcat 2?

0 Answers   IBM,

---

How many module come in Ibm framework?

0 Answers   IBM,

---

What is basic difference between directory and pds in ibm mainframe?

0 Answers   IBM,

---

10. Why mainframe testing is so important? Give any three advantages of Mainframe Testing?

0 Answers  

---