Before selection

4D v16.3

Before selection


Before selection {( tabla )} -> Resultado

Parámetro	Tipo	Descripción
tabla	Tabla	Tabla para la cual probar si el puntero se encuentra antes del primer registro seleccionado o Tabla por defecto, si se omite
Resultado	Booleano	Sí (TRUE) o No (FALSE)

Descripción

Before selection devuelve TRUE cuando el puntero del registro actual se encuentra antes del primer registro de la selección actual de tabla. Before selection generalmente es utilizado para verificar si el comando PREVIOUS RECORD ha movido el puntero del registro actual antes del primer registro. Si la selección actual está vacía, Before selection devuelve TRUE.

Para mover el puntero del registro actual a la selección, utilice los comandos LAST RECORD, FIRST RECORD, o GOTO SELECTED RECORD. NEXT RECORD no mueve el puntero a la selección.

Before selection devuelve TRUE en el encabezado cuando un informe está imprimiéndose con PRINT SELECTION o a partir del comando de menú Imprimir. Puede utilizar el siguiente código para probar el primer encabezado e imprimir un encabezado especial para la primera página:

  ` Método de un formulario de salida utilizado para un informe

 $vpFormTabla:=Current form table

 Case of

  ` ...

    :(Form event=On Header)

  ` El área encabezado va a imprimirse

       Case of

          :(Before selection($vpFormTabla->))

  ` El código para la primera ruptura del encabezado va acá

  ` ...

       End case

 End case

Ejemplo

Este formulario se utiliza durante la impresión de un informe. Define una variable vTitulo, a imprimir en el área del encabezado en la primera página:

  ` Método de formulario [Finanzas];"Array"

 Case of

  ` ...

    :(Form event=On Header)

       Case of

          :(Before selection([Finanzas))

             vTitulo:="Informe de finanzas de 1997" ` Definir el título para la primera página

          Else

             vTitulo:="" ` Borrar el título para todas las otras páginas

       End case

 End case

Ver también

End selection
Evento formulario
FIRST RECORD
PREVIOUS RECORD
PRINT SELECTION