Hola, ejemplo extraido del manual.
 
 
 C* Determinar una LOANDATE que es xx a�os, yy meses, zz d�as anterior a
      C* la DUEDATE.
 
      C     DUEDATE       SUBDUR    XX:*YEARS     LOANDATE
      C                   SUBDUR    YY:*MONTHS    LOANDATE
      C                   SUBDUR    ZZ:*DAYS      LOANDATE
 
      C* A�adir 30 d�as a una fecha de vencimiento de pr‚stamo
      C*
      C                   SUBDUR    -30:*D        LOANDUE
 
      C* Calcular el n�mero de d�as entre una LOANDATE y una DUEDATE.
 
      C     LOANDATE      SUBDUR    DUEDATE       NUM_DAYS:*D        5 0
 
      C* Determinar el n�mero de segundos entre LOANDATE y DUEDATE.
 
      C     LOANDATE      SUBDUR    DUEDATE       NUM_SECS:*S        5 0
 
 
espero te ayude.

Saludos

Paco Medina
Dpto.Informatica
Exclusivas Camacho, S.Ltda.

-----Mensaje original-----
De: Jaime Villa Torres [mailto:[EMAIL PROTECTED]]
Enviado el: martes, 04 de febrero de 2003 4:55
Para: [EMAIL PROTECTED]
Asunto: PROBLEMA DE FECHA CON SUBDUR

 

138       C                   WHEN      TYPALL = 'M'           
139       C     DATE01        SUBDUR    DATE02        RESULT:*M
                    20020228                       20020131
 
El resultado de RESULT CON DATE02 20020130 o 20020131 es ceros, considero que no es correcto, alguien de ustedes tiene un explicaci�n  o estoy cometiendo alg�n error que no veo.

Responder a