Re: Lookup on array in qualified DS

Like this?

D WkPromoDS DS
D Qualified
D Dim(100)
D Inz
D WkPRMO Like(PMPRMO)
D WkDESC Like(PMDESC)
D WkBDTE Like(PMBDTE)
D WkEDTE Like(PMEDTE)
D WkCMT1 Like(PMCMT1)
D WkCMT2 Like(PMCMT2)
D WkCMT3 Like(PMCMT3)
D WkRTCL Like(PMRTCL)
D WkMPUR Like(PMMPUR)

WkRecCount = %LookUp('R':WkPromoDS(*).WkRTCL);


On Thu, May 29, 2014 at 1:51 PM, Jeff Young <jyoung0950@xxxxxxxxx> wrote:

All,
I have a qualified Ds defined as follows:
D Services Ds Qualified dim(4)
D Service_Code 50A
D Ship_Via_Code Like(##SVia)


I can access the Ship_Via_Code as an array by qualifying it to the Services
data structure as Services(1).Ship_Via_Code, but can not search using
%lookup.
I tried Services.Ship_Via_Code and get error that it is missing an index.
I want to search the list of Ship_Via_Codes to get the entry that
corresponds to a variable, then use that index for other processing.

All suggestions are welcome.


Jeff Young
Sr. Programmer Analyst
--
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.