Mejor solución para asignación de valor entre variables

[paraujo]

Te pido mil disculpas "bisonye", seguramente tenes razón.
Lo único que puedo aportar es que yo corro este programa y el resultado en la variable V2 es el que corresponde.
A lo mejor esto ayuda en algo.
Sds.

*&---------------------------------------------------------------------*
*& Report Y_PRU
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT Y_PRU.
DATA: V1 type tb_kkurs, " Dec 13,9
V2 type KURSK. " Dec 9,5

V1 = '1.275000000'.
V2 = V1.

WRITE V2.

Resultado del Write:

PRUEBA

1.27500

[ballan]

Pues lo unico que se me ocurre seria hacer

write v1 to v2 using no edit mask.

Asi no ejecutaria la rutina de conversion que es lo que probablemente este alterando el resultado

[ifloresb]

Saludos,
Yo creo que más bien tu problema va por el número de decimales, en V1 tienes 9 decimales así que te va a tomar nueve posiciones antes de poner el punto como separador entonces tu valor 1.275000000 en V2 toma el valor '12750.00000 a causa del número de decimales de V2, entonces lo que te recomiendo hacer es usar la sentecia SHIFT --- RIGHT DELETING o algo así para poder eliminar los últimos 4 numeros y asi lograr que V2 tome el mismo valor de V1.

Espero te sirva mi consejo.

[bisonye]

No hace falta disculparse, tu has dado una posible solución que creías válida y lo que he hecho es corregirte por que la respuesta no era correcta.
Creo que el foro tiene que ser así, con participación.
Revisando el post es un poco brusco pero no está escrito con mala intención, a veces me pasa, sobre todo cuando me apretan en el trabajo.
Espero no haberte ofendido, si es así me disculpo yo.

He puesto el código en mi sistema y la variable pasa correctamente pero yo tengo algún código parecido en el que tengo que hacer divisiones.

A ver si alguien tiene alguna otra idea.

[paraujo]

Todo bien, bisonye, en verdad mi respuesta fue muy rápida y no pensé, en realidad tenías razón.
Pero lo extraño es que en la prueba funciona bien.
Esperaremos a ver que otra explicación al tema nos dan.

Sds.

[kerberos]

Hola Paraujo!

Gracias por tu prueba. Efectivamente funciona bien. Pero tenía un codigo similar al tuyo en un User Exit de SD y me generaba el error por el cual abrí este Post. No se si el comportamiento se deba entonces a un atributo del programa principal o algo parecido.