RE: Add flattened subfields after likeds

I have done such a thing before, that's why I thought it strange that you
couldn't do something similar with an internally defined structure. Oh
well, copy/paste works for now.




From: "Monnier, Gary" <Gary.Monnier@xxxxxxxxx>
To: "RPG programming on the IBM i (AS/400 and iSeries)"
<rpg400-l@xxxxxxxxxxxx>
Date: 09/26/2014 01:49 PM
Subject: RE: Add flattened subfields after likeds
Sent by: "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>



Have you tried making your initial data structure a table?



D C1DS E DS EXTNAME(MYFILE) QUALIFIED



D TestDS E DS EXTNAME(MYFILE) QUALIFIED

D ZZ1 1

D ZZ2 1



MYFILE would have the structure of your C1DS.



-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Voris,
John
Sent: Friday, September 26, 2014 10:25 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Add flattened subfields after likeds



This idea of a BASEDds would be a nice feature.

Having such a feature in DDS would be nice, too.



Today, I am building an Audit File that will track an existing master
file's updates.

All I am adding are fields like USER and TIMESTAMP, and because of this, I
have to list all the Fields in DDS that are in the Master.

And when I am done, I will not have DSPDBR relationship between the Master
File and the Audit File.

(The names are similar, but I cannot build a relationship known to the
database between the two files.)



- John Voris

Re: Add flattened subfields after likeds

no good solution. something like "baseDS" would be a nice feature:

D TestDS DS baseds(C1DS)

D ZZ1 1

D ZZ2 1

and then allow the derived data struct to be passed to a proc that

expects a parm that is likeds the based struct.

--

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<
mailto: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<
mailto:RPG400-L-request@xxxxxxxxxxxx>

Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.


--
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.