Ventanas
página(s) : 2/2
(2437 palabras totales en este texto)
(36266 Lecturas) 
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.
|
Temáticos
