Cobol Foro
Navegación en el Foro
Retroceder   Cobol Foro Entornos de desarrollo y compiladores Cobol Cocina Casera Cocina PowerCOBOL
Cocina PowerCOBOL Rutinas y ejemplos codificados por nuestros foreros.
 
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Duda] Rendimiento degradado en Windows Server 2022 Recato53 PowerCOBOL (ActiveX, v4 - v11) 4 15 de marzo de 2024 17:01
[PowerCOBOL] DLL control Calendario Josber Cocina PowerCOBOL 8 5 de agosto de 2022 14:58
Gracias Josber !!!! Hrmcobol Charladero - espacio libre 4 22 de abril de 2020 10:01
Presentación: Josber Josber Presentación 1 14 de abril de 2020 14:29
Actualización a Windows 10 gratuita aún disponible Kuk Sistemas operativos 0 9 de septiembre de 2017 17:17

Respuesta
 
Herramientas

  #1
Antiguo 5 de agosto de 2022, 14:53
fastpho
El Foro es mi casa
Innovación: Por aportar innovaciones - Issue reason: SQLite + OO Cobol class Concurso: Primer puesto: Ganador/a del Primer puesto en un concurso - Issue reason: Acceso a datos Cobol vía web 
Última Actividad 21.08.2026 18:08
Posts Posts: 365
Likes enviados Enviados: 252
Likes recibidos Recibidos: 243
Tableta DLL Calendario 2022 de @Josber Actualizacion
3 Inactivo Inactivo

He modificado el calendario 2014 creado por @Josber de este link: [Aporte] 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Í)

* 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í)
Incluye : ocx , cursor , prj dll , prj ejemplo
Probado en : Windows 7 64 bits , Windows 10 64 bits
Variables Globales :
Código COBOL:
  1. *
  2. * ----- VARIABLES EXTERNAS -----
  3. *
  4. * by Josber 2014
  5.  01  DIA-SEM-LINK           PIC 9       IS GLOBAL EXTERNAL.
  6.  01  FECHA-LINK                 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina y rutina F-DIA-S
  7.      03  D-LINK         PIC 99.
  8.      03  M-LINK         PIC 99.
  9.      03  A-LINK         PIC 9999.                               *> Mover ZEROS o la solicitud que necesite  2022
  10. *> Variable Devuelve el nro semana 2022
  11.  01  NUM-SEM-LINK           PIC 99      IS GLOBAL EXTERNAL.    
  12.  *> Variables para posicionar la ventana 2014
  13.  01  LEFT-LINK          PIC S9(9)   IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  14.  01  TOP-LINK           PIC S9(9)   IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  15.  *> Variables para posicionar el tamaño ventana 2022
  16.  01  WIDTH-LINK                   PIC S9(9) IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  17.  01  HEIGHT-LINK                  PIC S9(9) IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  18.  
  19.   *> Variables para mostrar boton today * 2022 Value 0 INVISIBLE Value 1 VISIBLE
  20.  01  BTNTODAY-LINK                PIC 9 IS GLOBAL EXTERNAL.                  *> EXTERNAL para ésta rutina sólo
  21.  
  22.   *> Variables para mostrar columna semana * 2022 Value 0 INVISIBLE Value 1 VISIBLE
  23.  01  COLSEM-LINK                  PIC 9 IS GLOBAL EXTERNAL.                  *> EXTERNAL para ésta rutina sólo
  24.  
  25.   *> Variables para mostrar el timer * 2022
  26.  01  TIME-LINK                    PIC 9     IS GLOBAL EXTERNAL.          *> EXTERNAL para ésta rutina sólo  Value 1 = muestra reloj 0 = no muestra reloj
  27.  *> Variables para mostrar el date * 2022
  28.  01  DATE-LINK                    PIC 9     IS GLOBAL EXTERNAL.          *> EXTERNAL para ésta rutina sólo  Value 1 = muestra fecha completa 0 = no muestra fecha completa
  29.  
  30. *---------------------------------------------------------------------------
Saludos ...
Imágenes Adjuntas
    
Archivos Adjuntos
Tipo de Archivo: zip Calendario Fastpho 2022.zip (0)Descargas: 83

Última edición por Josber fecha: 6 de abril de 2023 a las 12:04. Razón: Enlace a descarga/Info OCX ucBOX
fastpho is offline   Responder Con Cita
  #2
Antiguo 5 de agosto de 2022, 15:48
Joseg
El Foro es mi casa
Activista del Foro: Activista del Foro - Issue reason: Por participación activa Innovación: Por aportar innovaciones - Issue reason: Por aportar soluciones innovadoras en varias ocasiones 
Última Actividad 17.09.2026 18:23
Posts Posts: 401
Likes enviados Enviados: 130
Likes recibidos Recibidos: 179

Citación del post de fastpho Ver Mensaje
He modificado el calendario 2014 creado por @Josber de este link: [Aporte] 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 :
Código COBOL:
  1. *
  2. * ----- VARIABLES EXTERNAS -----
  3. *
  4. * by Josber 2014
  5.  01  DIA-SEM-LINK           PIC 9       IS GLOBAL EXTERNAL.
  6.  01  FECHA-LINK                 IS GLOBAL EXTERNAL. *> EXTERNAL para ésta rutina y rutina F-DIA-S
  7.      03  D-LINK         PIC 99.
  8.      03  M-LINK         PIC 99.
  9.      03  A-LINK         PIC 9999.                               *> Mover ZEROS o la solicitud que necesite  2022
  10. *> Variable Devuelve el nro semana 2022
  11.  01  NUM-SEM-LINK           PIC 99      IS GLOBAL EXTERNAL.    
  12.  *> Variables para posicionar la ventana 2014
  13.  01  LEFT-LINK          PIC S9(9)   IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  14.  01  TOP-LINK           PIC S9(9)   IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  15.  *> Variables para posicionar el tamaño ventana 2022
  16.  01  WIDTH-LINK                   PIC S9(9) IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  17.  01  HEIGHT-LINK                  PIC S9(9) IS GLOBAL EXTERNAL COMP-5.   *> EXTERNAL para ésta rutina sólo
  18.  
  19.   *> Variables para mostrar boton today * 2022 Value 0 INVISIBLE Value 1 VISIBLE
  20.  01  BTNTODAY-LINK                PIC 9 IS GLOBAL EXTERNAL.                  *> EXTERNAL para ésta rutina sólo
  21.  
  22.   *> Variables para mostrar columna semana * 2022 Value 0 INVISIBLE Value 1 VISIBLE
  23.  01  COLSEM-LINK                  PIC 9 IS GLOBAL EXTERNAL.                  *> EXTERNAL para ésta rutina sólo
  24.  
  25.   *> Variables para mostrar el timer * 2022
  26.  01  TIME-LINK                    PIC 9     IS GLOBAL EXTERNAL.          *> EXTERNAL para ésta rutina sólo  Value 1 = muestra reloj 0 = no muestra reloj
  27.  *> Variables para mostrar el date * 2022
  28.  01  DATE-LINK                    PIC 9     IS GLOBAL EXTERNAL.          *> EXTERNAL para ésta rutina sólo  Value 1 = muestra fecha completa 0 = no muestra fecha completa
  29.  
  30. *---------------------------------------------------------------------------
Saludos ...
Very Nice
Joseg is offline   Responder Con Cita
  #3
Antiguo 6 de agosto de 2022, 18:46
Josber
Moderador Global
Activista del Foro: Activista del Foro - Issue reason: Por aportar manuales y enriquecer  Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos 
Última Actividad 20.09.2026 12:17
Posts Posts: 883
Likes enviados Enviados: 418
Likes recibidos Recibidos: 492

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.
Josber is offline   Responder Con Cita
  #4
Antiguo 5 de abril de 2023, 21:34
fastpho
El Foro es mi casa
Innovación: Por aportar innovaciones - Issue reason: SQLite + OO Cobol class Concurso: Primer puesto: Ganador/a del Primer puesto en un concurso - Issue reason: Acceso a datos Cobol vía web 
Última Actividad 21.08.2026 18:08
Posts Posts: 365
Likes enviados Enviados: 252
Likes recibidos Recibidos: 243
Tableta Actualizacion Calendario Meses
4 Inactivo Inactivo

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

Para obtener un periodo con el formato MMAAAA.

Saludos ...

Miniatura de Adjuntos
Pulsar la imagen para la versión amplia
Nombre:  Calendario 2023.png
Vistas: 109
Tamaño:  7,2 KB   Pulsar la imagen para la versión amplia
Nombre:  PeriodoMMAAAA.png
Vistas: 102
Tamaño:  6,2 KB  
Archivos Adjuntos
Tipo de Archivo: zip Calendario 2023.zip (151,4 KB)Descargas: 78
fastpho is offline   Responder Con Cita
  #5
Antiguo 17 de febrero de 2026, 20:32
Josber
Moderador Global
Activista del Foro: Activista del Foro - Issue reason: Por aportar manuales y enriquecer  Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos 
Última Actividad 20.09.2026 12:17
Posts Posts: 883
Likes enviados Enviados: 418
Likes recibidos Recibidos: 492

@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.-
Josber is offline   Responder Con Cita
  #6
Antiguo 18 de febrero de 2026, 13:50
fastpho
El Foro es mi casa
Innovación: Por aportar innovaciones - Issue reason: SQLite + OO Cobol class Concurso: Primer puesto: Ganador/a del Primer puesto en un concurso - Issue reason: Acceso a datos Cobol vía web 
Última Actividad 21.08.2026 18:08
Posts Posts: 365
Likes enviados Enviados: 252
Likes recibidos Recibidos: 243

@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..

Miniatura de Adjuntos
Pulsar la imagen para la versión amplia
Nombre:  ocxBox1.png
Vistas: 50
Tamaño:  56,9 KB  
Archivos Adjuntos
Tipo de Archivo: zip UCBOXOCX.zip (178,8 KB)Descargas: 21
fastpho is offline   Responder Con Cita
Respuesta



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

Saltar a Foro


La franja horaria es GMT +2. Ahora son las 13:54.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.