Answer / lu

yes, ...you declare an array like this:
77 ws-counter pic 9(04) value zeroes.
01 ws-array.
07 ws-field pic x (01) ouccurs 1 to 1000
depending on ws-counter.

Procedure Division.
Perform Read-file until ws-end-of-file = 'y'.
Read-file.
Read file at end
move 'y' to ws-end-of-file.
if ws-end-of-file not = 'y'
add 1 to ws-counter
move aa of file to ws-field (ws-counter).

the maximun is 1000 occurrences and minimun is 1...

what is the difference b/w level no.01 & level no.77?

3 Answers   HCL,

---

what is the difference between perform varying and perform until

4 Answers   TCS,

---

What are the steps you go through while creating a COBOL program executable?

3 Answers  

---

I want ALL jcl ERROR cods

1 Answers  

---

What is the difference between a DYNAMIC and STATIC call in COBOL?

2 Answers  

---

What is COMP-1? COMP-2?

4 Answers   CitiGroup,

---

what is meaning by design document? who can repared for this?

5 Answers   TCS,

---

I hv ten records in ps file and i hv say some 15 records in vsam file .i hv empno and age in ps file n empno,empname,dept n desig in vsam file. i hv 2 read the ps file n check wid matching empno in vsam file and then insert all fields from ps and vsam into db2 table....plz help in writin the procedure division

1 Answers  

---

tell me about examine inspect and evaluate ?

2 Answers   CTS,

---

I have two questions here. 1. How to read a flat file in reverse order? 2. How to read a VSAM KSDS file in reverse order? In both the cases we donot know the total number of records.

1 Answers   L&T,

---

What is an in-line perform ?

4 Answers   Accenture,

---

have in 100 records in a file i want to read first 3 records and skip next 3 records and agan i want to read 3 records and again i want to skip 3 records...

2 Answers   ITC Indian Tobacco Company, PNP, TCS,

---