Cobol en español
MANUALES
TEMATICOS
BASES DE DATOS
COBOL / WINDOWS
COBOL / UNIX
HISTORIA /DOCS
PROGRAMANDO-Dos
TRUCOS
AÑO 2.000
TEORIA POWCOB-3
PROG. POWCOB-3
TEORIA POWCOB-5
PROG. POWCOB-5
OCX-ESCOBOL
Temáticos
TEMARIOCódigos de Error
Ventanas
Palabras Reservadas
Clasificando (Sort)
Tablas
Ficheros (I)
Ficheros (II)
Ficheros (III)

Ventanas

página(s) : 2/2
(2437 palabras totales en este texto)
(35715 Lecturas)   Versión Imprimible



VENTANAS EN ACUCOBOL.

Para dibujar una ventana en Acucobol, todo se realizará desde la Procedure y solo será necesario incluir en la WORKING una variable de PIC X(10), que nos servirá principalmente para tener varias ventanas abiertas y saber sobre cual actuamos. Esto se consigue con una implementación de la sentencia DISPLAY, que vamos a explicar a continuación.

    WORKING-STORAGE SECTION.
    01  VENTANAS.
         02  WIN    PIC X(10)  OCCURS 10 TIMES.
    ...
    ...
    PROCEDURE DIVISION.
    ...
    ...
    DISPLAY WINDOW LINE 3 COL 3 LOW ERASE
                SIZE 40 LINES 10
                BOXED SHADOW
                   TOP CENTERED TITLE " PROBANDO "
                POP-UP AREA WIN (1).

* Para cerrarla, utilizaremos la siguiente instrucción.

    CLOSE WINDOW WIN (1).
Aqui, la gran diferencia, es que al no utilizar variables, los valores se le dan en la propia sentencia, y la explicación de cada uno sería:
SIZE: Número de columnas de la ventana.
LINES: Número de líneas de la ventana.
BOXED: Indicamos que lleva borde.
SHADOW: Indicamos que lleva efecto de sombra.
TOP: Posición del título. (TOP-BOTTOM)
CENTERED: Justificación del título. (CENTERED, LEFT, RIGHT).
POP-UP AREA: donde se guarda la ventana.


La sentencia DISPLAY WINDOW, en Acucobol, es mucho mas extensa, incluyendo sobre todo una muy buena aplicación de los colores, tanto para el fondo como para el primer plano.


RESUMIENDO

Ya veis, que aunque cambie un poco la sintaxis, el fin es exactamente el mismo, disponer de una parte de la pantalla con autonomía propia.

Solo espero que después de éstas explicaciones seais capaces de aprovechar todas las ventajas que nos puede proporcionar el trabajar con ventanas. Yo siempre las he utilizado, eso si, tampoco deberemos de hacer de un programa cobol, una serie de ventanas, hay que utilizarlas cuando realmente las necesitemos. Recordad que:

El control solo será sobre la ventana activa.
Una vez abierta una ventana, ésta tendrá el control, hasta que se cierre.
Por supuesto, todas la variables que utilicemos serán portables entre ventanas, ya que en realidad estaremos en el mismo programa.

(1/2) Anterior |    Inicio de Página   
Sitio desarrollado con PHP-Nuke. Todos los Derechos Reservados.
PHP-Nuke es un Software Libre realizado con licencia GNU/GPL.
Página creada en Junio de 1.998, con el proposito de difundir el lenguaje Cobol en nuestra lengua.
Andres Montes [98/11]