Re: SQL and defining data structures

[Charles Wilt <charles.wilt@xxxxxxxxx>]

You're not missing anything...

Yes, it's a little extra typing, but that's ok.  Actually, you probably
need to do a bit more typing, three character field names are frowned upon
in modern RPG. ;)

Here's the key, you only ever need to define this DS in one place.  If you
need it in more than one place, then define it as a TEMPLATE in a /COPY
book and bring it into where you need it.

Charles

On Wed, Aug 30, 2017 at 12:13 PM, Jack Tucky <jacktucky@xxxxxxxxx> wrote:

> I'm learning more embedded SQL, I'm doing a group/order by, so I process
> the rows into a data structure.
>
> I have a fetch like this, fetch next from c into :cx;
>
> But the only way I can see to define the DS is to hard code the columns.
> This can't be the best way
>
>         dcl-ds cx qualified inz;
>                TYP char(3);
>                SHP packed(7: 0);
>                SEA char(5);
>                STY char(20);
>                CLR char(10);
>                FAB char(10);
>                MOD char(10);
>        end-ds;
>
> The SQL select doesn't match any specific table, it's a join of several
> files.
>
> Thanks for any advice, Art
> --
> 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.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: http://amzn.to/2dEadiD