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*/

Name all the file-open modes

0 Answers  

---

how can we describe comp sync?

0 Answers   IBM,

---

What is use of IBM framework?

0 Answers   IBM,

---

How do you find out whether two Data Sets are having exact Data through ISPF Panel? (Say No of Records, Record Data exactly matching including spaces)

8 Answers   IBM,

---

what is the meaning, the advantages and which are the types of evaluate statement?

0 Answers   IBM,

---

If a=1 or 2 or 3 NEXT SENTENCE ELSE move a to b. a) if A not = 1 or 2 or 3 move A to B b) if not A = 1 and 2 and 3 move A to B c) if A Not = 1 and 2 and 3 move A to B d) if A NOT = 1 or NOT=2 or NOT =3 move A to B

2 Answers   Accenture,

---

Hi can anybody tell me about Mainframe batch testing and how is it done. I am totally new to mainframe testing. Thanks in Advance.

1 Answers   IBM,

---

Define clustered index?

0 Answers  

---

What are some uses of the evaluate statement?

0 Answers  

---

tell me about impact analysis ?

1 Answers   IBM, Tech Mahindra,

---

What is the term “where” for?

0 Answers  

---

How do you get parameter from JCL to PL1?

0 Answers   IBM,

---