Aggille Sistemas de Gestão

Bom dia... Testado e funcionando..

Tem que entrar nas configurações da conta do Gmail, na parte de Segurança, no card 'Como Fazer Login no Google' , marque a opção Verificação em duas Etapas. Depois vá em Senhas de App. Selecione no primeiro combo EMAIL e no Segundo COMPUTADOR WINDOWS, então clique em GERAR. Vai aparecer uma senha de 16 caracteres, copie e utilize como senha para envio dos emails...

Segue em anexo unit alterada.. criei um array com os caracteres que devem ser removidos ( caso seja necessário é só ir acrescentando outros caracteres no array ), e utilizei e funcao RemoveStrings do ACBR. Testes realizados com sucesso... sds, ACBrBoletoW_BancoBrasil_API.pas

Ok... vou fazer a alteração e submeter o fonte pra análise... sds,

Boa tarde... Um cliente meu teve um erro ao transmitir um boleto para o Banco do Brasil via API. O erro é: "message": "campo texto beneficiario utilizado preenchido com dados inválidos". Era um boleto de negociação e nas observações constava o número dos outros boletos que estavam sendo negociados. Em contato com o suporte me informaram que o BB não aceita nenhum tipo de caracter que não seja letra ou números na tag "campoUtilizacaoBeneficiario" do json, e que o conteúdo deveria vir sempre em maiúsculo. Vi que o ACBR já coloca o conteúdo em maiúsculo. Dito isso, pergunto : Devemos tratar essa situação dentro do ACBR, visto que a princípio é uma característica do Banco do Brasil, ou direto em nossos ERPs ? Sendo direto no ACBR posso fazer o ajuste e enviar os fontes alterados. sds,

essas mensagens que o sicoob pede, é somente para quando o usuario for emitir a segunda via do boleto pelo site do banco.. eu sempre informo ao sicoob que não será enviada a mensagem, pois o cliente sempre enviará o boleto a partir do sistema, que já vai com a mensagem automática...

No layout do BB não tem a opção DATA ali no Json dos Juros.. o BB simplesmente estava ignorando a instrução de Juros... fiz a seguinte alteração: Somente comentei a linha 581.. Enviei uma duplicata pro banco e confirmei que as instruções de juros apareceram...- if (Titulos.ValorMoraJuros > 0) then begin JsonJuros.Add('tipo').Value.AsInteger := StrToIntDef(Titulos.CodigoMora, 3); // JsonJuros.Add('data').Value.AsString := FormatDateBr(Titulos.DataMoraJuros, 'DD.MM.YYYY'); case (StrToIntDef(Titulos.CodigoMora, 3)) of 1 : JsonJuros.Add('valor').Value.AsNumber := Titulos.ValorMoraJuros; 2 : JsonJuros.Add('porcentagem').Value.AsNumber := Titulos.ValorMoraJuros; end;

Boa tarde.. na Unit ACBrBoletoW_BancoBrasil_API;, na linha 578, temos a o seguinte condicional : if (Titulos.DataMoraJuros > 0) then ou seja, o ACBR só gera a informação de Juros, se tiver definidio a DataMoraJuros. Porém, na documentação da API do BB, essa data vale somente para a MULTA, o nó dos Juros nem possui data.. Na minha visão, o juros devem ser gerados se a propriedade Titulos.ValorMoraJuros > 0 a Multa sim, pode ser condicionada a Data. Segue abaixo print do Swager da documentação do BB

sim... já tenho clientes usando em produção.. padrão cnab400... acbr funcionando direitinho..

Bom dia.. encontrei um pequeno problema na unit ACBrBancoInter. Na linha 196, a variável ADataMoraJuros está sendo iniciada com '' e deveria ser '000000'. Pois quando a empresa não cobra juros e multa, deve ser preeenchido com zeros. Nessa situação o registro 1 era gerado com o tamanho de linha errado. Segue a unit corrigida.. já foi testado e funciona sds, ACBrBancoInter.pas

Eu, particularmente faço dessa forma... Faço os cálculos e gravo a nota no Banco, pois todas as classes de NFe que eu tenho fazem uso do ID da nota, portanto, a nota precisa estar gravada no banco para a transmissão sds,

deixo em pastas e armazeno no banco somente o nome do xml...

Bom dia... Estou tentando enviar NFSe para o provedor Thema com método meLoteSincrono. Configurei o componente com a pripriedade ConsultaLoteAposenvio = false, porque eu mesmo quero fazer a consulta pelo numero do RPS após o envio, pois a consulta por lote nesse provedor parece nunca funcionar... A consulta por RPS funciona bem.. Porém sempre recebo o erro X202 - Lista de NFSe não encontrada. Me parece que ele está sempre consultando após o envio...

Sicredi também.. a cobrança online é um produto diferente... mas nesse caso é somente fazer a solicitação pro gerente.. tive que solicitar pra minha empresa pra testar a API, pois não tem um ambiente de homologação, e eu nem uso cobrança pelo sicredi.. mas foi bem tranquilo, no mesmo dia ja estava tudo liberado.

Quando transformo o parametro aLote em String, ele retorna que Procedures não têm retorno.. o Método Enviar é uma procedure e não uma Function...

Bom dia... Estou compilando o ACBRLibNFSe, e na Unit ACBRNFSLibBase, linha 333, ocorre o seguinte erro: ACBrLibNFSeBase.pas(333,45) Erro: Incompatible type for arg no. 1: Got "LongInt", expected "AnsiString" a linha é a segunte: Response := DM.ACBrNFSeX1.Emitir(aLote, ModoEnvio, aImprimir); Versão do Lazarus: 2.0.12 / 32bits Versão do FPC: 3.2.0 sds,

Segue em anexo arquivo .TXT modificado com algumas instruções de configuração para o webservice do Sicredi.. Por gentileza, adicionar ao trunk... sds, configWebService.txt

Fontes atualizados e testes efetuados no Banco do Brasil e Sicredi... tudo funcionando.. @Fernando Henrique também teve contribuição nessas alterações.. ele me enviou os fontes dele que foram muito úteis...obrigado pela contribuição..

sim.. testei no Sicredi e no BB e funciona perfeitamente...

ok.. entendido...

estou encerrando a integração com o Sicredi.. depois disso posso colaborar tambem...Já utilizo com sucesso em vários clientes a api do BB da forma que está.. Mas se é pra melhorar vamos botar a mão na massa

Essa mesma configuração também funciona para o Banco do Brasil, pois eu estava usando dessa forma já em produção e não afetou as transações do BB

Bom dia @Victor H. Gonzales - Panda .. então o que acontece.. La na Unit ACBrBoletoWS.. temos a seguinte situação a partir da linha 673 ( nas units que vc me mandou ). try FDFeSSL.SSLHttpClass.Clear; FDFeSSL.SSLHttpClass.MimeType := FPContentType; with FDFeSSL.SSLHttpClass.HeaderReq do begin Clear; if FPAccept <> '' then Add(C_ACCEPT +': '+ FPAccept); if FPAuthorization <> '' then Add(FPAuthorization); if FPKeyUser <> '' then Add(FPKeyUser); if FPIdentificador <> '' then Add(FPIdentificador); if FPContentType <> '' then Add(C_CONTENT_TYPE +': '+ FPContentType); end; Nesse caso, a linha FDFeSSL.SSLHttpClass.MimeType := FPContentType; e a linha if FPContentType <> '' then Add(C_CONTENT_TYPE +': '+ FPContentType); geral o header Content-Type duas vezes, e isso dá erro de Bad Request... Uma das alterações que eu fiz foi retirar a linha if FPContentType <> '' then Add(C_CONTENT_TYPE +': '+ FPContentType); se remover uma das linhas funciona...

Estou no RS.. e dando erro de Timeout com OpenSSL... mudei a configuração pra WinCrypt e funcionou...

Segue fontes alterados.. Já testados Métodos de Registro, Consulta e Baixas, todos funcionando.. nos Próximos dias vou liberando outras funcionalidades ACBrBoletoWS.pas ACBrBoleto.pas ACBrBoletoW_Sicredi_API.pas ACBrBoletoRet_Sicredi_API.pas