https://www.mail-archive.com/[email protected]/msg18939.html

 

 

 

De: [email protected] 
[mailto:[email protected]] En nombre de Paco Medina
Enviado el: viernes, 06 de noviembre de 2015 18:58
Para: 'forum.help400'
Asunto: RE: Día de la semana rpgile

 

aquí : http://www.recursos-as400.com/como99.shtml

 

saludos

 

De: [email protected] 
[mailto:[email protected]] En nombre de Bernabé Estrada
Enviado el: viernes, 06 de noviembre de 2015 18:53
Para: forum.help400
Asunto: Re: Día de la semana rpgile

 

pdiasem           b                                         

ddiasem           pi             1  0                       

d fec                             d   datfmt(*iso)          

dfecp             s               d   datfmt(*iso)          

dnumdias          s              6  0                       

ddifdias          s              2  0                       

 /free                                                      

    fecp = %date('2006-09-17');                             

    numdias = %diff(fec:fecp:*days);                        

    difdias = %rem(numdias:7);                              

    if difdias < 0;                                         

       difdias = difdias + 7;                               

    endif;                                                  

    return difdias + 1;                                     

 /end-free                                                  

pdiasem           e                                         

 

El 6 de noviembre de 2015, 11:45, Sergio Luis Puentes-Valladares 
<[email protected]> escribió:

Roberto
Mira en free Rpg, que tiene muchas funciones incorporadas (% )
Saludos

Sergio L

 

On Fri, Nov 6, 2015, 14:42 Roberto Palomino <[email protected]> wrote:

Buenas tardes Foreros, mi pregunta es si hay alguna función que me devuelva el 
nro de día de la semana, a partir de una fecha. Si no la ubiera como le hago?.
Por ejemplo:
Si a esta función le envío 2015/11/06 debería devolverme 07 tomando en cuenta 
que el día 01 fue el domingo pasado.
De antemano gracias

____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.


____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

 

____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a