Si es un campo fecha:
eval resultado=%editc(%dec(fecha:*iso):'X');
Si es un campo numérico:
eval resultado=%editc(fecha:'X');
Saludos.
Juan Carlos
________________________________
De: Dpto. Informática - F.Soria [mailto:[EMAIL PROTECTED]
Enviado el: martes, 24 de julio de 2007 8:21
Para: FORUM400
Asunto: Los ceros a la izquierda
Hola a todos:
Necesito guardar una fecha (año, mes y dia) en formato caracter pero
cuando utilizo en ile rpg eval %char(mes) los 0 de la izquierda los pone a
blanco.
Creo que he probado todas las posibilidades para que deje los ceros de
la izquierda pero no consiguo dar con esto.
¿sabeis de alguna solución?
Gracias a todos
E. Jurado
Dpto. Informática (F.Soria, S.A.)
Tlf.: 914791512
-------------------------------------------------
AVISO DE CONFIDENCIALIDAD:
La información contenida en este mensaje y archivos adjuntos es
privada, confidencial y de uso exclusivo de la(s) persona(s) y entidad(es) a
la(s) que va dirigido. Si Ud. no es el destinatario de esta información se le
notifica que está expresamente prohibida la declaración, reproducción,
distribución o la toma de cualquier acción basada en el contenido de esta
comunicación. Si ha recibido este mensaje por error, le rogamos que nos lo
comunique inmediatamente y proceda a eliminarlo de todos sus sistemas.
Francisco Soria Melguizo, S.A. no asume responsabilidad legal por el contenido
de esta comunicación, ni representa la opinión de la firma, salvo que
expresamente se especifique lo contrario y que el remitente esté autorizado
para hacerlo. Gracias.
__________________________________________________
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 visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
