INFORM (2), Ejemplo para el uso del comando INFORM, de tal manera que este quede consistenciado, esto quiere decir que no permitirá que alguno de los campos quede vacío, volviendo a mostrar la plantilla sin perder los datos ya ingresados. También muestra como combinar INFORM con variables globales, uso de la variable EQ. Importante: Este programa solo es una plantilla de entrada, no realiza ningún calculo ni almacenamiento de datos, es solo como muestra de la apariencia que puede tomar una plantilla de ingreso. El programa completo, en versiones 48G y 49G, puede ser descargado haciendo click sobre DOWNLOAD NOW. (Archivo en formato ZIP)

Código Fuente:

Breve Resumen:

El comando INFORM toma de la pila o stack cinco argumentos (ver el primer ejemplo de INFORM), el la lista que contiene los valores que aparecerán por defecto para cada campo se coloca el contenido de la variable EQ si es que existiera, se necesito la estructura de captura de errores IFERR THEN END.

Para seguir consistenciando fue necesario hacer una copia de los 5 datos (argumentos de INFORM), luego se comprueba que al presionar OK todos los campos hayan sido llenados (no debe existir la palabra NOVAL dentro de la lista resultante), mientras sea así volver a iniciar la plantilla de entrada pero esta vez con los datos ingresados hasta el momento, además se mostrará un mensaje pidiendo el ingreso de los datos faltantes. El resultado final es una lista con todos los valores ingresados y un número 1 ó simplemente un número 0 que indica que se cancelo la plantilla de ingreso con CANCL ó ON.

Leyenda:

Negro: Argumentos para crear la plantilla INFORM (Título, Etiquetas, Ayuda), Rojo: Listas nulas ó en blanco para ampliar el ancho de las columnas que las preceden, Azul: Restringe el tipo de objetos que se pueden ingresar en cada uno de los campos, Verde: Valores que aparecerán por defecto en cada uno de los campos.

Aplicado a variables ó nombres globales, devuelve el contenido de estos en caso existieren, si no fuera así mostraría un mensaje de error.

Devuelve la posición de un objeto dentro de una lista en caso existiera en ella, caso contrario devuelve un cero.

Toma una cadena de texto y la muestra en un cuadro centrado en la pantalla.