Mmmmm, aqui estamos hablando de cosas diferentes.
De hecho yo estaba equivocado, en RPG OPM puedes utilizar UDATE o *DATE (no
es QDATE) para obtener la fecha del trabajo, tu estas hablando de CL y
obteniendo el valor del sistema QDATE.
UDATE equivale a RTVJOBA DATE(Variable)
En todo caso siguiendo tu ejemplo, desde RPG necesitarias llamar a un
programa CL cada vez que desees obtener la fecha del sistema sin embargo
obtienes el mismo valor desde RPG utilizando TIME y sin llamar a
subprogramas.
TIME equivale a utilizar dos comandos de CL, RVSYSVAL SYSVAL(QDATE)y
RVSYSVAL SYSVAL(TIME) en un solo paso.
Saludos.
Jes�s Humberto Olague Alcal�
L�der de Proyectos
Envases y Tapas Modelo, S.A. de C.V.
e-mail: [EMAIL PROTECTED]
Tel: (478) 985 4100 Ext. 247
Fax: (478) 985 4100 Ext. 249
Juan Carlos Paredes
<[EMAIL PROTECTED]> Para: "'[EMAIL PROTECTED]'"
<[EMAIL PROTECTED]>
Enviado por: cc:
forum.help400-request Asunto: RE: fecha del sistema
@combios.es
12/05/2004 11:29 a.m.
Por favor, responda a
forum.help400
�Seguro Jes�s? Si yo llamo a un CL que recupere el valor de sistema con
RVSYSVAL SYSVAL(QDATE), �est�s seguro de que me devolver�a la del trabajo?
Saludos.
Juan Carlos.
> -----Mensaje original-----
> De: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED]
> Enviado el: mi�rcoles, 12 de mayo de 2004 18:24
> Para: [EMAIL PROTECTED]
> Asunto: RE: fecha del sistema
>
>
> Una precision solamente. En OPM, QDATE te da la fecha del trabajo (la
> misma
> que *DATE), en cambio TIME te da la fecha del sistema.
>
> Saludos.
>
> Jes�s Humberto Olague Alcal�
> L�der de Proyectos
> Envases y Tapas Modelo, S.A. de C.V.
> e-mail: [EMAIL PROTECTED]
> Tel: (478) 985 4100 Ext. 247
> Fax: (478) 985 4100 Ext. 249
>
>
>
>
>
> Juan Carlos Paredes
>
> <[EMAIL PROTECTED]> Para:
> "'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]>
>
> Enviado por: cc:
>
> forum.help400-request Asunto: RE: fecha
del
> sistema
> @combios.es
>
>
>
>
>
> 12/05/2004 11:13 a.m.
>
> Por favor, responda a
>
> forum.help400
>
>
>
>
>
>
>
>
>
> Por lo que veo en el manual de referencia de RPG, el valor *date te
> devuelve
> la fecha del sistema de cuando arranc� el trabajo.
>
> Utiliza la funci�n incorporada %date si es un programa ILE. Si no,
podr�as
> recuperar el valor de sistema QDATE.
>
> Saludos.
>
> Juan Carlos.
> > -----Mensaje original-----
> > De: Carlos Lara [SMTP:[EMAIL PROTECTED]
> > Enviado el: mi�rcoles, 12 de mayo de 2004 18:02
> > Para: [EMAIL PROTECTED]
> > Asunto: fecha del sistema
> >
> >
> >
> > Necesito grabar la fecha y hora en cada registro , y a pesar de
> utilizar
> > el *date , en el cambio de dia me
> >
> > mantiene la fecha del dia anterior hasta que se cierra y abre el
> programa.
> > Alguna pista?
> >
> >
> >
> > 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, env�a el mensaje resultante de pulsar
> mailto:[EMAIL PROTECTED]
>
>
>
>
>
>
>
--------------------------------------------------------------------------
>
>
>
>
> " Este mensaje es confidencial. Si usted no es el destinatario de este
> mensaje, le suplicamos se lo notifique al remitente mediante un correo
> electr�nico y que borre el presente mensaje y sus anexos de su
computadora
> sin retener copia de los mismos. No debe copiar este mensaje o usarlo
> para
> cualquier prop�sito ni divulgar su contenido. Muchas gracias.
>
> This e-mail is confidential and may also be privileged. If you are not
the
> intended recipient please immediately advise the sender by reply e-mail
> and
> delete this message and its attachments from your computer without
> retaining a copy. You should not copy it or use it for any purpose nor
> disclose its contents to any other person. Thank you. "
>
>
>
>
>
>
>
>
>
--------------------------------------------------------------------------
>
>
>
> " Este mensaje es confidencial. Si usted no es el destinatario de este
> mensaje, le suplicamos se lo notifique al remitente mediante un correo
> electr�nico y que borre el presente mensaje y sus anexos de su
computadora
> sin retener copia de los mismos. No debe copiar este mensaje o usarlo
> para
> cualquier prop�sito ni divulgar su contenido. Muchas gracias.
>
> This e-mail is confidential and may also be privileged. If you are not
the
> intended recipient please immediately advise the sender by reply e-mail
> and
> delete this message and its attachments from your computer without
> retaining a copy. You should not copy it or use it for any purpose nor
> disclose its contents to any other person. Thank you. "
>
>
>
>
> _____________________________________________________
> 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]
_____________________________________________________
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]
--------------------------------------------------------------------------
" Este mensaje es confidencial. Si usted no es el destinatario de este
mensaje, le suplicamos se lo notifique al remitente mediante un correo
electr�nico y que borre el presente mensaje y sus anexos de su computadora
sin retener copia de los mismos. No debe copiar este mensaje o usarlo para
cualquier prop�sito ni divulgar su contenido. Muchas gracias.
This e-mail is confidential and may also be privileged. If you are not the
intended recipient please immediately advise the sender by reply e-mail and
delete this message and its attachments from your computer without
retaining a copy. You should not copy it or use it for any purpose nor
disclose its contents to any other person. Thank you. "
--------------------------------------------------------------------------
" Este mensaje es confidencial. Si usted no es el destinatario de este
mensaje, le suplicamos se lo notifique al remitente mediante un correo
electr�nico y que borre el presente mensaje y sus anexos de su computadora
sin retener copia de los mismos. No debe copiar este mensaje o usarlo para
cualquier prop�sito ni divulgar su contenido. Muchas gracias.
This e-mail is confidential and may also be privileged. If you are not the
intended recipient please immediately advise the sender by reply e-mail and
delete this message and its attachments from your computer without
retaining a copy. You should not copy it or use it for any purpose nor
disclose its contents to any other person. Thank you. "
_____________________________________________________
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]