DLL Calendario 2022 de @Josber Actualizacion

[fastpho]

He modificado el calendario 2014 creado por @Josber de este link: [Aporte] DLL control Calendario (https://www.cobolforo.es/showthread.php?379-DLL-control-Calendario)
Gracias @Josber , espero tus comentarios !!! o sugerencias .
* Cambiando la apariencia y agregando el calculo del numero de semana , la form se puede mover , arrastrar y soltar.


Es necesario tener instalada la fuente «Segoe UI» en windows 10 ya está por defecto. (Más info AQUÍ (https://learn.microsoft.com/es-es/typography/font-list/segoe-ui))

* Se puede Ocultar el reloj , el date , la columna semana , el boton today por parámetros.
* Se puede Ajustar el tamaño y la posición de la form por parámetros.

Para su visualización se necesita del Control OCX ucBOX : ElsisBoxUpgr.ocx registrarla. (Descargar/Más info Aquí (https://www.cobolforo.es/showthread.php?1505-Control-OCX-ucBOX-y-ejemplo-pwc5))
Incluye : ocx , cursor , prj dll , prj ejemplo
Probado en : Windows 7 64 bits , Windows 10 64 bits
Variables Globales :

*
* ----- VARIABLES EXTERNAS -----
*
* by Josber 2014
01 DIA-SEM-LINK PIC 9 IS GLOBAL EXTERNAL.
01 FECHA-LINK IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina y rutina F-DIA-S
03 D-LINK PIC 99.
03 M-LINK PIC 99.
03 A-LINK PIC 9999. *> Mover ZEROS o la solicitud que necesite 2022
*> Variable Devuelve el nro semana 2022
01 NUM-SEM-LINK PIC 99 IS GLOBAL EXTERNAL.
*> Variables para posicionar la ventana 2014
01 LEFT-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo
01 TOP-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo
*> Variables para posicionar el tamaño ventana 2022
01 WIDTH-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo
01 HEIGHT-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo

*> Variables para mostrar boton today * 2022 Value 0 INVISIBLE Value 1 VISIBLE
01 BTNTODAY-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo

*> Variables para mostrar columna semana * 2022 Value 0 INVISIBLE Value 1 VISIBLE
01 COLSEM-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo

*> Variables para mostrar el timer * 2022
01 TIME-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo Value 1 = muestra reloj 0 = no muestra reloj
*> Variables para mostrar el date * 2022
01 DATE-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo Value 1 = muestra fecha completa 0 = no muestra fecha completa

*---------------------------------------------------------------------------

Saludos ...

[Joseg]

He modificado el calendario 2014 creado por @Josber de este link: [Aporte] DLL control Calendario (https://www.cobolforo.es/showthread.php?379-DLL-control-Calendario)
Gracias @Josber , espero tus comentarios !!! o sugerencias .
* Cambiando la apariencia y agregando el calculo del numero de semana , la form se puede mover , arrastrar y soltar.


Es necesario tener instalada la fuente «Segoe UI» en windows 10 ya está por defecto.

* Se puede Ocultar el reloj , el date , la columna semana , el boton today por parámetros.
* Se puede Ajustar el tamaño y la posición de la form por parámetros.

Para su visualización se necesita del Control OCX ucBOX : ElsisBoxUpgr.ocx registrarla.
Incluye : ocx , cursor , prj dll , prj ejemplo
Probado en : Windows 7 64 bits , Windows 10 64 bits
Variables Globales :

*
* ----- VARIABLES EXTERNAS -----
*
* by Josber 2014
01 DIA-SEM-LINK PIC 9 IS GLOBAL EXTERNAL.
01 FECHA-LINK IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina y rutina F-DIA-S
03 D-LINK PIC 99.
03 M-LINK PIC 99.
03 A-LINK PIC 9999. *> Mover ZEROS o la solicitud que necesite 2022
*> Variable Devuelve el nro semana 2022
01 NUM-SEM-LINK PIC 99 IS GLOBAL EXTERNAL.
*> Variables para posicionar la ventana 2014
01 LEFT-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo
01 TOP-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo
*> Variables para posicionar el tamaño ventana 2022
01 WIDTH-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo
01 HEIGHT-LINK PIC S9(9) IS GLOBAL EXTERNAL COMP-5. *> EXTERNAL para ésta rutina sólo

*> Variables para mostrar boton today * 2022 Value 0 INVISIBLE Value 1 VISIBLE
01 BTNTODAY-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo

*> Variables para mostrar columna semana * 2022 Value 0 INVISIBLE Value 1 VISIBLE
01 COLSEM-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo

*> Variables para mostrar el timer * 2022
01 TIME-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo Value 1 = muestra reloj 0 = no muestra reloj
*> Variables para mostrar el date * 2022
01 DATE-LINK PIC 9 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina sólo Value 1 = muestra fecha completa 0 = no muestra fecha completa

*---------------------------------------------------------------------------

Saludos ...

Very Nice :bien::bien::bien::bien:

[Josber]

Se ve estupendo @fastpho, que bueno que las rutinas que hacemos vayan evolucionando y, la nueva apariencia, es fantástica.

Un saludo y mil gracias por el trabajo y por respetar los crédito iniciales.

[fastpho]

Se agrega el modulo "F-MESES" , este permite visualizar el año y los meses

Para obtener un periodo con el formato MMAAAA.

Saludos ...

[Josber]

@fastpho,

¿Podrías volver a subirlo completo, OCX incluido?, porque los enlaces de descarga, no llevan a ningún sitio y, el de éste post (Calendario 2023.zip), no trae el ocx instalado, por lo que al abrirlo, falla como escopeta de corcho ;) ;) ;)

graciassss.-

[fastpho]

@Josber
Hay muchos enlaces rotos , voy a subir la .ocx , que es lo que le falta al proyecto Calendario 2023 , Para su visualización se necesita del Control OCX ucBOX : ElsisBoxUpgr.ocx registrarla. esta es la que falta
Saludos..