Histórico da Página

01. DADOS GERAIS

02. DESCRIÇÃO

Ponto de entrada executado em substituição à rotina de pesquisa padrão do título do arquivo de retorno do banco, na tabela de contas a receber SE1, que é realizada por IDCNAB ou chave do título. Nesta rotina de pesquisa padrão, também é realizada a validação da espécie do título com a tabela 17.

Obs.1: Na customização deste ponto de entrada, ao encontrar o título na tabela SE1 e a espécie existir na tabela 17, a variável private lHelp deve ter conteúdo igual a .F. , para não exibir mensagem;

Obs.2: As variáveis private cEspecie e cEspecie não devem ser modificadas, mesmo caso a pesquisa customizada não encontre o título desejado.

Obs.3: A validação realizada após a execução do ponto de entrada para verificar se o título foi posicionado com sucesso utiliza a função Found(). Caso esta função retorne verdadeiro, o processamento da linha do CNAB não será interrompido.

03. PARÂMETROS

        aValores - Array contendo as informações do retorno do Título a Receber

04. RETORNO

05. EXEMPLO DE UTILIZAÇÃO

#Include "TOTVS.CH"
#Include "RWMAKE.CH"

/*/{Protheus.doc} FA200FIL
Ponto de entrada para substituição da pesquisa do Título a Receber.

paramixb: Valores  aValores (consultar TDN - https://tdn.totvs.com/x/kKL8J)

@type       Function
@author     TOTVS
@since      25/05/2021
@return     Nil
/*/
User Function FA200FIL()

    Local cNumeroTit    As Character

    cNumeroTit  := paramIXB[1]

	//Sua forma para pesquisa do título a receber
    SE1->(DbSelectArea("SE1"))
    SE1->(DbSetOrder(16))
    SE1->(DbGoTop())

    If SE1->(DbSeek(FwXFilial("SE1") + SubStr(cNumeroTit, 1, 10)))
        Local aCampos   As Array
Conout("Título encontrado através do ponto de entrada FA200FIL!")
    Else
        //Só é permitida a manipulação da variável lHelp. Caso queira que o help seja exibido, lHelp deve receber .T.
        lHelp       := .F.
        //Variáveis permitidas para uso, mas que NÃO devem ser manipuladas
        //cNumTit     := ""
        //cEspecie    := ""
    EndIf

Return Nil

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>