Fernando te lo esplico mas en detalle:
C/EXEC SQL
C+ SET :NUMER = Decimal(:CARAC, 9, 2, ',')
C/END-EXEC
En el programa RPG debes tener dos campos definidos, el primero llamado
CARAC que es un campo alfanumerico donde tienes el valor que quieres
convertir a numerico, y el segundo llamado NUMER que en este caso es
numerico de nueve posiciones y dos decimales. El precompilador SQL detecta
que ambos campos son del programa principal porque llevan por delante los
dos puntos.
Un saludo
Luis Eibar
[EMAIL PROTECTED]
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:forum.help400-request@;combios.es]En nombre de Fernando P�rez
Enviado el: martes, 05 de noviembre de 2002 21:48
Para: '[EMAIL PROTECTED]'
Asunto: RE: Pase de datos num�ricos a alfanum�ricos y viceversa.
Lu�s, he probado ha hacer lo que comentas en un SQLRPGLE, y me da error al
compilar, diciendo que la variable de programa no se ha encontrado o no se
puede utilizar. �Seguro que esto sirve para variables de programa, o solo
para variables definidas dentro del SQL embebido?
Si vale para variables del programa, �como las defines y compilas el
programa?
Saludos.
Fernando P�rez.
Cer�mica Saloni. Dpto. Sistemas
* : 964343434
<mailto:FPEREZ@;SALONI.COM>
-----Mensaje original-----
De: Luis Eibar [mailto:leibar@;bilbania.com]
Enviado el: martes, 05 de noviembre de 2002 18:32
Para: [EMAIL PROTECTED]
Asunto: RE: Pase de datos num�ricos a alfanum�ricos y viceversa.
Como bien dice el amigo Fernando falta un set delante de :NUMER. La
codificaci�n debe quedar:
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:forum.help400-request@;combios.es]En nombre de Fernando P�rez
Enviado el: jueves, 31 de octubre de 2002 16:57
Para: '[EMAIL PROTECTED]'
Asunto: RE: Pase de datos num�ricos a alfanum�ricos y viceversa.
C/EXEC SQL
C+ SET :NUMER = Decimal(:CARAC, 9, 2, ',')
C/END-EXEC
Un lapsus lo puede tener cualquiera
Un saludo.
Luis Eibar
[EMAIL PROTECTED]
�No falta un SET antes de :NUMER?
Saludos.
Fernando P�rez.
Cer�mica Saloni. Dpto. Sistemas
* : 964343434
<mailto:FPEREZ@;SALONI.COM>
-----Mensaje original-----
De: Luis Eibar [mailto:leibar@;bilbania.com]
Enviado el: jueves, 31 de octubre de 2002 16:24
Para: [EMAIL PROTECTED]
Asunto: RE: Pase de datos num�ricos a alfanum�ricos y viceversa.
Una forma de poder hacerlo en versiones anteriores a la 5 es con el SQL
embebido en programa. La instruccion es similar a la siguiente:
C/EXEC SQL
C+ :NUMER = Decimal(:CARAC, 9, 2, ',')
C/END-EXEC
En la sentencia se le indica que el resultado es de nueve posiciones, dos
decimales, y que el caracter decimal es la coma.
Un saludo
Luis Eibar
[EMAIL PROTECTED]
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:forum.help400-request@;combios.es]En nombre de Antonio
Enviado el: jueves, 31 de octubre de 2002 9:23
Para: [EMAIL PROTECTED]
Asunto: 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
_____________________________________________________
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
_____________________________________________________
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=AVE
_____________________________________________________
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
