Answer Posted / naveenkumar m

As few answered for VSAM file dedup, I will explain for PS flat files,

1) Make sure your file is sorted either Ascending or descending using SORT.

2)FIRST-READ PARA
READ INPUT-FILE INTO WS-ARRAY()
UNTIL EOF
ARRAY-COUNT=ARRAY-COUNT + 1

3)PERFORM COMPARE-PARA VARYING I FROM 1 BY 1 UNTIL I < ARRAY-COUNT
IF WS-ARRAY(I)=WS-ARRAY(I+1) THEN
WRITE DUPLICATE-RECORDS
ELSE
WRITE NODUPLICATE-RECORDS
END-PERFORM

=====================================
I just given algorithm not exact code....

What rules are to be followed while using the corresponding options?

1071

---

Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?

1153

---

What is the compute verb? How is it used?

1149

---

input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?

2302

---

How do define dynamic array in cobol. how do you define single dimensional array and multidimensional array in your cobol?

1249

---

Discuss about changing dataset name in proc.

1235

---

How many sections are there in data division in COBOL?

1136

---

What are the different rules of SORT operation?

1146

---

What is length is cobol?

1101

---

What is the difference between Call and a Link?

1198

---

How do u write test cases?

2069

---

What is a SSRANGE and NOSSRANGE?

1471

---

What is the difference between external and global variables in COBOL?

1466

---

How do we get current date from system with century in COBOL?

1381

---

Define static linking and dynamic linking.

1196

---