Read The VSAM file from Start without Key.

hitesh0000 · New User Joined: 01 Feb 2008 Posts: 6 Location: Noida

Hi,

I have to code a new online program which reads the VSAM file from start to end.

But i dont have the key for the first record, so my question is can i read the first record of the file and henceforth the entire VSAM file.

If yes, which way?

How is it that i bring the pointer to the first record so as to read the entire record and thereafter read the next record until EOF.

It doesnt allow me to Read file without RIDFLD.

Thanks,
Hitesh

Bill O'Boyle · Posted: Thu Jul 03, 2008 4:04 pm

Move LOW-VALUES to the WS KEY and use this WS KEY as the RIDFLD in the STARTBR command to begin your browse.

FWIW, you cannot Browse a KSDS file without the RIDFLD as you'll get a translator error.

If for some strange reason a NOTFND condition is raised on the STARTBR, then the file is EMPTY.

Otherwise, issue subsequent READNEXT commands until you've reached EOF (EIBRESP=20) or the record that you've just read contains the information that you need. If this is the case, then it would be wise to issue an ENDBR command rather than wait until task termination.

Regards,

Bill

dbzTHEdinosauer · Posted: Thu Jul 03, 2008 4:10 pm

hitesh0000 · New User Joined: 01 Feb 2008 Posts: 6 Location: Noida

Hi Bill O'Boyle,

Its working, thank you very much.

U have really been of great help.

Thanks,
Hitesh