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



So what is the best way to clear previously used occurrances?  Do I have to
loop through all of them clearing them one at at time?

Further debugging did prove that after using 8 occurs, then resetting the
MODS to use 1 byte, then starting over and reallocating one occurrance's
worth of memory at a time, on the fifth occurrance, I began picking up
previously loaded data. So, apparently, REALLOC does not clear the new
memory it is allocating.  At least not if it has been used previously in the
same job?

> -----Original Message-----
> From: Hans Boldt [SMTP:boldt@ca.ibm.com]
> Sent: Thursday, June 20, 2002 11:13 AM
> To:   rpg400-l@midrange.com
> Subject:      Re: Pointer Question
>
> Smith, Nelson wrote:
> > Hans,
> >
> > On tighter debugging, I've determined that the 601 error is occuring on
> a
> > CLEAR *ALL to the MODS name.  ...
>
> OK, the simple answer is "Don't do that!".
>
> Basically, CLEAR *ALL MODS doesn't know squat about how much storage
> is really allocated to the data structure.  It just knows what
> you've told the compiler, and you've told the compiler that your
> data structure has 32767 occurrences.  If you've only allocated
> storage for 10000 occurrences, once CLEAR *ALL gets past those 10000
> occurrences, you're in dangerous territory.  Maybe you'll abend on
> the 10001'st occurrence, maybe later.  But sooner or later you're
> going to reach the limit of allocated storage.
>
> Cheers!  Hans
>
>
>
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.


************************************************************************************************************************************************************************************************************
This message originates from Lincare Holdings Inc. It contains information 
which maybe confidential or privileged and is intended only for the individual 
or entity named above.
It is prohibited for anyone else to disclose, copy, distribute or use the 
contents of this message.
All personal messages express views solely of the sender, which are not to be 
attributed to Lincare Holdings Inc., and may not be copied or distributed 
without this disclaimer.
If you received this message in error, please notify us immediately at 
MailAdmin@lincare.com or (800) 284-2006.
************************************************************************************************************************************************************************************************************



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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.