01. DADOS GERAIS

Linha de Produto:

Segmento:

Módulo:

Função:FINA090 - Baixas a Pagar Automática

02. DESCRIÇÃO

Ponto de Entrada será acionado em dois momentos na rotina:

1) 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. 

2) Será chamado na função finaDisplay(),  que atualiza tela de seleção de registros de baixa automática, verificando a cada marcação se o título pode ser marcado ou não para baixa. 

A tabela SE2 estará posicionada no título que estiver sendo marcado.


O ponto de entrada não será acionado na opção de inverter as marcações.


03. PARÂMETROS

Nome

Tipo

Descrição

nValorMarca

Numérico

Valor dos títulos marcados.

aTitulos

Array

Este array traz os títulos a serem apresentados, de acordo com os parâmetros informados na rotina. 

Os parâmetros devem ser utilizados apenas na chamada da rotina automática do FINA090. O array aTitulos não terá conteúdo na chamada via tela.

04. RETORNO

Nome

Tipo

Descrição

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 .T. (Verdadeiro) ou .F. (Falso) para verificar qual será a opção inicial dos títulos, marcados ou não marcados.

05. EXEMPLO DE UTILIZAÇÃO

User Function F090TIT()
Local lRet := .F.
Local nValor	:= PARAMIXB[1]
Local aTitulos := {}
Local cPrefTit  :=  SE2->E2_PREFIXO 
Local cNumTit :=  SE2->E2_NUM

If type("PARAMIXB[2]") != "U"	
    aTitulos := PARAMIXB[2]	
    If Len(aTitulos) == 0		
        lRet := MsgYesNo("Confirmar a marcação do título prefixo: " + cPrefTit + " e numero : " + cNumTit )	
    Else		
        lRet := MsgYesNo("Chamado via execução da rotina automatica ")	
    Endif
Else	
     lRet := MsgYesNo("Confirmar a marcação do título? ")	
Endif	
Return lRet