IBM Mainframe Forum

I am still struggling to get output . Pls tell me what to do ??? Till average calculation , I have completed ! Next Rank Calculation is little bit tuff for me !!

Why? Once you've got the averages sorted in descending order, the first one gets rank 1. If the second average is the same as the first, it also gets rank 1 -- otherwise it gets rank 2.

Many companies do this with tableBASE. Just load the data into a tableBASE table and define an alternate index. It's very fast.

most probably the TS does not have tableBASE
since this is a A Help & Support Forum for Mainframe Beginners and Students
maybe is just trying to carry on some assignment

Hello,

Even if tablebase is on the system, the requirement is to do this using cobol. . .

you don't need average for a bubblesort.
All you need is
a loop : perform until
a compare : if A > B
and a SWAP, which in COBOL can only be done by using a additional WS field/record: move A to X . move B to A . move X to B.

Hi Guy,

If i understand, the goal is to sort the averages into ranks (rather than sorting "detail").