Answer Posted / vaneesh

One more advantage of redefines is that we can use the same
value with different declarations.
For Example
lets say we receive input value as 'b123'. b is blank
and we want to display it as 01.23 in the spool. This can
be done with redefines as follows.

WORKING-STORAGE section
01 LEARNING
05 WS-RECIEVE-VAL PIC X(4).
05 WS-RECIEVE-RED REDEFINES WS-RECIEVE-VAL PIC 9(2)V
(2).

01 WS-FOR-DISPLAY PIC 9(2).9(2).

PROCEDURE DIVISION.

MOVE 'b123' TO WS-RECIEVE-VAL
MOVE WS-RECIEVE-RED TO WS-FOR-DISPLAY

DISPLAY WS-FOR-DISPLAY

STOP RUN.

if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.

6452

---

What are 77 levels used for?

1052

---

What is the use of intialize verb?

1179

---

What is a report item?

1093

---

What is comp-1 and comp-2?

1185

---

What is the difference between Global and External Variables?

1294

---

)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?

1954

---

What is the problem of ordered sequential files access?

1109

---

Differentiate between structured cobol programming and object-oriented cobol programming.

1075

---

how to convert the recors form vsam file to db2 table tru file aid

3209

---

What are the pertinent COBOL commands?

3105

---

In which area will you utilize 88 level items in cobol?

1098

---

What is perform what is varying?

1111

---

how do you reference the rrds file formats from cobol programs

1494

---

what is difference bt COND, REGION & TIME parameters at JOB & EXEC. give an exp.

9018

---