Answer / shinoy sansilavose

EVALUATE
WHEN A=B AND C=D
imperative stmt

WHEN (D+X)/Y = 4
imperative stmt
WHEN OTHER
imperative stmt
END-EVALUATE

EVALUATE SQLCODE ALSO FILE-STATUS
WHEN 100 ALSO '00'
imperative stmt
WHEN -305 ALSO '32'
imperative stmt
WHEN OTHER
imperative stmt
END-EVALUATE

EVALUATE SQLCODE ALSO A=B
WHEN 100 ALSO TRUE
imperative stmt

WHEN -305 ALSO FALSE
imperative stmt
END-EVALUATE

EVALUATE SQLCODE ALSO TRUE
WHEN 100 ALSO A=B
imperative stmt
WHEN -305 ALSO (A/C=4)
mperative stmt
END-EVALUATE

Answer / ch.mohan

two forms
1)true
2)option

What is the meaning of 'Eject' verb in cobol?

2 Answers   TCS, Wipro,

---

Difference between file status codes 02 and 22.... since both are for duplicate key detection.

1 Answers  

---

Hi................... I have records like this aaaa cccc bbbb And i want output like this bbbb cccc aaaa How can it possible ?. Note:Please make sure records are in unsorted order. somebody plzzz help me.

1 Answers  

---

1) can we display the index?

3 Answers   ADP, IBM,

---

what are the isolation levels and where we use it in the db2 program

3 Answers   TCS,

---

When is inspect verb is used in cobol?

0 Answers  

---

what is S04E error in jcl?

11 Answers   IBM, L&T,

---

What is the difference between Call and a Link?

0 Answers  

---

have in 100 records in a flat file i want to move records like 1,3,5,7,9,11,.. to Output file1 and 2,4,6,8,10,12,14 .. records moved to Output file2..Pls Provide real time answer..

5 Answers   TCS,

---

What is the use of EVALUATE statement?

4 Answers   Tesco,

---

What is the different between index and subscript?

3 Answers  

---

File status must be checked both while opening and reading the file or only while reading the file?

2 Answers  

---