Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

Descripción

Este Punto de entrada se activa en la función finaDisplay(), que actualiza la pantalla de selección de registros de baja automática, verificando si el título puede marcarse o no para la baja. 
Este Punto de entrada permite que el usuario defina la situación inicial de los títulos: si los títulos estarán seleccionados o no en la pantalla de Selección de los títulos. 
Esta funcionalidad NO estará disponible en la opción de invertir los marcados, observe el ejemplo del Punto de entrada.


Punto de entrada

Descripción:

Este Punto de entrada se activa en la función finaDisplay(), que actualiza la pantalla de selección de registros de baja automática, verificando si el título puede marcarse o no para la baja. También permite que el usuario defina la situación inicial de los títulos: si los títulos estarán seleccionados o no en la pantalla de Selección de los títulos.

Ubicación:

Cuentas por pagar

Eventos:

Bajas por pagar automática / Bajas por pagar Auto Multisucursales

Programa fuente:

FINA090 / FINA091

Función:

Fa090bAval, Fa090Marca

Parámetros:nValorMarca, aTitulos

RDevolución:

Nombre

Tipo

Descripción

Obligatorio

lRet 

Lógico

Si se hubiera modificado el marcado del título, el ExecBlock devuelve .F., para no haber modificación de los acumuladores de valores y número de títulos. Si el Punto de entrada se utiliza para determinar si los títulos están marcados o no, debe devolver True (Verdadero) o False (Falso) para verificar cuál será la opción inicial de los títulos, marcados o no marcados.

X


Nota: En la rutina Bajas por pagar automática Multisucursales (FINA091), el punto de entrada F090TIT al ser activado por primera vez (donde define qué títulos vendrán marcados), no recibe parámetros (Paramixb).

Esto porque en este pasaje, no hay archivo temporal de los títulos, pero la tabla SE2 está abierta y trabada para grabación (MsRLock), de tal manera que la información del título está disponible para validación y manejo

ex: nValor := (cAlias)->E2_VALOR


Ejemplo estándar:

#Include 'Protheus.ch'

User Function F090TIT()
Local lRet := .F.
Local nValor := PARAMIXB[1]
Local aTitulos := {}

If type("PARAMIXB[2]") != "U"
   aTitulos := PARAMIXB[2]
   If Len(aTitulos) == 0
      lRet := .F.
   Else
      lRet := .T.
   Endif
Else
   lRet := .T.
Endif

Return lRet