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



I hate v5r2. 
%SUBARR is on v5r3 and is the cool thing about that release of RPG IV.
I usually see people on v5r1 or v5r3; not many bother with v5r2, but of course,
as you prove, this doesn't mean everyone. 
Hopefully people will bounce to v5r4 from whatever release they're on so that we
can finally be somewhat consistent in the features of RPG IV.


-Bob Cozzi
www.iSeriesTV.com
Ask your Manager to watch iSeriesTV.com

-----Original Message-----
From: rpg400-l-bounces+cozzi=rpgiv.com@xxxxxxxxxxxx
[mailto:rpg400-l-bounces+cozzi=rpgiv.com@xxxxxxxxxxxx] On Behalf Of Lim
Hock-Chai
Sent: Tuesday, August 22, 2006 4:28 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Bsearch for closest match

 oh, man...  %subarr is not available in v5r2 (doesn't seems to be
anyway).  I hate it when this happen.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Lim Hock-Chai
Sent: Tuesday, August 22, 2006 12:14 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Bsearch for closest match

Cool! I'll check this out.  Assuming %lookup will do binary search when
I specified from and to element.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Bob Cozzi
Sent: Tuesday, August 22, 2006 12:01 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Bsearch for closest match

SORTA with the %SUBARR() built-in can sort a dynamic array.
By the way, I miss the tidbit about it being a dynamic array...

 SORTA  %subarr(myArr : 1 : 50);

You can also do this in "fixed-format".


-Bob Cozzi
www.iSeriesTV.com
Ask your Manager to watch iSeriesTV.com


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Lim Hock-Chai
Sent: Tuesday, August 22, 2006 11:42 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Bsearch for closest match

Below is my understanding (which could be wrong)
- %lookup uses sequential search if array is declared without
ASCEND/DESCEND
- %lookup use some type of binary search when ASCEND/DESCEND is
specified.

The problem is that SORTA can to sort dynamic array.  So, even with the
ASCEND/DESCEND keyword, I still not able to get the binary search
benefits of %lookup.

Again, all statements above might be wrong.

 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jon Paris
Sent: Tuesday, August 22, 2006 11:34 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Bsearch for closest match

I always though that lookup does not work for dynamic array.  I'll
test it out again.

The old LOOKUP op-code was not viable because it wanted to search all of
the elements defined in the DIM.  %LOOKUP however allows you to specify
not just the starting point but also the end point for the search - so
it can be used.

I'm not certain - but I don't think %Lookup will do a binary search when
you use %LookupGE - in which case it will perform at the speed of the
old LOOKUP op-code (i.e. slowly)

Jon Paris
Partner400

www.Partner400.com 

--
This is the RPG programming on the AS400 / 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.


--
This is the RPG programming on the AS400 / 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.


--
This is the RPG programming on the AS400 / 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.



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.