Re: Diferencia de Fechas en dias

ULISES PETERSON Fri, 20 Jun 2003 07:53:16 -0700

28 dias con subdur, la misma cantidad da la formula en excel =sifecha(A1,A2,"d")

suponiendoque enla celda A1=20030131 y A2 = 20030228.

Cual es el problema, trabajo en una financiera y el calculo de fecha es crucial para calculo de interese y devoluciones y finalizacion de compromisos, y no hemos tenido problemas con los calculos.

----- Original Message -----

From: Jaime Villa Torres

To: [EMAIL PROTECTED]

Sent: Thursday, June 19, 2003 5:20 PM

Subject: Re: Diferencia de Fechas en dias

Por favor probar con SUBDUR las siguientes fechas 20030131 y 20030228 con dias.

Gracias

Jaime Villa T.

----- Mensaje original -----

De: ULISES PETERSON

Para: [EMAIL PROTECTED]

Enviado: Jueves, 20 de Junio de 2002 11:27 a.m.

Asunto: Re: Diferencia de Fechas en dias

*************** Principio de datos *****************************
F*
F* RUTINA PARA CALCULAR LOS MESES QUE HAY ENTR DOS FECHAS
F*
F* 20-3-2000
F* PROGRAMADOR: ULISES PETERSON  - PANAMA
F*
F***************************************************************
F*
D*
DFEC_INIC         S               D   DATFMT(*ISO)
DFEC_FINC         S               D   DATFMT(*ISO)
D*
DDIAQFL           S              4 0
C*
C     *ENTRY        PLIST
C                   PARM                    @FECI             8
  C                   PARM                    @FECF             8
C* Parametro de salida
C                   PARM                    @DIAS             4
C*
C                   MOVEL     @FECI         FEC_INI           8 0
C                   MOVEL     @FECF         FEC_FIN           8 0
C*
C                   EXSR      CAL_FECHA
C                   SETON                                        LR
C     FIN           TAG
C* ---------------------------------------------------------
C*
C*     SUBRUTINA CAL_FECHA CALCULO DE LOS PLAZOS EN MESES
C*
C* ---------------------------------------------------------
C*
C     CAL_FECHA     BEGSR
0034.00 C*
0035.00 C                   SETOFF                                       30
0036.00 C     *ISO          TEST(D)                 FEC_INI                30
0037.00 C N30              MOVE      FEC_INI       FEC_INIC
0038.00 C*
0039.00 C                   SETOFF                                       30
0040.00 C     *ISO          TEST(D)                 FEC_FIN                30
0041.00 C N30              MOVE      FEC_FIN       FEC_FINC
0042.00 C*
0043.00 C     FEC_FINC      SUBDUR    FEC_INIC      DIAQFL:*D
0044.00 C                   MOVE      DIAQFL        @DIAS
0045.00 C*
0046.00 C                   ENDSR
        ****************** Fin de datos ***************************************

      Se espera que la fecha venga AAAAMMDD (a�o,mes,dia). Con cambiar el campo resultado en la instruccion SUBDUR DIAQFL:*D por *Y o *M se recoge a�os o meses, en la intruccion actual *D se regoge dias.

Esperamos haber ayudado.

Esto es en ILRPG.





----- Original Message -----

From: Javier Roa

To: [EMAIL PROTECTED]

Sent: Wednesday, June 18, 2003 4:24 PM

Subject: Diferencia de Fechas en dias

Amigos:

Existe un programa o utilidad que me permita enviar 2 fechas y obtener como resultado la cantidad de dias entre ambos.

Gracias

Javier Roa

Re: Diferencia de Fechas en dias

Responder a