Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
Retroceder   COBOL Foro > Programación e Informática > Controles y Componentes (DLL/OCX) > Controles y Componentes Gratuitos
Controles y Componentes Gratuitos Componentes Freeware, información y descarga.
Noticias y Avisos
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Formato de Fecha jmeza PowerCOBOL (ActiveX, v4 - v11) 1 3 de diciembre de 2017 17:03
[Sintaxis] Validación de Fecha jmeza PowerCOBOL (ActiveX, v4 - v11) 4 24 de noviembre de 2017 09:32
[Información] Error en dll (DLL does not exist) Josber PowerCOBOL (ActiveX, v4 - v11) 5 18 de febrero de 2015 17:39
Respuesta
 
Herramientas

  #1
Antiguo 20 de noviembre de 2015, 21:32
IDENTIFICATION DIVISION
Kuk
Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
Forero desde (Registrado)diciembre 2014
España
UbicaciónMadrid
Edad34 años
Última Actividad17.07.2019 15:25
PROCEDURE DIVISION
PostsPosts: 1.398
Ha dicho GraciasEnviado: 304
Ha recibido agradecimientosRecibido: 528
Mejores respuestasSoluiones: 85
ReputaciónReputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
DLL de cáculo de fecha y hora

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
Archivos Adjuntos
Tipo de Archivo: zip FECHAS_HORAS.zip (89,8 KB, 54 descargas)


NORMAS DEL FORO - obligatorias de conocer para TODOS.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale Pinchando en su Nick:

Kuk no ha iniciado sesión   Responder Con Cita
Han dicho Gracias: 3
Galileo (20 de diciembre de 2015), Hrmcobol (20 de noviembre de 2015), Recato53 (22 de diciembre de 2015)
  #2
Antiguo 11 de enero de 2016, 19:59
IDENTIFICATION DIVISION
Calbercaza
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de Calbercaza
DATA DIVISION
Forero desde (Registrado)enero 2016
España
UbicaciónSalamanca
Edad37 años
Última Actividad11.01.2016 19:59
PROCEDURE DIVISION
PostsPosts: 1
Ha dicho GraciasEnviado: 0
Ha recibido agradecimientosRecibido: 0
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
Calbercaza is on a distinguished road
Predeterminado

Buenas.
Podéis por favor poner el código en formato txt?
Un saludo,muchas gracias.
Calbercaza no ha iniciado sesión   Responder Con Cita
  #3
Antiguo 11 de enero de 2016, 21:32
IDENTIFICATION DIVISION
Kuk
Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
Forero desde (Registrado)diciembre 2014
España
UbicaciónMadrid
Edad34 años
Última Actividad17.07.2019 15:25
PROCEDURE DIVISION
PostsPosts: 1.398
Ha dicho GraciasEnviado: 304
Ha recibido agradecimientosRecibido: 528
Mejores respuestasSoluiones: 85
ReputaciónReputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

Calbercaza, toma
Archivos Adjuntos
Tipo de Archivo: txt PBDMR001.txt (56,5 KB, 29 descargas)


NORMAS DEL FORO - obligatorias de conocer para TODOS.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale Pinchando en su Nick:

Kuk no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
scontrerash (20 de abril de 2016)
Respuesta

Tags
calculo , fechas , hora


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 15:45.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2019, Jelsoft Enterprises Ltd.