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

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

989

---

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

1023

---

Ap wkur,=p5 where wkur is a label?

1139

---

how to initialize a register to 0000?

1143

---

explain about maximum displacement and how to cross this limit?

1144

---

Why do we use "drop"?

981

---

What is need of start 0? In steed of can we use anyother numerics? If we use what will happen?

1044

---

What is need of start 0?

1124

---

Explain about house keeping in assembler?

1043

---

how to retrieve the instream data in sysin?

1141

---

How do you round the addition or subtraction of two numbers in assembler?

1023

---

What does "using" do?

1051

---

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

982

---

what is need of start 0? In steed of

1092

---

Explain how to pass instream data in sysin with assembler?

1072

---