Re: TAB01/TAB02 to "D" spec.s

Dick,

You're not being very clear. You want to get rid of the compile time
arrays AND you want to avoid code changes. That's a bit much to ask.
Besides, you can modernize while keeping the tables; just use %tlookup
instead of LOOKUP (or LOKUP).

Joep Beckeringh





<dickjaz@xxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
27-08-2007 22:35
Please respond to RPG programming on the AS400 / iSeries

To: rpg400-l@xxxxxxxxxxxx
cc: rpg400-l-request@xxxxxxxxxxxx
Fax to:
Subject: Re: RPG400-L Digest, Vol 6, Issue 859


I guess inarticulate should be my middle name! Yes, I can do a straight
conversion and use the compile time data reference at the bottom of the
program (CTDATA & PERRCD() ALT()). What I wanted to do was move that
data from the '**' position up into the 'D' spec.s. I have been able to
clean up the compile time arrays but I can't see how to set up the data
for TAB01/TAB02 in 'D' spec.s.
D.J.