Answer / ajay ahuja

Program:

1. Define sequential file of same record size as of Indexed
file. say "WS-SEQ-FILE-RECORD".

2. Open Indexed file in INPUT mode and Sequential file in
output mode.

3. Read Indexed file into "WS-SEQ-FILE-RECORD".

4. Write into Sequential file. Continue Step 3 thru 4 until
end of Indexed file.


JCL:

Use Utility = IDCAMS,
//DD1 DD DSN=INDEXED.FILE.NAME
//DD2 DD DSN=SEQUENTIAL.FILE.NAME
// SYSIN DD *
REPRO INFILE(DD1) OUTFILE(DD2)
/*
//

I Hope this will help you !!!!

when iam reading a flat file which has 100 records through cobol program when iam reading 50th records it gets abends .. so when i run the program again it should read from 50th record .where it got abened ? how it is possible

1 Answers   Patni,

---

What is the Purpose of POINTER Phrase in STRING command

3 Answers  

---

WHY LRECL NEEDS TO BE 4 EXTRA THEN THE COBOL FILE LENGTH & WHAT IT CONTAIN IN THAT LENGTH

2 Answers   Cap Gemini,

---

What is the difference between Perform para and perform asaection in cobol?

3 Answers   TCS,

---

What does EXIT do ?

3 Answers   Deloitte,

---

Write the syntax of a two dimensional array?

8 Answers   Honeywell, Xansa,

---

what is srange and nosrange pls reply to ths question ?

2 Answers   L&T,

---

How are the next sentence and continue different from each other?

0 Answers  

---

how do you reference the rrds file formats from cobol programs

0 Answers  

---

What is the difference between perform … with test after and perform … with test before?

0 Answers  

---

Can we access the a[0] in the array ?

6 Answers   DCL, IBM,

---

How do we get current date from system with century?

2 Answers  

---