Re: RNF0571 The second parameter of LOOKUP is not valid

Vern, Vern - read the article I referenced my boy <grin> all will be explained.

At V6 he can’t use %Lookup on a DS array - so group fields are his only option and the DIM does indeed belong on the group field.

The compiler determines the length from the fields that overlay the group. And it is always char.

He was only using free-form because that was how I coded the sample group field because I was in a hurry.


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Nov 6, 2014, at 1:08 PM, Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx> wrote:

Bill

When you say "instance", do you really mean "element"?

To work with a particular element, you just put the array index in parentheses after the array name. That's just as you said below.

But what you have as the DS declaration might not be valid - the DIM() keyword has to be on the dcl-ds - not on the subfiled, Group.

And I have no idea, without trying it, where your Fld1 and Fld2 fields end up - and Group is not defined here - what is its data type and length? Does it come from an F-spec?

You say you are on 6.1 - I suggest that you use the fixed-format D-specs, not the free-form, which your 6.1 compiler will not understand - RDi DOES understand it, but not the compiler.

HTH
Vern

On 11/6/2014 11:36 AM, Bill Howie wrote:

Jon,

Thanks for the info. In this scenario:

dcl-ds MyDS;
Group Dim(99);
Fld1 char(4) Overlay(Group);
Fld2 char(20) Overlay(Group: *Next);
end-ds;

index <http://archive.midrange.com/rpg400-l/201411/msg00008.html#> -
%LookUp( searchText: Fld2); // This should do it.

how then would I be able to refer to an individual instance of the array?
I'm trying different options and having some difficulty. So say I wanted
to load up the first instance of the array, both fields Fld1 and Fld2, with
data - how would I refer to them?

Fld1(someindexvalue) = data?


Thanks!

Bill

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.