Re: File Fields In Array

[Peter Dow <petercdow@xxxxxxxxx>]

You're right about having to be sure the S1Oth* fields are in the right 
order.  I've seen files where the first 5 entries of fields like that 
are together, then 10 years later they had to add 7 more at the end of 
the file.  Or were otherwise scattered in groups within the record.  
It's crazy out there!


On 3/12/2021 9:51 AM, Scott Klement wrote:
> Consider using LIKE() rather than CHAR(40)...  the sizes always 
> matching is even more critical if you're using pointers.
>
> The pointer technique is fine -- as long as you know for certain that 
> the "Sloth" fields (lol) are always in a data structure in the right 
> order.
>
> On 3/12/2021 11:43 AM, Peter Dow wrote:
> > Since you already have a data structure that contains the S1othCtr* 
> > fields, try this:
> >
> > Dcl-S Container Char(40) Dim(28) based(ptrCTR);
> >
> > Dcl-S ptrCTR Pointer inz(%addr(S1OthCtr1));