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

Responder a