MANUALES

Programación Cobol

12. Operaciones de entreda salida

Una operación es de entrada o salida, cuando la consecuencia de realizar dicha operación trae como resultado la recepción de un valor o la emisión por cualquier medio de otro valor, para que nos entedamos, que recibimos una tecla o algun valor y que podemos imprimir en pantalla o impresora otro valor.

Es más que necesario este tipo de operaciones, dado que siempre es necesario que entre el usuario y el ordenador, existe un sistema de comunicación para poder realizar cualquier tipo de operación.

Existen tres tipos de operaciones de entrada/salida:

Entrada por Teclado

Para recibir las teclas que el usuario pulsa en su teclado, usamos una instrucción llamada ACCEPT, de la siguiente forma:

ACCEPT variable

Variable es una variable en la cual almacenamos las teclas pulsadas, osea, por ejemplo:

ACCEPT Entrada

Ahora en la variable Entrada tenemos todas las letras que el usuario haya pulsado en su teclado.

Existen una serie de parámetros que se pueden añadir a la instrucción ACCEPT para modificar su funcionamiento, por ejemplo:

ACCEPT Codigo AT LINE 10 COLUMN 20

Con esto hacemos que el cursor del teclado aparezca en la linea 10 y columna 20, en dicha posición el usuario empezará a escribir.

Otros paramétros que afectan al funcionamiento de ACCEPT son:

SPACE-FILL: Rellena con espacios en blancos aquellas posiciones que el usuario no haya rellenado.

LEFT-JUSTIFY: Es una posición que asume el cursor cuando el usuario escribe.

RIGHT-JUSTIFY: Es una posición que asume el cursor cuando el usuario escribe y se desplaza hacia la derecha.

TRAILING-SIGN: Es para variables de tipo numérico, poniéndole el signo en cada caso.

PROMPT: Rellena los espacios de la variable con el símbolo que se le indique entre comillas.

Cuando empecemos con los códigos de ejemplos, verá más fácil como funciona este tipo de operaciones, no se preocupe si ahora lo tiene un poco díficil de comprender, con los ejemplos se ve todo más claro.

Salidas a través de la pantalla y de la impresora.

Para poder visualizar datos usamos la expresión DISPLAY, como por ejemplo:

A = 10
DISPLAY "A =", A

Con esto veremos que en la pantalla aparece A = 10

Si ponemos:

A = 10
DISPLAY "A = " , A AT LINE 10 COL 20

Con esto veremos que en la pantalla aparece A = 10 en la linea 10 y columna 20.

Veamos un ejemplo mas claro:

DISPLAY "INTRODUZCA SU CLAVE DE ACCESO"
ACCEPT CONTRASE
IF CONTRASE = "PASO" 
	DISPLAY "CONTRASEÑA CORRECTA, PUEDE CONTINUAR"
ELSE
	DISPLAY "CONTRASEÑA INCORRECTA"
	STOP RUN
END-IF
Páginas:
1 2 3 4 5 6 7 8 9 10 11 12 13