%TLOOKUP

[Dave Boettcher <DBoettch@xxxxxxxxxxxxxxxx>]

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
If this doubles up, Sorry, but the first time doesn't seem to have come
through.

> Can anyone tell me what is wrong with this code?
> Tables are defined:
>
>      D TABCFS          S              2    DIM(30) CTDATA PERRCD(1) ASCEND
>      D TABSAC          S              3    DIM(30) ALT(TABCFS)
>
> Lookup is here
>
>      C                   IF        %TLOOKUP(ARPPA:TABCFS:TABSAC)
>      C                   EVAL      VREL   = TABSAC
>
> And I keep getting this  Verifier  message    for CODE 400 and compiler
> message if I try compiling on our V5R1 machine.
>
> RNF0597E The second parameter for %TLOOKUPxx is not valid.
>
> The manual shows two values are possible
> %TLOOKUP(arg : search-table {: alt-table})
>
> TIA,
>
> Dave Boettcher
> David P. Boettcher CCP
> Kenosha County Information Services
> County Courthouse, Room LL13
> 912 56th St
> Kenosha, WI   53140-3747
> e-mail: dboettch@co.kenosha.wi.us
> Voice: 262.653.2520
>
> The greatest mistake one can make is to do nothing;
> if you can only do a little, do what you can.
>
>