Jump to content

110.png

Curso Gratuito para todos Usuários
+ Super Treinamento Assinando o SAC Anual

botao_campanha_thulio.png

sem_ttulo-620.fw_-e1583866078274.png 

Curso Dominando o ACBrMonitor
Novo Módulo Soluções de Varejo
Assine o SAC ACBr em qualquer plano e tenha acesso

Saiba Mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba Mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Search the Community

Showing results for tags 'carteira'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Categories

There are no results to display.

Categories

  • ACBrMonitorPLUS - Notas de Lançamento de Versão

Categories

  • ACBrLibNFe - Notas de Lançamento de Versão

Forums

  • Fórum Aberto - ACBr
    • ACBr News
    • Equipamentos testados
    • Base de Conhecimento
    • Dúvidas Gerais sobre o ACBr
    • ACBrSerial
    • ACBrSAT
    • ACBrNFe
    • ACBrMonitor PLUS
    • ACBrDFe
    • ACBrTEFD e Dúvidas sobre TEF
    • ACBrTXT
    • ACBrBoleto
    • ACBrDiversos
    • ACBrTCP
    • ACBrLIB
    • Dia do ACBr
  • Suporte Pago - SAC
    • Dúvidas gerais
    • ACBrMonitorPLUS
    • NFe/NFCe - Nota Fiscal Eletrônica
    • DFe - Documentos Fiscais Eletrônicos
    • SAT / MFE
    • TEF
    • Boleto
    • ACBrSPED
    • ACBrTXT
    • Paf-ECF
    • Requisitos Fiscais por UF
    • ACBrLIB
  • Outros Assuntos
    • ACBr's Pub
    • Legislação Fiscal e Tributária
    • Object Pascal - Delphi & Lazarus
    • Data Base
    • Classificados
    • Dúvidas não relacionadas ao ACBr

Categories

  • ACBrLib
  • Suporte Pago - SAC
    • ACBrMonitorPLUS - SAC
    • Utilitários - SAC
    • Dia do ACBr 1a edição
    • Dia do ACBr 2a edição
  • Free Download
    • Demos / Testes / Utilitários
    • Apresentações - Palestras

Calendars

  • Eventos - Palestras - Webinars
  • Prazos SEFAZ
  • Community Calendar
  • Feriados Nacionais

Blogs

  • Daniel Simoes' Blog
  • André Ferreira de Moraes
  • Moderadores ACBr
  • Teste de Blog
  • Notícias do ACBr

Categories

  • Suporte Pago - SAC
    • Curso Dominando o ACBrMonitor
    • Webinars
    • Video Aulas
    • Palestras - Dia do ACBr 2a Ediçao
  • Vídeos Abertos
    • Video Aulas
    • Comunicados
    • Dia do ACBr 2a Ediçao
    • Dia do ACBr 1a Ediçao
    • Homologação ACBr
  • Campanhas promocionais

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website URL


Skype


Localização


Interesses


CNPJ da Empresa


CPF

Found 9 results

  1. Boa Tarde Pessoal, Estou gerando remessa Cnab240 para a CEF 104, na Carteira 14. No registro "P" posições de 42 a 43 segundo o layout da caixa é Modalidade da Carteira 41,42 9(002) Não importa a carteira que eu use esta indo sempre "24". Mesmo mandando o Modalidade = carteira; Estou usando o ACBrmonitorPlus-0.9.0a e o ACBrMonitorPLUS-1.0.0.10-20161121 Estou fazendo algo de errado? Ou preciso mandar mais algum parâmetro? Um Abraço a todos Vanderlei
  2. Pessoal, Estou implementando o boleto para o Banco do Nordeste. O Layout do boleto já foi aprovado e esta 100%. No entanto ao gerar a remessa o campo da carteira esta sendo informado errado na remessa. A Careira correta e informada no componente é a 5. Que no layout do boleto deve sair 41. Esta OK No entanto no arquivo de remessa esta gerando a carteira 4 = '21' e deve ser a 5 como esta sendo informado. Já coloquei a ACBrBoleto.Cedente.CaracTitulo = tcVinculada mas mesmo assim só sai carteira 4 no txt if ACBrBoleto.Cedente.CaracTitulo = tcSimples then begin if ACBrBoleto.Cedente.ResponEmissao = tbBancoEmite then wCarteira:= '1' else wCarteira:= '4'; end else if ACBrBoleto.Cedente.CaracTitulo = tcVinculada then begin if ACBrBoleto.Cedente.ResponEmissao = tbBancoEmite then wCarteira:= '2' else wCarteira:= '5'; end else WCarteira:= 'I';
  3. Boa tarde, Estou configurando uma cobrança registrada caucionada para o Sicoob, porem após termos alimentado as propriedades necessárias estamos tendo o retorno de que a carteira não estava de acordo com o que deveria estar na linha digitavel, analisei o arquivo de remessa gerado e nas posições da carteira ela esta correta, contendo o numero 3. Tambem verifiquei o boleto, pois la tem o campo de carteira, porem no boleto a carteira também esta 3, então fui mais afundo do código e vi que a linha digitável é montada através do cód. de Barras do boleto, assim trazendo o numero "1" no lugar do numero "3" na posição que deve estar a carteira na linha digitável. Já tentei mudar algumas informações que são passadas para o componente mas não tive sucesso. Vou anexar uma remessa para vocês verem que esta com a carteira 3 e não 1 e também vou deixar a baixo a linha digitável incorreta que esta aparecendo. Linha digitável Boleto 1 incorreta : 75691.44418 03005.505007 00000.150011 7 68870000018000 Linha digitável Boleto 2 incorreta : 75691.44418 03005.505007 00000.220012 4 69180000018400 Fico no aguardo, Obrigado. att, Marcos Duca, Essystem. PJ756-0001.REM
  4. Boa tarde, Estou configurando uma cobrança registrada para um cliente, porem após termos alimentado as propriedades necessárias do componente estamos tendo o retorno de que o convenio não estava de acordo com o que deveria estar, analisei o arquivo de remessa gerado e realmente quando o código aparecia no arquivo faltava 3 dígitos. Debuguei a aplicação e encontrei que a carteira (que compõe esse código que eles chamam de convenio) estava com problema, pois passo o código '17019' para o campo ACBrTitulo.Carteira e o componente assume como '17' apenas, pelo fato de ter uma propriedade que se chama TamanhoCarteiraque o sistema define como 2 e acaba fazendo com que o campo ACBrTitulo.Carteira assuma o valor com apenas 2 dígitos. Gostaria de saber como prosseguir com isso, pois preciso informar o código '17019' por completo para que o arquivo seja gerado corretamente. Estou colando abaixo o que o banco nos retornou: Efetuar os seguintes ajustes nos Arquivos Remessa: Arquivo "001-0018.REM": Header de Arquivo > Lote 0000 ---------------------------------------------------------------------------------------------------- Posições 033 a 052: Preencher com o código do convênio: '002660159001417019 ' ==================================================================================================== Header de Lote > Lote 0001 ---------------------------------------------------------------------------------------------------- Posições 034 a 053: Preencher com o código do convênio: '002660159001417019 ' Arquivo "001-0019.REM": Header de Arquivo > Lote 0000 ---------------------------------------------------------------------------------------------------- Posições 033 a 052: Preencher com o código do convênio: '002660159001417019 ' ==================================================================================================== Header de Lote > Lote 0001 ---------------------------------------------------------------------------------------------------- Posições 034 a 053: Preencher com o código do convênio: '002660159001417019 ' Arquivo "001-0019-1.REM": Header de Arquivo > Lote 0000 ---------------------------------------------------------------------------------------------------- Posições 033 a 052: Preencher com o código do convênio: '002660159001417019 ' ==================================================================================================== Header de Lote > Lote 0001 ---------------------------------------------------------------------------------------------------- Posições 034 a 053: Preencher com o código do convênio: '002660159001417019 ' Arquivo "001-0020.REM": Header de Arquivo > Lote 0000 ---------------------------------------------------------------------------------------------------- Posições 033 a 052: Preencher com o código do convênio: '002660159001417019 ' ==================================================================================================== Header de Lote > Lote 0001 ---------------------------------------------------------------------------------------------------- Posições 034 a 053: Preencher com o código do convênio: '002660159001417019 ' Arquivo "001-0021.REM": Header de Arquivo > Lote 0000 ---------------------------------------------------------------------------------------------------- Posições 033 a 052: Preencher com o código do convênio: '002660159001417019 ' ==================================================================================================== Header de Lote > Lote 0001 ---------------------------------------------------------------------------------------------------- Posições 034 a 053: Preencher com o código do convênio: '002660159001417019 ' Fico no aguardo, Obrigado. att, Marcos Duca, Essystem.
  5. Olá, Estou enfrentando problemas para gerar boletos do Bando do Brasil, utilizando carteira 18 e convênio de 6 posições. À primeira vista, o NossoNumero está sendo gerado com 17 dígitos em vez de 11. NossoNumero (nº sequencial): 1 Convênio: 123456 NossoNumero completo esperado: '12345600001' (11 dígitos) NossoNumero completo obtido: '00000000000000001' (17 dígitos) Passos para reprodução do problema: 1. Criar um Titulo na lista (Titulo := ACBrBoleto.CriarTituloNaLista) 2. Popular os dados do boleto, sendo que Titulo.NossoNumero recebe o número sequencial (Titulo.NossoNumero := '1') Neste momento ocorre: a. Chamada à função SetNossoNumero() b. SetNossoNumero() chama CalcularTamMaximoNossoNumero('18', '1') c. CalcularTamMaximoNossoNumero('18', '1') resulta em 11 dígitos d. Então Titulo.NossoNumero (fNossoNumero) recebe '00000000001' 3. Exibir o boleto (ACBrBoleto.Imprimir) Neste momento ocorre: a. Chamada à função MontarCampoNossoNumero(Titulo) // Aqui Titulo.NossoNumero ainda é igual a '00000000001' b. MontarCampoNossoNumero(Titulo) chama FormataNossoNumero(Titulo) // Aqui Titulo.NossoNumero ainda é igual a '00000000001' c. FormataNossoNumero(Titulo) chama CalcularTamMaximoNossoNumero('18', '00000000001') d. CalcularTamMaximoNossoNumero('18', '00000000001') resulta em 17 dígitos, pois entra no primeiro if e. Então FormataNossoNumero(Titulo) resulta em '00000000000000001', com 17 dígitos f. A partir daí o nosso número passa a ter 17 dígitos.... Será que estou preenchendo de forma incorreta as propriedades ou preenchendo em uma ordem incorreta? Obrigado.
  6. Boa tarde. Em relação ao campo Titulo.Carteira, quando há diversas opções para cada número (ex: 17, 17/4, 17/7, etc) devo alimentar o campo apenas com o 17 (no caso) ou com os outros caracteres também?
  7. Saudações. Eu não sei bem onde informar, mas aqui em Rondônia, mais especificamente em Ji-Paraná, nós trabalhamos com a Carteira e a Variação da carteira "17-019", e eu não achei este tratamento específico para no ACBr. Eu optei então por informar no campo Carteira o valor '17-019' e pelo menos o boleto imprime normal com a numeração do código de barras funcionando para pagar, apesar de eu ver todo o tratamento para (Carteira = 18, ou 16, etc... que por sorte nós não entramos nesta condição mesmo e pegar sempre o else). O problema é que o código de barras propriamente dito não lê de jeito nenhum. Para resolver este problema, no procedimento onde monta o código de barras (procedure MontarCodigoBarras) na Unit ACBrBancoBrasil, eu fiz a seguinte alteração no trecho: de CodigoBarras := IntToStrZero(Banco.Numero, 3) + '9' + FatorVencimento + IntToStrZero(Round(ACBrTitulo.ValorDocumento * 100), 10) + IfThen((Length(AConvenio) = 7), '000000', '') + ANossoNumero + IfThen((Length(AConvenio) < 7), padR(OnlyNumber(Cedente.Agencia), 4, '0'), '') + IfThen((Length(AConvenio) < 7), IntToStrZero(StrToIntDef(OnlyNumber(Cedente.Conta),0),8), '') + ACBrTitulo.Carteira; para CodigoBarras := IntToStrZero(Banco.Numero, 3) + '9' + FatorVencimento + IntToStrZero(Round(ACBrTitulo.ValorDocumento * 100), 10) + IfThen((Length(AConvenio) = 7), '000000', '') + ANossoNumero + IfThen((Length(AConvenio) < 7), padR(OnlyNumber(Cedente.Agencia), 4, '0'), '') + IfThen((Length(AConvenio) < 7), IntToStrZero(StrToIntDef(OnlyNumber(Cedente.Conta),0),8), '') + Copy(ACBrTitulo.Carteira,1,2); ou seja, ao invés de colocar o campo ACBrTitulo.Carteira, eu usei somente os dois primeiros digitos. Assim funcionou, quem estiver com este mesmo problema está ai a solução. Estou informando aqui para ver se alguém faz a correção do componente para eu não me preocupar em ficar sempre alterando após cada atualização. Aguardo alguma resposta, Obrigado. Duílio Lobianco
  8. Bom dia pessoal, estou começando a fazer boletos dos principais bancos para homologação. Observei que os Código Cedentes mudam de acordo com cada banco, cada banco trata de um jeito. Então eu gostaria de compartilhar com vocês esta parte do meu código para saber a opinião de vocês e como cada pessoa trata isso, pois no meu código abaixo eu acho que ainda não vai encaixar em todas as ocorrências que viram daqui pra frente. case ACBrBoleto.Banco.Numero of 1: begin (* Banco do Brasil *) ACBrBoleto.Cedente.CodigoCedente := FormatFloat('00000000000',StrToInt(ACBrBoleto.Cedente.Conta))+'-'+ACBrBoleto.Cedente.ContaDigito; ACBrBoleto.Cedente.Modalidade := qBanco.FieldByName('VARIACAO').Text; end; 33: begin (* Santander *) ACBrBoleto.Cedente.CodigoCedente := sContaComDigito; ACBrBoleto.Cedente.Modalidade := qBanco.FieldByName('CARTEIRA').Text; end; 104: begin (* Caixa Sicob *) ACBrBoleto.Cedente.CodigoCedente := ACBrBoleto.Cedente.Agencia+'870'+ACBrBoleto.Cedente.Convenio; end; 237: begin (* Bradesco *) ACBrBoleto.Cedente.CodigoCedente := FormatFloat('0000000',StrToInt(ACBrBoleto.Cedente.Conta))+'-'+ACBrBoleto.Cedente.ContaDigito; end; 341: begin (* Itau *) ACBrBoleto.Cedente.CodigoCedente := qBanco.FieldByName('CONTA').Text; end; end; (* Cedente.DigitoCodigoCedente := ''; *) No código acima não coloco nada no DigitoCodigoCedente e não sei pra que serve.
  9. Bom dia. Estou tendo alguns problemas com a homologação dos boletos com o Santander. Eles estão reclamando de algumas coisas no leiaute dos boletos, e principalmente do código de barras. Fiz algumas alterações paliativas para resolver meu problema, mas segue o que me foi dito, para que se possível seja implementado no componente. Dados Componente Tipo Cobrança : Santander Código do Cedente : 5636213 Código da Carteira : 102 Espécie : DS Estou utilizando Leiaute Padrão com o QuickReport, pois o carnê eles pediram muitas alterações. 1) Foi pedido que no campo Espécie conste a palavra REAL e não R$, como não há configuração alterei direto no código fonte. Vide "anexo1.png" 2) Foi pedido que o campo "uso do banco" fosse removido. Vide "anexo1.png" 3) Que no campo carteira constasse além do código a descrição da carteira (e poderia se utilizar o espaço do "uso do banco"). Vide "anexo1.png" 4) Foi pedido que utilize-se o novo logo (em anexo, para possível atualização no repositório) 5) Quanto ao código de barras me foi informado que o mesmo não está apresentando o código da carteira Vide "NN 543217.txt" Ex.: Representação numérica do código de barras Enviado - 03391567100000002229130037100000005432170000 Esperado - 03399567100000002229563621300000005432170102 Em anexo : - boleto com as barras inválidas segundo o banco; - boleto com as barras válidas segundo o banco; - Log de analise do boleto invalido; - Imagem do leiaute que alterei para a homologação - Alteração feitas diretamente no "ACBrBoletoFCQuickFr.pas" - Também alterei o "ACBrBancoSantander.pas", estou enviando para comparação se preciso. boleto com barras invalido.pdf boleto com barras valido.pdf NN 543217.txt fontes.zip 033.bmp boleto com barras invalido.pdf boleto com barras valido.pdf NN 543217.txt fontes.zip 033.bmp
×
×
  • Create New...