Cobol Foro

Cobol Foro (https://www.cobolforo.es/index.php)
-   Software (https://www.cobolforo.es/forumdisplay.php?f=78)
-   -   [Aporte] DLL de cáculo de fecha y hora (https://www.cobolforo.es/showthread.php?t=269)

Kuk 20 de noviembre de 2015 22:32

DLL de cáculo de fecha y hora
 
1 Archivos Adjunto(s)
Rutina COBOL hecha en MicroFocus que calcula varias cosas:

Código:

*----------------------------------------------------------------------------- *
|                            CALL "PBDMR001"                                  |
| ---------------------------------------------------------------------------- |
|        01. Validar una Fecha  [Formato AAAA-MM-DD]                          |
|        02. Validar una Hora.                                                |
|        03. Validar TIMESTAMP.                                                |
|        04. Sumar un numero de dias a una fecha.                              |
|        05. Sumar un numero de meses a una fecha.                            |
|        06. Sumar un numero de anios a una fecha.                            |
|        07. Sumar un numero de horas a la hora proporcionada.                |
|        08. Sumar un numero de minutos a la hora proporcionada.              |
|        09. Sumar un numero de segundos a la hora proporcionada.              |
|        10. Sumar un numero de dias a TIMESTAMP.                              |
|        11. Sumar un numero de meses a TIMESTAMP.                            |
|        12. Sumar un numero de anios a TIMESTAMP.                            |
|        13. Sumar un numero de horas a TIMESTAMP.                            |
|        14. Sumar un numero de minutos a TIMESTAMP.                          |
|        15. Sumar un numero de segundos a TIMESTAMP.                          |
|        16. Calcular la diferencia en dias entre dos fechas.                  |
|        17. Calcular la diferencia entre dos horas en segundos.              |
* ---------------------------------------------------------------------------- *

Hay que incluir la PBDMR001.lib en el proyecto y hacer:

Código COBOL:
  1.  CALL "PBDMR001" USING VA-PBDM001R

En el ZIP van:
  • La DLL
  • La LIB
  • La lista de opciones en TXT
  • La COPY de LINKAGE

Calbercaza 11 de enero de 2016 20:59

Buenas.
Podéis por favor poner el código en formato txt?
Un saludo,muchas gracias.

Kuk 11 de enero de 2016 22:32

1 Archivos Adjunto(s)
Calbercaza, toma ;)


La franja horaria es GMT +2. Ahora son las 02:04.

Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.