As Chuck, I assume the 2-byte length attribute is invalid.
Did you initialize the data structures (Keyword INZ) when defining them?
If not the 2-byte length attribute contains Blanks before moving a value
into the varying length field.
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im
Auftrag von CRPence
Gesendet: Friday, 06. January 2012 07:21
An: rpg400-l@xxxxxxxxxxxx
Betreff: Re: VarChar to Char Field, Shouldn't This Work?
On 05-Jan-2012 20:25 , Mike Wills wrote:
I have a RPG field defined as VarChar(17) and a file field defined as
Char(17). I thought I could do an eval on the two and it would work.
EDI850_Detail_Out.UnitPrice = EDI850_PO1_Record.UnitPrice
In the above, PO1 is the varchar field. I am getting the following
error: "Length of varying length variable is out of range."
Am I forgetting something? My head has been stuck in the .NET world a
bit too long me thinks....
I believe the error [rnq0115 rnx0115] implies that the 2-byte length
attribute of the varying character variable is in error already, rather
than any relationship to the ability to assign between fixed-length char
and varying-length char. If so, the question is how did that variable
with the incorrect length get set? Review the value in debug before
that assignment is attempted. Knowing what is the incorrect value for
the length may assist to track back to the assignment or other origin
[e.g. initialization, basing pointer being set, etc.] for the length
attribute of that variable.
A varying 17 takes 19 bytes of storage. If the value of the string
is 'ABC' then the storage is x'0003C1C2C3'; i.e. a length attribute of
x'00003'.
. . . . + . . . . 1 . . . . + . . . . 2
0003C1C2C3............................
However if, for example, the raw value x'C1C2C3' either had been
/moved/ into the varying field or is defined by an overlay\direct-map,
then the variable would look like the string 'C.....' with a length
attribute of x'C1C2' which is out-of-range; i.e. a length _way beyond_ 17.
. . . . + . . . . 1 . . . . + . . . . 2
C1C2C3............................
Regards, Chuck
midrange.com
