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




On 10/04/2010, at 5:23 AM, Barbara Morris wrote:

Simon, RPG does a blanket copy with EVAL-CORR if the data structures are
defined LIKEDS each other. The EVAL-CORR summary will indicate this.

I wasn't suggesting otherwise--it seems reasonable to expect the compiler to optimise EVAL-CORR to reduce the number of individual copy operations where possible and indeed the RPG IV Reference states this will happen.

I meant my comments to cause the original appender to think a bit more about what is occurring in his code instead of what appeared to be "It's broke, why is it broke?" Also, later appends implied that EVAL- CORR was required (because of LIKEDS) or at least should be tried to see if that would somehow, magically, solve the problem. I was attempting to respond to two comments (the original and later misguided ones) at the same time. Which is why I pointed out the release differences between when LIKEDS was provided and when EVAL- CORR arrived.

I meant that I might want to do a blanket copy from one DS to another where both may be LIKEDS different structures and therefore dissimilar to each other even though they may share common named sub-fields. In such a case EVAL-CORR would not provide the result I want therefore there must be an alternative (this was intended to correct the misguided suggestions for EVAL-CORR as a solution). Thus EVAL-CORR is not be required and a simple old-fashioned assignment must be supported and must work.

I simply shouldn't have been so circumspect and been more direct like my old grumpy self and responded directly to each append; the first with "It's a simple assignment, of course it works, check your crap code", and the second with "EVAL-CORR won't help, think again fool!" but I'm trying to be nicer, gentler, kinder ... feels very weird but I shall persevere. :)

Regards,
Simon Coulter.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------




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.