Re: eval varylen = *blanks

["Jack Mullins" <jmullins@xxxxxxxxxxx>]

>Here's how it's supposed to work:  EVAL VAR=*BLANKS  sets the
>field to all blanks.  If VAR is defined as char 20 varying,
>you get 20 blanks and the current length of the variable is
>set to the maximum.

Ahhhh, that explains why I received the error message!  The program I was
working on is dependent on the length of the variable length field.  I set
the length of the field in *INZSR according to an external value and it has
to remain set at that length throughout the program.  When I was using EVAL
VAR=*BLANKS, I was resetting the length!

>Using MOVE is different in that the current length doesn't
>change.  If the result variable is currently 10, you get those
>10 chars set to blanks.

Okay, good... that's exactly what I wanted.

>If you're using V4R2 or V4R3, note that the debugger doesn't
>handle character varying type properly, so what you see there
>may not be correct.

Yes, I am on V4R2.  That explains why I thought the EVAL statement wasn't
working properly.

Thanks for the input.  Even though I had fixed the problem by using MOVE, it
has still been bugging me for the last couple of days.

73,

Jack Mullins
Sunergoline
P.O. Box 2026
Jonesboro, AR 72402
http://www.sunergoline.com
jackm@sundash.com



+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---