> >eliminar los que van a quedarse obsoletos, se que junto a la sentencia
EVAL
> >ha salido una funci�n que pasa campos num�ricos a alfanum�ricos y
%dec no vale para eso: aqui teneis para lo que se usa DEC con un ejemplo.
---------------------------------
%DEC (Convert to Packed Decimal Format)
%DEC(numeric expression{:precision:decimal places})
%DEC converts the value of the numeric expression to decimal (packed) format
with precision digits and decimal places decimal positions. The precision
and
decimal places must be numeric literals, named constants that represent
numeric
literals, or built-in functions with a numeric value known at compile-time.
Parameters precision and decimal places may be omitted if the type of
numeric
expression is not float. If these parameters are omitted, the precision and
decimal
places are taken from the attributes of numeric expression.
%DECH (Convert to Packed Decimal Format with Half Adjust)
%DECH(numeric expression :precision:decimal places )
%DECH is the same as %DEC except that if numeric expression is a decimal or
float value, half adjust is applied to the value of numeric expression when
converting
to the desired precision. No message is issued if half adjust cannot be
performed.
Unlike, %DEC, all three parameters are required.
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++
D p7 s 7p 3 inz (1234.567)
D s9 s 9s 5 inz (73.73442)
D f8 s 8f inz (123.456789)
D result1 s 15p 5
D result2 s 15p 5
D result3 s 15p 5
CL0N01Factor1+++++++Opcode&ExtExtended-factor2+++++++++++++++++++++++++++
C eval result1 = %dec (p7) + 0.011
C eval result2 = %dec (s9 : 5: 0)
C eval result3 = %dech (f8: 5: 2)
* The value of "result1" is now 1234.57800.
* The value of "result2" is now 73.00000
* The value of "result3" is now 123.46000.
----- Original Message -----
From: "Antonio" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, October 31, 2002 9:22 AM
Subject: Re: Pase de datos num�ricos a alfanum�ricos y viceversa.
> Yo no lo conseguido, pregunte en el foro y nadie me ha contestado. Al
> final sigo utilizando el MOVE.
>
> Si lo descubres av�same.
>
> Saludos.
>
> [EMAIL PROTECTED] wrote:
>
> >Hola a todos:
> >Soy nueva en este foro, y espero que el nivel que veo en el no sea
> >impedimento para que contesteis la pregunta tan sencilla que voy a
> >formularos.
> >Estamos programando en ILE y tenemos la versi�n 5 release 1 en el AS400,
> >estamos intentando programar acoplando los nuevos mandatos e intentar
> >eliminar los que van a quedarse obsoletos, se que junto a la sentencia
EVAL
> >ha salido una funci�n que pasa campos num�ricos a alfanum�ricos y
> >viceversa, pero al intentar compilar el programa da errores y me fuerza a
> >seguir utilizando el MOVE.
> >Alguien puede decirme se me hace falta alg�n par�metro m�s de los que
> >utilizo.
> >
> >EVAL campo num�rico=%dec(campo alfanum�rico)
> >
> >El error que me da es el siguiente: los tipos del lado izquierdo y
derecho
> >no coinciden en la especificaci�n EVAL.
> >El primer par�metro para %DEC o %DECH no es v�lido.
> >
> >Muchas gracias anticipadas.
> >
> >
> >
> >
> >_____________________________________________________
> >Forum.HELP400 es un servicio m�s de NEWS/400.
> >� Publicaciones Help400, S.L. - Todos los derechos reservados
> >http://www.help400.es
> >_____________________________________________________
> >
> >Para darte de baja, env�a el mensaje resultante de pulsar
> >mailto:forum.help400-request@;combios.es?body=AVE
> >
>
>
> _______________________________________________________________
> Yahoo! Messenger
> Nueva versi�n: Webcam, voz, y mucho m�s �Gratis!
> Desc�rgalo ya desde http://messenger.yahoo.es
>
>
> _____________________________________________________
> Forum.HELP400 es un servicio m�s de NEWS/400.
> � Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja, env�a el mensaje resultante de pulsar
> mailto:forum.help400-request@;combios.es?body=LEAVE
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:forum.help400-request@;combios.es?body=LEAVE
