Pesquisar na Comunidade

Boa noite! Tenho componente para Delphi7 e SUPERIOR para os seguintes PBM's Convênios de Farmácia. - TrnCentre ( Novartis, vale mais saude, libs, portal da drogaria) - SNGPC ( Controle anvisa medicamentos controlados e antimicrobianos) - Farmácia Popular 1) Todos os componentes são vendidos com seus devidos fontes, Demo com fontes e manuais; 2) Dou consultoria/Suporte via Email, Whatsapp ou Conexão remota; 3) Componentes 100% Delphi sem utilização de componentes de terceiros. Pedro H. S. Barros [email protected] Fone (61)99241-3164 (CLARO) WhatsApp

Boa Tarde. Alguém sabe me informa qual o preenchimento correto desta tag "c15_convenio" ? Obrigado.

Boa Tarde Pessoal, Já utilizamos o acbr para emissão do modelo 21, convenio 115. Porem agora em Janeiro de 2017 tem uma nova versão e nossos clientes foram enviar os arquivos e foram rejeitados. O ACBR já esta atualizado para esta versão nova? Aproveitando o post, a versão 4.0 do NF-e, é disponivel para o Delphi 7? Utilizamos o Delphi 7. Alexandre.

Boa tarde, esse mês ao tentar enviar arquivo de boletos para o SICOOB começou a invalidar o convênio. O convênio estava indo zerado pelo ACBR, então fiz uma mudança e passou a validar novamente. linha 688 posição de 033 a 052 20 digitos para o convenio modificada a linha de: StringOfChar('0', 20) + // 33 a 52 - Brancos - Alteração para passar no validador para: PadRight(Convenio, 20, ' ') + // 33 a 52 - Convenio com Brancos a Direita Segue o arquivo em anexo caso interesse a alguém. Obrigado, Sandro Campos. ACBrBancoBancoob.zip

Saudações a todos Perdão pelas palavras abaixo, mas eu realmente estou muito mal humorado com essa situação. Se for ofensivo a você, por favor releve. Não sou exatamente um gênio em acbr, mas tampouco um idiota. Já tenho homologado para Sicredi, Itau, Sicoob, Bradesco, e em processo com o Santander. Mas não consigo com o Banco do Brasil. Simplesmente não funciona nem a pau. Cada vez que mando uma remessa, resolvendo pendência, eles me retornam (8 dias depois) uma mensagem com novas inconsistências. Eu já estou a ponto de desistir de um cliente simplesmente para parar de me incomodar com este banco cheio de funcionários públicos que levam 8 dias para te dar uma resposta. Só de número de convênio eu já fiz 4 alterações. Pendencias relatadas agora: ----------------------------------------------------------------------------------------------------- Posições 130 a 136: Preencher com o número do convênio. Ou seja: 2904514 Pergunto: Qual o campo que devo preencher com este valor? Estou usando fprinci.ACBrBoleto1.cedente.Convenio := self.ctactaconvenio.AsString; |===================================================================================================== Detalhe tipo 7 ----------------------------------------------------------------------------------------------------- Posições 004 a 017: Preencher com o número de inscrição correto para o convênio: 09311653000166 Bem... o convênio não era 2904514????? Agora é outro??? Pergunto: Em que campo eu preencho esse valor??? Posições 032 a 038: Preencher com o número do convênio. Ou seja.: 2904514 Peraí... mudou o valor do convênio? De Novo???? Pergunto: Em que campo eu preencho esse valor??? Posições 064 a 080: Preencher o nosso número da seguinte forma: '2904514NNNNNNNNNN' onde 'N' = numeração livre a cargo da empresa MUDANÇA MAIS RECENTE(acaba de chegar) ANTES NÃO PRECISAVA COLOCAR O CONVÊNIO AQUI. SE COLOCADO, O ACBR INFORMA QUE NOSSO NUMERO É MAXIMO DE 10! Houve mudança nos tamanhos dos boletos do banco?? Socorro!!! Obrigado a todos. Qualquer ideia ajuda!! anexo imagem do cadastro de dados da conta no sistema Claudiomir

Bom Dia. Tenho um cliente que envia boletos pelo Banco do Brasil. O convênio dele é de 7 posições e a carteira é a 18. No momento de ler retorno, o componente busca o número do convênio e verifica que tem tamanho 7, e busca o Nosso Número que tem 17 posições o que faz, após a verificação abaixo, o componente cair em uma exceção: "Tamanho Máximo do Nosso Número é 10". if (Length(trim(NossoNumero)) > 10) and (wTamConvenio = 6) and ((wCarteira = '16') or (wCarteira = '18')) then Result:= 17 else if (wTamConvenio <= 4) then Result := 7 else if ((wTamConvenio > 4) and (wTamConvenio < 6)) or ((wTamConvenio = 6) and ((wCarteira = '12') or (wCarteira = '15') or (wCarteira = '17'))) then Result := 5 else if (wTamConvenio = 6) then Result := 11 else if (wTamConvenio = 7) then Result := 10; Alguém está com essa mesma dificuldade? Obrigado.

Boa tarde, Estou gerando arquivo de remessa "Trunk" , meu problema esta no codigo de convenio , o banco pediu pra para por Posições 033 a 052: Preencher com o código do convênio: '002459638001411019 ' porem no arquivo gerado so saiu assim : '002459638001418000' Muito embora no eu passe assim : ACBrBoleto1.Cedente.Convenio :='002459638001411019'; Alguem poderia me dar um Help nisso Grato Gil NETSYS

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.

Alguém tem uma lista das carteiras suportadas pelo ACBr? Preciso de todas as carteiras, de todos os bancos. Att, Ricardo.

Pessoal, tenho um cliente do Banco do Brasil com a carteira '18' e convênio de 6 dígitos. Acontece que quando vai imprimir o boleto aparece a mensagem 'Tamanho Máximo do Nosso Número é: 5'. Como poderia resolver isso?

Boa tarde Pessoal, Por favor, poderiam me passar para qual layout do retorno do banco do brasil, o componente está preparado? Pois tenho um cliente que o convenio é de 6 posições, quando fiz a leitura reparei que os dados estavam estranhos, quando fui validar pelo layout do banco, verifiquei que realmente está preparado para outro layout. Se não está preparado para o convênio de 6 posições, posso implementar para vocês adicionarem no componente ou é melhor fazer a leitura de forma independente do componente? Grato

Olá estou com essa dificuldade com um cliente que utiliza o BB. Seguem anexos mensagem com o erro. E arquivo Acbrboleto.ini, para verificação do preenchimento dos dados. Como podem ver em um das imagem o CEDENTE.CONVENIO esta devidamente preenchido. Agardeço a todos. VERSÃO ACBrMonitor 0.9.28.2 Acbr 0.90.a

Quando deixo o campo convênio em branco, o texto da exceção gerada fica como abaixo: "Banco do Brasil requer que a Convênio do Cedente seja informado." quando na verdade deveria ser "o Convênio" Ou estou equivocado? Se eu estiver certo, a alteração precisa ser feita no método CalcularTamMaximoNossoNumero do arquivo ACBrBancoBrasil, logo no início do método.