IBM Mainframe Forum

[vipinrye]

I have 50 records in vsam , i want access records from bottom onwards. what is the logic for that?

[Akatsukami]

What kind of VSAM data set?

[steve-myers]

And what do you mean by, "access records from bottom onwards?" I suspect the interviewer (as opposed to the interviewee) doesn't know very much!

[vipinrye]

sequential data... he wan to read the data from bottom to top? by default reading processes starts from top 2 bottom..

[Akatsukami]

If it is known that there are only fifty records, read the ESDS into an array (table, etc.) and then process it in a loop from 50 to 1 by -1.

When you tell the interviewer that, raise one eyebrow in a supercilious fashion and tell him in a patronizing tone of voice, "Of course, no real application needs to do that; is this an inept attempt to determine my VSAM knowledge or an inept attempt to determine my problem-solving ability?"

[sinmani]

Move high values to KEY and then issue READ PREV command.

Hig values will make the keys point after last record
Read previous will make it start reading from last to first

[MrSpock]

I'm not a COBOL guy, but I believe that's incorrect. I don't think there is a READ PREV in COBOL.

[BillyBoyo]

Not in Enterprise Cobol,

[Ed Goodman]

So probably the question comes from someone not using IBM Enterprise COBOL. Since it's "COBOL", the answer is to use READ PREV. Sad that the person taking the test will get the wrong answer for the right reason.

I guess the smart thing to do is to find out ahead of time which version of COBOL is being used at the job site. My MicroFocus COBOL manual has "READ PREV" as a valid option.

[Robert Sample]

Since this is a MAINFRAME forum, the presumption should be use of Enterprise COBOL (or one of its predecessors). And in Enterprise COBOL, the answer is that it cannot be done in batch (although CICS supports it).

I use Open COBOL on my Linux and Windows platforms and it, too, has READ PREVIOUS as an option.