RE: xfoot a data structure

I know I use qualified DS arrays when I want dynamic sorting / searching by different fields of the data structure. To me it is much cleaner and the code more easily understood using them.

Scott Mildenberger
Programmer/Analyst
Davis Transport Inc.
Missoula, MT
406-728-5510 x128

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin
Sent: Thursday, September 05, 2013 9:50 AM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: xfoot a data structure

I believe you but I don't understand you. What is the win he will gain by using a DS array? I admit, I have never understood the win/gain of the qualified keyword.


On 9/5/2013 9:12 AM, Jon Paris wrote:

That works Booth - but it doesn't meet the OP's original requirement that it be a DS array. You're using a group field defined as an array.


On 2013-09-04, at 9:03 PM, Booth Martin <booth@xxxxxxxxxxxx> wrote:

fwiw, this code:

D ds
D data dim(100)
D numbr1 11s 2 inz(1) overlay(data)
D numbr2 11s 2 inz(2) overlay(data: *next)
/FREE
nField = %xfoot(numbr1);
wString = %editc(nField: 'N');
dsply wString;
nField = %xfoot(numbr2);
wString = %editc(nField: 'N');
dsply wString;

gave me this result:
DSPLY 100.00
DSPLY 200.00

Jon Paris

www.partner400.com
www.SystemiDeveloper.com

--
Booth Martin
www.martinvt.com
(802)461-5349
Skype: booth.martin

Love is the triumph of imagination over intelligence. -- attributed to H. L. Mencken
--
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.