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

What are the different data types in cobol?

1447

---

I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?

2276

---

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

1458

---

How do u write test cases?

2069

---

how do you reference the variable unblock file formats from cobol programs

1328

---

What kind of error is trapped by on size error option?

1247

---

which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad

1506

---

HOw can I get the negative sign while deduct high value from low value

2255

---

INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?

868

---

Which Search verb is equivalent to PERFORM…VARYING?

1043

---

What are literals?

1136

---

What is length is cobol?

1101

---

Write some characteristics of cobol as means of business language.

1145

---

How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?

2473

---

what is the difference between COBOL2 AND COBOL390?

3058

---