× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Usually we use this:

d MyDs ds qualified inz
d MaxRows 10i 0 inz(0)
d Category like(Definition) dim(15)
d Rows likeds(Columns) dim(15)
d Columns ds template qualified inz
d MaxCols 10i 0 inz(0)
d Cols 50 dim(45)
d Definition ds qualified inz
d K1 5
d K2 12
d K3 4S 0

Definition is usefull if Category is a complex key otherwise is not needed.

HTH
--
Marco Facchinetti

Mr S.r.l.

Tel. 035 962885
Cel. 393 9620498

Skype: facchinettimarco


Il giorno mer 16 ott 2019 alle ore 02:54 Booth Martin <booth@xxxxxxxxxxxx>
ha scritto:

My guess is that I am making this way more difficult than it is, but I
have not figured out how to do it.

Free form c specs but H,F, & D specs are fixed format.

The situation is that I have 15 categories and each category has 45
values; 15 rows and 45 columns, right?

I need to populate those cells with data arriving in random sequence,
having the row#, column#, and values.

Any examples out there that you might suggest?

Jon posted a free-form d-spec solution but I am limited to fixed form,
and my efforts to back-write his example in fixed form failed.

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://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: https://amazon.midrange.com


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.