Versões comparadas

Chave

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

...

  • Fórmula do cálculo do Código de Barras (Protheus): Este parâmetro possibilitará definir uma fórmula, que será utilizada para calcular o código de barras dos títulos disponiveis para pagamento no Protheus. Seguem algumas considerações sobre este parâmetro.
    • Esta opção somente estará disponível em ambientes cuja integração com o EAI1 esteja ativa e configurada;
    • Caso exista configuração ativa porém ainda sem uma fórmula definida nestes parâmetros, o Meu Imóvel não permitirá a cópia do código de barras.;
    • Somente lançamentos cujo status da remessa seja igual a registrado ou remetido serão exibidos na visão de boletos do Meu imóvel.;
    • Da mesma forma, somente lançamentos baixados ou baixados parcialmente poderão ter seu código de barras copiado.;

Exemplo de fórmula que montará o código de barras num ambiente integrado com o Protheus.

Bloco de código
languagec#
Decl VALOR, NUMBANCO, NUMAGENCIA, NUMCONTA, NOSSONUMERO, CARTEIRA, numConvenio, codigoCedente, digitoCedente, numeroDocumento;
EXECSQL('FÓRMULA_PROTHEUS');

SetVar(VALOR,ResultSQL("FÓRMULA_PROTHEUS","VALOR"));
SetVar(NUMBANCO,ResultSQL("FÓRMULA_PROTHEUS","NUMBANCO"));
SetVar(NUMAGENCIA,ResultSQL("FÓRMULA_PROTHEUS","NUMAGENCIA"));
SetVar(NUMCONTA,ResultSQL("FÓRMULA_PROTHEUS","NROCONTA"));
SetVar(CARTEIRA,ResultSQL("FÓRMULA_PROTHEUS","CARTEIRA"));
SetVar(NOSSONUMERO,ResultSQL("FÓRMULA_PROTHEUS","NOSSONUMERO"));
SetVar(NOSSONUMERO,ResultSQL("FÓRMULA_PROTHEUS","NOSSONUMERO"));

se (NUMBANCO = 237) Entao
   MONTACODIGOBARRASBRADESCO(VALOR, NUMBANCO, NUMAGENCIA, NUMCONTA, CARTEIRA, NOSSONUMERO, TABLAN('DATAVENCIMENTO','D'),0) 
Senao 
 se (NUMBANCO = 104) Entao
   MONTACODIGOBARRASCAIXA(VALOR, NUMBANCO, numConvenio, NUMAGENCIA, codigoCedente, digitoCedente, CARTEIRA, NOSSONUMERO, TABLAN('DATAVENCIMENTO','D')) 
 Senao 
   se (NUMBANCO = 341) Entao
        MONTACODIGOBARRASITAU(VALOR, NUMBANCO, NUMCONTA, NUMAGENCIA, codigoCedente, CARTEIRA, NOSSONUMERO, numeroDocumento, TABLAN('DATAVENCIMENTO','D'))
   FimSe
 FimSe
FimSe
Aviso

Esta fórmula deverá ser sempre criada dentro do contexto do TOTVS Gestão Financeira, visto que as informações bancárias estão presentes na tabela FLAN