Re: Mapping buckets in a record to arrays

I do this with feilds in display files.

DlibListArry      Ds                                        
D DSPWRK010C                                 feilds from file. each is 10 long.
D DSPWRK020C          
D DSPWRK030C          
D DSPWRK040C          
D DSPWRK050C          
D DSPWRK060C          
D DSPWRK070C          
D DSPWRK080C          
D DSPWRK090C          
D DSPWRK100C          
D List                    1    100a   Dim(10)              Deal with in nice 
array.

9/10/2003 1:38:13 PM, Jeff Markel <JMarkel@xxxxxxxxxx> wrote:

>I have 6 files that each contain many sets of 13 buckets each. Is there a
>way to define an external data structure for each file and "map" an array to
>each set of buckets? I guess overlay might work, but I would have to
>calculate the offset in the records for each array. Can I create an array,
>based on a pointer, and initialize the pointer to the first bucket field
>address? I seem to remember someone before having a problem with fields not
>being contiguous in memory and that caused a problem.
>
>Any help would be appreciated! Thx!
>
>Jeff Markel
>Developer, Information Access
>IBM Certified Specialist - iSeries RPG IV Developer
>Costco Wholesale Corporate Office
>Issaquah, Washington
>Office  (425) 427-7662
>FAX    (425) 313-6800
>JMarkel@xxxxxxxxxx
>
>
>_______________________________________________
>This is the RPG programming on the AS400 / 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.
>
>


Jason Kleinemas
Programmer/Analyst
Solcom Inc.
The Solutions Company http://www.solcominc.com
2516 E. 52nd St. N.
Sioux Falls, SD 57104
Desk Phone: 605-367-1546
Office Phone: 605-357-8212
AIM: JasonSolCom
jasonkleinemas@xxxxxxxxxxxxx
Certified twice....... but still a couple PTFs away from Nirvana.