Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Descrição

Este Ponto de Entrada é chamado na função finaDisplay(), que atualiza tela de seleção de registros de baixa automática, verificando se o título pode ser marcado ou não para baixa. 
Este Ponto de Entrada permite que o usuário defina a situação inicial dos títulos:  se os títulos já estarão selecionados ou não na tela de Seleção dos Títulos. 
Esta funcionalidade NÃO estará disponível na opção de inverter as marcações, observe o exemplo do Ponto de Entrada.

 

Ponto de Entrada

Descrição:

Este Ponto de Entrada é chamado na função finaDisplay(), que atualiza tela de seleção de registros de baixa automática, verificando se o título pode ser marcado ou não para baixa. Também 
permite que o usuário defina a situação inicial dos títulos:  se os títulos já estarão selecionados ou não na tela de Seleção dos Títulos. 

Localização:

Contas à pagar

Eventos:

Baixas Pagar Automática / Baixas Pagar Auto Multi-Filiais

Programa Fonte:

FINA090 / FINA091

Função:

Fa090bAval, Fa090Marca

Parâmetros:nValorMarca, aTitulos

Retorno:

Nome

Tipo

Descrição

Obrigatório

lRet 

Lógico

Caso tenha sido alterada a marcação do título, o ExecBlock retorna .F., para não haver alteração dos acumuladores de valores e número de titulos.Caso o Ponto de Entrada seja utilizado para determinar se os títulos estão ou não marcados, deve retornar True (Verdadeiro) ou False (Falso) para verificar qual será a opção inicial dos títulos, marcados ou não marcados.

X


Nota: Na rotina de Baixas à Pagar Automática Multi-Filiais (FINA091), o ponto de entrada F090TIT quando chamado pela primeira vez (onde define quais títulos virão marcados), não  não recebe parâmetros (Paramixb).

Isto porque nessa passagem, não há arquivo temporário dos títulos, mas a tabela SE2 está aberta e travada para gravação (MsRLock), de forma que as informações do título estão disponíveis para validações e manipulações

ex: nValor := (cAlias)->E2_VALOR


Exemplo padrão:

#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