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



if %compcorr(ds1:ds2) = 0;

HTH
--
Marco Facchinetti

Mr S.r.l.

Tel. 035 962885
Cel. 393 9620498

Skype: facchinettimarco


Il giorno sab 20 apr 2024 alle ore 16:05 Daniel Gross <daniel@xxxxxxxx> ha
scritto:

Am 20.04.2024 um 14:31 schrieb Barbara Morris <bmorris@xxxxxxxxxx>:

There's an Idea that would help with comparing data structures:
https://ibm-power-systems.ideas.ibm.com/ideas/IBMI-I-1376

It is suggesting a compare-corresponding built-in function.

The Idea assumes that a new %COMPCORR built-in function would return *ON
or *OFF, but I think it would be more useful if it returned -1, 0, or 1.

-1: (ds1 is less than ds2)
0: (ds1 is equal to ds2)
1: (ds1 is greater than ds2)

But that would make it impossible to use the function like

if %compcorr(ds1:ds2);
...

So maybe we need more than one function:

if %isequal(ds1:ds2);

and

if %compare(ds1:ds2) = *zero;

Those functions could be data type agnostic - comparing data structures
"correlating" - comparing arrays element-wise - and so on.

Or both functions need a procedure pointer to a "comparator function" than
returns exactly that -1/0/1 result - also to help functions like sort - at
least this is what C has done.

Regards,
Daniel
--
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@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.



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.