ponlo en una DS algo asi
Ej..
IDS1 DS
I 1 16 variable
I 1 70ente1
I 8 8 punto1
I 9 160deci1
DS2 DS
I 1 70ente2
I 8 150deci2
I 1 150numero
*
C move campo variable
C z-add ente1 ente2
C z-add deci1 deci2
C mult factor numero
> -----Mensaje original-----
> De: Santillana, Gerardo [SMTP:[EMAIL PROTECTED]]
> Enviado el: Mi�rcoles, 02 de Octubre de 2002 04:36 p.m.
> Para: [EMAIL PROTECTED]
> Asunto: RE: operacion con campo caracter
>
> Gracias compadre
>
> pero esta instruccion no se puede usar en un programa RPGLE o si?
>
> Gerardo Santillana
> IT Department
> Delphi Mechatronic Systems
> US Ph: (956) 554.5832
> MX Ph: (88) 12.81.63/64/65 Ext. 5832
> e-mail [EMAIL PROTECTED]
>
>
> -----Original Message-----
> From: Victor Velardez BT [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, October 02, 2002 2:25 PM
> To: [EMAIL PROTECTED]
> Subject: RE: operacion con campo caracter
>
>
>
> decimal(substr(campo, 1 , 7) || substr(campo, 9 , 8 )) * factor
>
> Suerte compadre
>
>
> > -----Mensaje original-----
> > De: Santillana, Gerardo [SMTP:[EMAIL PROTECTED]]
> > Enviado el: Mi�rcoles, 02 de Octubre de 2002 04:19 p.m.
> > Para: [EMAIL PROTECTED]
> > Asunto: operacion con campo caracter
> >
> > Hola a todos
> >
> > tengo un archivo con un campo caracter de 16 posiciones, en el cual la
>informacion que contiene son puros numeros con un punto decimal implicito de esta
>manera '0000001.09830000', lo que quiero hacer es leer el campo y hacer una
>multiplicacion con un factor de conversion y el resultado actualizarselo a ese mismo
>campo, como le puedo hacer ya que al querer pasarlo a una variable para hacer la
>operacion me marca "decimal data error"
> >
> > acepto sugerencias
> >
> > gracias
> >
> > Gerardo Santillana
> > IT Department
> > Delphi Mechatronic Systems
> > US Ph: (956) 554.5832
> > MX Ph: (88) 12.81.63/64/65 Ext. 5832
> > e-mail [EMAIL PROTECTED]
> >
> >
> >
> > _____________________________________________________
> > 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=AVE
>
> La informacion contenida en este correo es para uso exclusivo de los destinatarios
>del mismo.
> Esta prohibido a las personas o entidades que no sean los destinatarios de este
>correo
> realizar cualquier tipo de modificacion, copia o distribucion del mismo.
> Si Usted recibe este correo por error tenga bien notificar al emisor y eliminarlo.
>
> _____________________________________________________
> 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=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:[EMAIL PROTECTED]?body=AVE
La informacion contenida en este correo es para uso exclusivo de los destinatarios del
mismo.
Esta prohibido a las personas o entidades que no sean los destinatarios de este correo
realizar cualquier tipo de modificacion, copia o distribucion del mismo.
Si Usted recibe este correo por error tenga bien notificar al emisor y eliminarlo.
_____________________________________________________
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