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]

Responder a