Re: %TLOOKUP

["mlazarus@xxxxxxxx" <mlazarus@xxxxxxxx>]

Hans,

>How would I code an "associative array" without using tables? Probably
something like:

    monitor;
       char = TypeChars(%lookup(SrcAttribute:SrcTypes));
    on-error 121;
       char = '-';
    endmon;

> As you can see, the above code avoids the use of a separate index 
variable. But then, I don't see what's the big deal about avoiding 
an index variable. Either way, there's still only one lookup.

 I'm still getting used to the "monitor" idea in RPG, even though I have
used it already.  Even in CL I often do a CHKOBJ instead of monitoring for
the failed operation.

 Thanks for pointing out an alternate method.

 -mark

--------------------------------------------------------------------
mail2web - Check your email from the web at
http://mail2web.com/ .