Campeonato de Futbol de Primera de Argentina
Versión 2 del SubFile
Al programa Ejemplo06 le agregamos la posibilidad de elegir una opción que visualizará los datos del registro seleccionado
Por ejemplo, en la columna "Op" ingresamos el valor 1
El código fuente es muy similar al Ejemplo 6 agregadas las rutinas de ejecución de las opciones definidas.
El código es el siguiente:
Evento 0000
Evento 0001
En éste evento incluiremos toda la lógica necesaria para que el subfile trabaje como necesitamos. El Código es el siguiente:
En la rutina de Definición del SubFile (RtnaDefSfl) agregamos la línea :
SflOpc "01" "Detalle " *NONE
que nos permite definir las distintas opciones que podrá ejecutar el usuario, en este caso la opción 01
Por supuesto tenemos que programar la acción que ejecutaró al ingresar el valor 01, y lo programamos en la rutina RtnaProcSFL. En este caso cuando recorre el SubFile y encuentra el valor 01 en la columna de Op, ejecuta la rutina FichaDeta
En la rutina FichaDeta se ejecuta una sentencia SqlLee y se pasa el valor del campo clave recuperado del SubFile (&EQP_CODIGO), como resultado tendremos la información del registro, y posteriormente se ejecutará la rutina FmaPanta01 que visualizará los datos correspondientes.
La ejecución será la siguiente :