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