Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Backoffice

Módulo:Financeiro (SIGAFIN)
Função:Baixa Automática a Receber (FINA110)
País:Brasil

02. VISÃO GERAL

O ponto de entrada FA110ATCP está na rotina Baixa Automática a Receber (FINA110), e sua chamada ocorre após a gravação da tabela temporária responsável por exibir os dados na tela de seleção de títulos;

Ele permite manipular os dados já gravados nos campos da tabela temporária e/ou dos títulos a receber (tabela SE1)

Os dados nele manipulados serão considerados no processamento de baixa de cada título selecionado.

03. PARÂMETROS

Nome

Tipo

Descrição

Conteúdo

paramIXB[1]

Array

Alias da tabela temporária

Posição do arrayDescriçãoVariável Private equivalente 
paramIXB[1]Alias da tabela temporáriacAliasTmp

04. RETORNO

Não se aplica.

05. EXEMPLO


FA110ATCP
User Function FA110ATCP()

    Local aSaveSE1 := SE1->(GetArea())
    Local cAliasTRB := PARAMIXB[1]

    //Atualiza tabela temporária
    (cAliasTRB)->E1_DECRESC := 20  // Para decréscimo  
    (cAliasTRB)->E1_SDDECRE := 20  // Para decréscimo
    (cAliasTRB)->E1_VALJUR  := 10  // Para Juros
    (cAliasTRB)->E1_DESCFIN := 20  // Para Desconto

    //Posiciona no registro do título (tabela SE1)
    SE1->(dbGoto((cAliasTRB)->RECNO )) 

    //Atualiza tabela SE1    
    Reclock("SE1",.F.)
    SE1->E1_DECRESC := (cAliasTRB)->E1_DECRESC   // Para decréscimo 
    SE1->E1_SDDECRE := (cAliasTRB)->E1_SDDECRE   // Para decréscimo
    SE1->E1_VALJUR  := (cAliasTRB)->E1_VALJUR    // Para Juros
    SE1->E1_DESCFIN := (cAliasTRB)->E1_DESCFIN   // Para Desconto    
    MsUnlock()

    RestArea(aSaveSE1)

Return