Re: Program Status DS

[Mike <koldark@xxxxxxxxx>]

Ya, I did the mistake of assuming... you know what they say about that....

On 10/11/06, Barbara Morris <bmorris@xxxxxxxxxx> wrote:
> Mike wrote:
> >
> > Is this documentation correct?
> >
> http://wiki.midrange.com/index.php/Program_Status_Data_Structure#Here_is_a_Sample_Program_Status_Data_Structure_in_RPG_IV_Style
> > :
> >
> > I am not getting expected results in the User field. It has a number
> instead
> > of my username.
> >
>
> For any data structure where the exact position is important, I would
> never depend on getting the exact size of filler fields correct.  I
> would use a length notation and OVERLAY(psds:pos) to define every
> subfield explicitly with exactly the same information that is in the
> documentation.
>
>      Dpsds            sds
>      D pgmname                       10a     overlay(psds:1)
>      D pgmsts                         5s 0   overlay(psds:11)
>      D pgmprvsts                      5s 0   overlay(psds:16)
>      D pgmsrcstmt                     8a     overlay(psds:21)
>      etc
>
> --
> 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.