[Tiny-cobol-users] Alternate Keys,

[Andrew C. <an...@an...>]

Hi,

I have written the code for READ PREVIOUS and READ NEXT for Alternate
Keys.

I have tested READ PREVIOUS see t04 and it works.

Read Next also works but there is a bug in the compiler that needs to be
fixed before you can use it.

Rildo:- Please investigate why the compiler returns "sort_return" instead
of "cob_read_next" as this causes it to call the wrong routines. I think
the problem is in htcobol.y where the read syntax is defined.

 if ($1==1)
	gen_return($2,$4)
  
Regards
Andrew Cameron

-----------------------------------------------------------------------------

Andrew Cameron
Internet : an...@an...
X.400    : C=ZA G=Andrew S=Cameron Admd=TELKOM400

----------------------------------------------------------------------------