Aquí un ejemplo espero tu ayude.
d TodayISO S D datfmt(*ISO)
d TodayJul S D datfmt(*JUL)
d juldate s 05 0 inz(06268)
d juldate2 s 05 0 inz(06125)
d juldate3 s 05 0
*
/free
TodayIso = %date(juldate:*Jul);
dsply todayiso ' ';
TodayIso = %date(juldate2:*Jul);
dsply todayiso ' ';
TodayJul = TodayISO;
dsply TodayJul;
juldate3 = %dec(TodayJul:*jul);
dsply %editc(juldate3:'X') ' ' ;
eval *inlr = *on;
/end-free
De: [email protected]
[mailto:[email protected]] En nombre de JoseZ DJS.
Enviado el: lunes, 10 de mayo de 2010 02:47 p.m.
Para: Forum 400
Asunto: FW: Fecha *ISO
Disculpen,
Pongo un ejemplo de una fecha Juliana y que quiero convertir a fecha
normal¨*ISO.
109226
140366
De nuevo Gracias.
Saludos Cordiales,
José.
________________________________
From: [email protected]
To: [email protected]
Subject: Fecha *ISO
Date: Mon, 10 May 2010 19:42:33 +0000
Hola Foro,
Un favor, alguien me puede decir como sacar la fecha normal *ISO ya que
actualmente la tengo en fecha juliana?
Desde ya, muchas gracias!!
Saludos,
José.
________________________________
Con Hotmail siempre estás conectado con quien
quieres<http://www.hotmailhotness.com.mx/>
________________________________
¿Te falta espacio para tus correos? Enciende tu hotness con
Hotmail<www.hotmailhotness.com.mx>
________________________________
Este mensaje se transmite exclusivamente para el uso del destinatario previsto
y puede contener información que es PRIVILEGIADA y/o CONFIDENCIAL. Dicha
información no expresa la posición de la compañía. Si usted no es el
destinatario previsto, se le notifica por este medio, que cualquier uso,
difusión, acceso o copia de esta comunicación está prohibida terminantemente.
Si usted ha recibido esta comunicación por error, destruya por favor todas las
copias de este mensaje y sus adjuntos y notifíquenos inmediatamente.
This message is sent exclusively for the use of the intended recipient and may
contain information that is PRIVILEGED and/or CONFIDENTIAL. This information do
not express the position of the company. If you are not the intended recipient,
you are hereby notified that any use, dissemination, disclosure or copying of
this communication is strictly prohibited. If you have received this
communication by mistake, please destroy all copies of this message and its
attachments and notify us immediately
"Bienvenido a la Vida, Bienvenido a InVita"
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
