RE: clueless in SORTA -- RPG400-L

Thanks, I like your suggestions

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Anderson, Kurt
Sent: Wednesday, October 30, 2013 1:17 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: RE: clueless in SORTA

Sorry if I missed it if already mentioned, but you can easily omit the unused elements of an array in a sort by using the %subarr bif.

http://publib.boulder.ibm.com/infocenter/iadthelp/v7r0/index.jsp?topic=/com.ibm.etools.iseries.langref.doc/c0925086667.htm

Personally I always keep track of the # of elements in an array and perform actions against only those elements of the array. Number of elements can also be specified in %lookup.

-Kurt

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Gary Thompson
Sent: Wednesday, October 30, 2013 2:03 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: RE: clueless in SORTA

Thank you for the tip!

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of TheBorg
Sent: Wednesday, October 30, 2013 1:00 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: clueless in SORTA

I always use INZ(*HIVAL) on the array so that the unused elements will sort to the end of the array...
-sjl

"Gary Thompson" wrote in message
news:mailman.12259.1383159453.9013.rpg400-l@xxxxxxxxxxxx...

Good point and definitely a mistake I could/would make, but this time I double/triple checked and . . .
well I can hardly believe what I saw . . .

Just now running in Debug after removing SORTA and the array ASCEND . . .

Thank you.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Alan Campin
Sent: Wednesday, October 30, 2013 12:53 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: clueless in SORTA

Is this one of those deals where the array is defined as some huge number to only use a few elements? When you do the sort the blanks will be in the low order. Any chance you are looking at in debug and only see the first few which are blank?

On Wed, Oct 30, 2013 at 12:43 PM, Gary Thompson
<gthompson@xxxxxxxxxxx>wrote:

RPGLE pgm in production for about a year; used daily on V7R1

Today a report that pgm reports errors on valid values . . .

Debug shows LOOKUP on empty DS array,
hence the error

Debug shows DS array loaded from file correctly, then SORTA on DS
array, then DS array elements all empty

operations mgr reports no recent PTFs

Any help for the clueless ?

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

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

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

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

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