Se distinguen seis botones al pie de página: Confirmar, Insertar, Modificar, Eliminar, Retornar, Salir.
Cada botón al ser presionado, debe ejecutar una función diferenciada y única dentro del programa.
Tradicionalmente el programador debe:
1.- Abrir al código fuente de la pantalla y ver cual indicador corresponde a cual botón
2.- Abrir el código fuente del programa, ubicar donde se usa el indicador
3.- Corregir la lógica del programa en la sección donde las operaciones están fallando.
Hay una manera de ahorrarnos el paso 1 y agilizar el paso 2.
En el archivo de pantalla las declaraciones permanecerán igual al estandard conocido.
En el código fuente del programa RPG está la diferencia.
Podemos ver en la hoja "F" la palabra clave INDDS que referencia una estructura de datos, asociada a los indicadores que a su vez estan relacionados con las teclas de función.
La posición de inicio de cada campo dentro de la estructura de datos esta asociada con el número del indicador. Por ejemplo, INSERTAR que comienza en la posición 6, está relacionada al indicador 06.
Lo mismo aplica para el resto de los indicadores. Seguidamente en lugar de preguntar con un IF:
IF *in01, *in03, *in06... etc estamos relacionando directamente la función que hace la tecla con el indicador y su significado.
Puedes descargar el código fuente en este enlace: