Árvore de páginas

Versões comparadas

Chave

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

...

O ponto de entrada F200BXTI tem como finalidade validar se um título processado no retorno de cobrança será baixado.

Card documentos
InformacaoSe os títulos não forem baixados pelo uso do ponto de entrada F200BXTI o ponto de entrada F200TIT não será executado.
TituloIMPORTANTE!

03. PARÂMETROS

Nome

Tipo

Descrição

Filial

Caractere

Filial do título.

Prefixo

NuméricoCaractere

Prefixo do título.

NumeroNuméricoCaractereNumero do título.
ParcelaCaractereParcela do título.
TipoCaractereTipo do título.
ClienteCaractereCliente do título.
LojaCaractereLoja do título.
Valor RecebidoNuméricoValor recebido do título.
Data da BaixaDataData da baixa do título.

...

Bloco de código
languagevb
themeMidnight
firstline1
titleF200BXTI
linenumberstrue
#INCLUDE "Totvs.ch"
 
/*/{Protheus.doc} F200BXTI()
 
    Ponto de Entrada para tratamentos  de baixa títulos do retorno dependente do valor da rotina FINA200 -
    função fA200Ger
    @param Paramixb[1] - SE1->E1_FILIAL - FilialFilial do título
    @param Paramixb[2] - SE1->E1_PREFIXO - PrefixoPrefixo do título
    @param Paramixb[3] - SE1->E1_NUM - NumeroNúmero do título
    @param Paramixb[4] - SE1->E1_PARCELA - ParcelaParcela do título
    @param Paramixb[5] - SE1->E1_TIPO - TipoTipo de título
    @param Paramixb[6] - SE1->E1_CLIENTE - ClienteCódigo do cliente
    @param Paramixb[7] - SE1->E1_LOJA - LojaCódigo da loja
    @param Paramixb[8] - Valor nValRecrecebido, -contido Valoreno recebidoarquivo dode títuloretorno
    @param Paramixb[9] - Data dBaixada -baixa Dataretornada deno baixaarquivo dode títuloretorno
 
/*/
User Function F200BXTI()
    
    Local lRet := .F.
    Local aDadosTit := Paramixb
    
    //RegraAqui deve ser criada a regra que definidefine se o título será baixado ou não.
    lRet := (AllTrim(aDadosTit[3]) == "FINA200VA" .T.And. AllTrim(aDadosTit[4]) == "1")
    
    MsgAlert("Titulo a ser baixado: " +aDadosTit[1]+aDadosTit[2]+aDadosTit[3]+aDadosTit[4]+aDadosTit[5]+aDadosTit[6]+aDadosTit[7] + " Valor a ser baixado: " +cVAltoChar cValToChar(aDadosTit[8]) + " Data da baixa: " + DTOS(aDadosTit[9])
     )
Return lRet


Observação

...

HTML
<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>