Answer / amarnadh reddy

Use Accept in procedure division.
Example :
WORKING-STORAGE SECTION.
01 empno. Pic x(05).
01 empname pic x(15).
01 empsal pic 9(10).
PROCEDURE DIVISION.
................
PERFORM ACCEPT-PARA.
..............
ACCEPT-PARA.
ACCEPT EMPNO.
ACCEPT EMPNAME.
ACCEPT EMPSAL.

In JCL :
...........
............
//sysin dd *
001
aaaa
330000
/*

Answer / guest

SYSIN DD *
values

Explain the difference between various read and find statement and which one should be used when for better adabas performance?

1 Answers  

---

Why do we have multiple base registers in certain programs?

4 Answers   IBM,

---

What is house keeping in assembler? And explain the following code HELLOTSO START 0 * PRINT NOGEN BEGIN SAVE (14,12) LR 12,15 USING TYPE,12 ST 13,SAVE+4 LA 11,SAVE ST 11,8(13) LR 13,11

6 Answers   Mind Tree,

---

registers(0-15) ,where they are going be resides., does that mean here is it resides whether real or virtual memory? and why? then why we are assign even registers(0 to 6) for FP operations????

3 Answers  

---

What does LA R3,R3 ?

1 Answers   Amdocs,

---

Explain the difference in data type "x" and "p"?

1 Answers  

---

HOW MANY MAXIMUM BASE REGISTERS WE CAN HAVE IN A PROGRAM AND ALSO HOW MANY MAXIMUM BASE REGISTERS WE CAN HAVE IN A SINGLE PROGRAM.

5 Answers   IBM, TCS,

---

What will happen if we drop the base register in the program which contains only one basereg?

1 Answers  

---

Ap wkur,=p5 where wkur is a label?

1 Answers   IBM,

---

Can we use MVC instruction to move pack field to pack field....which instruction you will use and why ?

4 Answers   Amdocs, IBM,

---

Can we use an equated value as operand for an MVC instruction? Reason for the same

8 Answers   IBM,

---

how to pass the parameters from jcl to assembler pgm?

1 Answers   IBM,

---