× 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 don't know, like I said it was a shot in the dark.  I wonder if performing
the RESET has anything to do with the pointer address?

Also, since your Array is only single dimension, and all 12 dimensions are
populated by your FOR loop, what does the DOU/READE get you?  Why not a
chain?  The only possible benefit I see is if there are multiple matching
records you would be guaranteed to get the last one which you could get
through SETGT and a single READPE...

If the read initially failed, wouldn't the array still have it's initialized
values?

One last, Pointer ignorant question... when the sub-procedure ends, what
happens to the memory allocation for plan?  If that memory was released,
would the pointer you pass back to th calling program still be valid?  Maybe
this is an activation group problem?

Again, I don't know if any of this would have anything to do with your
problem, just friendly comments

:-)


Joel R. Cochran
Director of Internet Services
VamaNet.com
(800)480-8810
mailto:webmaster@vamanet.com


> -----Original Message-----
> From: MWalter@hanoverwire.com [mailto:MWalter@hanoverwire.com]
> Sent: Friday, April 26, 2002 4:47 PM
> To: rpg400-l@midrange.com
> Subject: RE: Same procedure different problem
>
>
>
> Joel,
>
> Could be but it is failing on the first record read. The
> address in p_plan
> in the subproc is the same that is returned to the main procedure.
>
>
> Thanks,
>
> Mark
>
>
> Mark Walter
> Sr. Programmer/Analyst
> Hanover Wire Cloth a div of CCX, Inc.
> mwalter@hanoverwire.com
> http://www.hanoverwire.com
> 717.637.3795 Ext.3040
>
> _______________________________________________
> 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.
>


As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.