|
If I wanted the LIKE definition, I'd include all of the files as
templates. Say the the field TYP is in MYFILE:
dcl-ds dsMYFILE1 extname('MYFILE') qualified template end-ds;
Then you can do this in your data structure:
TYP LIKE(dsMYFILE.TYP);
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
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.