Siempre puedes hacer un EvalR y despu�s substituir los espacios en blanco
por ceros con XLATE.
fins aviat...
�lex Corretg�
Juan Carlos Paredes <[EMAIL PROTECTED]>@QUIJOTE.COMBIOS.ES con fecha
13/12/2002 11:23:33
Por favor, responda a [EMAIL PROTECTED]
Tram�s per: [EMAIL PROTECTED]
Destinataris: "'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]>
C�pia:
Classificat: |----------------|
| ( ) Important |
| ( ) urgent |
| ( ) hist�ric |
| ( ) temporal |
| ( ) bretolada |
| ( ) particular |
|----------------|
Assumpte: RE: Funci�n incorporada %CHAR
Muchas gracias, Francesc, no era lo que deseaba oir :-( pero s=ED lo =
que
estaba buscando.
Gracias de nuevo y un saludo.
Juan Carlos.
> -----Mensaje original-----
> De: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED]]
> Enviado el: viernes, 13 de diciembre de 2002 9:47
> Para: [EMAIL PROTECTED]
> Asunto: RE: Funci=F3n incorporada %CHAR
>=20
>=20
> Hola de nuevo:
>=20
> Pues parece "de que no" seg=FAn leo en el manual:
>=20
> For numeric data, (..) the result will be in decimal format with a
> leading
> negative
> sign if the value is negative, and without leading zeros. The =
character
> used for
> any decimal point will be the character indicated by the control
> specification
> DECEDIT keyword (default is '.'). For example, %CHAR of a =
packed(7,3)
> expression might return the value '-1.234'.
>=20
> A reveure.
> Francesc Gibert i Bertran
> GRUPO ESTAMPACIONES SABADELL
>=20
>=20
>=20
> =20
>=20
> Juan Carlos Paredes
>=20
> <[EMAIL PROTECTED]> Para:
> "'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]>
>=20
> Enviado por: cc:
>=20
> forum.help400-request Asunto: RE: =
Funci=F3n
> incorporada %CHAR =20
> @combios.es
>=20
> =20
>=20
> =20
>=20
> 13/12/2002 09:22
>=20
> Por favor, responda a
>=20
> forum.help400
>=20
> =20
>=20
> =20
>=20
>=20
>=20
>=20
>=20
> Gracias, Francesc.
>=20
> Estas dos opciones ya las he utilizado anteriormente, pero mi =
pregunta es
> si
> siempre el %CHAR elimina los ceros por la izquierda o se le puede =
indicar
> de
> alguna manera que los mantenga.
>=20
> Saludos.
>=20
> Juan Carlos
>=20
> > -----Mensaje original-----
> > De: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED]]
> > Enviado el: viernes, 13 de diciembre de 2002 9:11
> > Para: [EMAIL PROTECTED]
> > Asunto: Re: Funci=F3n incorporada %CHAR
> >
> >
> >
> > Hola Juan Carlos:
> >
> > Con %EDITC o %EDITW se pude hacer eso y m=E1s .
> >
> > A reveure.
> > Francesc Gibert i Bertran
> > GRUPO ESTAMPACIONES SABADELL
> >
> >
> >
> >
> >
> > Juan Carlos Paredes
> >
> > <[EMAIL PROTECTED]> Para: "'Forum =
Help
> > 400'" <[EMAIL PROTECTED]>
> > Enviado por: cc:
> >
> > forum.help400-request Asunto: =
Funci=F3n
> > incorporada %CHAR
> > @combios.es
> >
> >
> >
> >
> >
> > 13/12/2002 09:01
> >
> > Por favor, responda a
> >
> > forum.help400
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > Buenos d=EDas, foreros:
> >
> > Acabamos de instalar la V5R1 y me estoy empezando a meter con el =
RPG
> FREE
> > y
> > las novedades de dicha versi=F3n. Me encuentro con una cosa =
curiosa.
> Cuando
> > utilizo la funci=F3n %CHAR para transformar un campo num=E9rico =
(sin
> decimales
> > en este caso) en un alfanum=E9rico, observo que me elimina los =
ceros de la
> > izquierda y me devuelve un valor de una longitud igual al n=FAmero =
de
> > d=EDgitos
> > significativos del campo num=E9rico. Yo necesitar=EDa que me =
devolviera el
> > campo
> > completo, ajustado por la derecha y con sus ceros no significativos =
por
> la
> > izquierda, igual que lo hac=EDa el MOVE en el RPG anterior.
> >
> > =BFSab=E9is alguien si esto es posible?
> >
> > Gracias de antemano y un saludo a todos.
> >
> > Juan Carlos
> > (See attached file: attoudlw.dat)
> >
> > <<Archivo: attoudlw.dat>>
>=20
> _____________________________________________________
> Forum.HELP400 es un servicio m=E1s de NEWS/400.
> =A9 Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>=20
> Para darte de baja, env=EDa el mensaje resultante de pulsar
> mailto:[EMAIL PROTECTED]?body=3DLEAVE
>=20
>=20
>=20
>=20
>=20
>=20
> _____________________________________________________
> Forum.HELP400 es un servicio m=E1s de NEWS/400.
> =A9 Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>=20
> Para darte de baja, env=EDa el mensaje resultante de pulsar
> mailto:[EMAIL PROTECTED]?body=3DLEAVE
_____________________________________________________
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:[EMAIL PROTECTED]?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:[EMAIL PROTECTED]?body=LEAVE