Calculo entre dos fechas restando fines de semanaHola,
Mia a ver si te sirve este pequeño programa.
Saludos.
Ismael Ruiz Jordán
INTER RAMONEDA S.A.
Tel: 902 29 14 41
Fax: 93 729 98 87
----- Original Message -----
From: Carcamo, M.Jesus (ES)
To: [EMAIL PROTECTED]
Sent: Tuesday, July 29, 2008 2:52 PM
Subject: Calculo entre dos fechas restando fines de semana
Hola:
¿Alquien conoce alguna utildad que calcule los dias que hay entre dos fechas,
restando los fines de semana que hay entre dichas fechas?.
Mª Jesús Cárcamo
[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 visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
*@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
* CUENTA DÖAS DESDE UNA FECHA HASTA OTRA EXCLUYENDO FINES DE SEMANA
*@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
HDATFMT(*ISO)
*
DWFECINI S D
DWFECFIN S D
*
C *ENTRY PLIST
C PARM FECINI 8 0
C PARM FECFIN 8 0
C PARM DIAS 4 0
*
C MOVE FECINI WFECINI
C MOVE FECFIN WFECFIN
C Z-ADD 0 DIAS
*
C WFECINI DOWLT WFECFIN
C ADDDUR 1:*D WFECINI
C ADD 1 DIAS
*
* ------ control fin de semana
*
C WFECINI SUBDUR D'2000-12-31' WDIAS:*D 4 0
C WDIAS DIV 7 WDIAS
C MVR WDIAS
C WDIAS IFEQ 0
DOMINGO
C WDIAS OREQ 6
SABADO
C SUB 1 DIAS
C ITER
C ENDIF
*
C ENDDO
*
C MOVE *ON *INLR
*
__________________________________________________
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
