Re: Lookup in a M-O DS

So make it a data structure array, Change the OCCURS to DIM. I think with
MODS you have to do the loop version you referenced, You have to set the
occurrence before you can have access to the data in that occurrence.



From:
Timothy Adair <tadair@xxxxxxxxxxxxxxxx>
To:
rpg400-l@xxxxxxxxxxxx
Date:
11/18/2009 03:48 PM
Subject:
Lookup in a M-O DS
Sent by:
<rpg400-l-bounces@xxxxxxxxxxxx>



I've searched the archives and can't find an answer on this. How do you
do
a Lookup in a multiple-occurrence data structure. This is my first one
and
I can't seem to find a (good) solution.

Here's my DS:

D Record ds occurs(2000)
D Comp# 4 0
D Prod# 7 0
D CurDat 8 0
D CurPrc 7 4
D Status 1
D GL# 7 0

I am populating this with an SQL cursor loop, and doing Order By the last
field, GL#. Now I need to be able to do some kind of lookup on the GL#
field and return the element number that gets the hit.

I know I can do something funky, like do a loop that checks each
occurrence
of the GL# field, or pull the GL# field out of the DS and make it its own
array (both ugly), but isn't there a built-in function for this? I tried
%lookup but that doesn't compile if it's not an array.

Help? (TIA.)