RE: RV: Converting Packed to Char.

["Carlos Kozuszko" <tidesarrollo@xxxxxxxxxxxxxxxxxxxxxx>]

Scott K. said:
> The number is a 30S 9, but you're stuffing it into a 15-byte 
> (29-digit)
> packed number.   Why not make peNumber be 29 digits?

You're right.

> [SNIP -- removed data structure and select group]
> > c                   eval      wwRetVal = %subst(CHAR_NUM:
> > c                                               %int(peSize 
> / 2 + 1))
> 
> Is this code correct?   It seems to me that you want peSize/2 
> + 1 to be
> the length of the result, not the offset into the character 
> string?!  Does
> this code work?

It works indeed, as the data is aligned to the right in variable 
CHAR_NUM i use this expresion to get the start-pos for %subst and 
specify no length in order to get the data till the end of the string.

> > Any ideas to improve it ?
> 
> Here's how I'd do it.   Note that I eliminated the SELECT group, and
> simplified the data structure by adding one line of multiplication.
> I changed the logic for the %subst() because I couldn't get your
> logic to work.

Nice... I shoud've realized that using ** i would've avoided the need of
the data structure with different decimal positions.

Thanks again.

Carlos K.