Re: MODS definitions, based vs. non-based, V4R5

[Paul Tuohy <tuohyp@xxxxxxxxxxxxx>]

Hi Joe

In your second example you are defining the pointer as a subfield of the
data structure - you forgot the S to make it stand alone.

Could it be the same in the original?

HTH

Paul

Joe Pluta wrote:
>
> > From: Joe Pluta
> >
> > Anybody know why this occurs?  Situation:
>
> More on this...
>
> Dsccc5dstg      e ds                  extname(SCCC5D) occurs(150)
> D                                     prefix(STG)
> Dsccc5dds       e ds                  extname(SCCC5D) occurs(150)
> D                                     based(pc5dds)
>
> The above works - both data structures are defined as length 47.  However,
> the following code does not work - the first data structure is length 47,
> but the second is length 64.
>
> Dsccc5dstg      e ds                  extname(SCCC5D) prefix(zzz)
> Dsccc5dds       e ds                  extname(SCCC5D) occurs(150)
> D  pc5dds                         *   inz(%addr(sccc5dds))
>
> I'm completely at a loss here.
>
> Joe
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.