Page 1 of 1

Reading a file and inserting data into a table

Posted: Sun Sep 08, 2013 2:42 pm
by Salman
Hi Team,
It would be very grateful of you if help me out in fixing the my below query.
Requirement : Reading a PS file and inserting all the records into a DB2 table.
My table structure :

08 Stu-Record occurrs 15 times
10 stu-name pic x(10)
10 stu address pic x(20)
.
.
.
Here am fine with opening,reading a input file and loading the first record.

But where am stuck is to read the record line by line till end and inserting everytime.
And my difficulty is my copy book has occurs clause.,
For example :

Say, i need to insert a record into a address fileld
10 Address PIc x(20)
and i have address as

st.anns street
halifax
hx1 2rg
UK
.
.
.
.
.

I believe we need to use a PERFORM- Varying.

I googled but couldn't find my solution.
As am beginner, I request to provide a code for this Logic.

Thanks in Advance.

Posted: Sun Sep 08, 2013 3:37 pm
by NicC
Look up READ/AT END in the language reference. Get yourelf almost any book on COBOL which will show how to read through a file and write records.

Posted: Tue Sep 10, 2013 12:18 am
by DikDude
Your DB2 table doesn't really have an occurrs - does it?