Jhonlenon Ribeiro

@BigWings Bom dia...testei os fontes atualizado no SVN...ficou OK em homologação e produção....pode encerrar o tópico.

Boa noite, eu estou homologando o boleto do Banrisul via API e vi que está sempre setando URL do token e registro do boleto sempre em produção...mesmo setando o ambiente para homologação, em debug vi que o ero está no ifthen FPURL := IfThen(Boleto.Configuracoes.WebService.Ambiente in [tawsProducao, tawsHomologacao], C_URL, C_URL_HOM) e no token também OAuth.URL := IfThen(OAuth.Ambiente in [tawsProducao,tawsHomologacao], C_URL_OAUTH_PROD, C_URL_OAUTH_HOM) Eu alterei a unit ACBrBoletoW_Banrisul e funcionou corretamente em homologação e produção como mostra o print...também anexei a unit alterada. ACBrBoletoW_Banrisul.pas

@HelioNeto esse erro ai é do ambiente de homologação...fica tentando que vc consegui...tentei varias vezes ai consegui aqui... @Victor H. Gonzales - Panda Agora ficou OK...testei aqui ai ficou 100%

@Victor H. Gonzales - Panda não deu certo...mais alterei sua função ai funcionou certo. function TBoletoW_Bradesco.AgenciaContaFormatada(const APadding: Integer): String; var LAgencia, LConta, LZeros: String; LTotalTamanho: Integer; begin { ** Recupera a agência e a conta, removendo zeros à esquerda da conta ** } LConta := RemoveZerosEsquerda(ATitulo.ACBrBoleto.Cedente.Conta); LAgencia := ATitulo.ACBrBoleto.Cedente.Agencia; { ** Define o total de caracteres baseado no parâmetro APadding ** } LTotalTamanho := APadding - (Length(LAgencia) + Length(LConta)); { ** Gera os zeros necessários para completar o tamanho total ** } if LTotalTamanho > 0 then LZeros := StringOfChar('0', LTotalTamanho) else LZeros := ''; { ** Concatena agência, zeros e conta ** } Result := LAgencia + LZeros + LConta; end; // ConsultaDetalhe e Baixa usar 11 digitos LJsonObject.AddPair('negociacao', AgenciaContaFormatada(11)); // No registro do boleto usar 18 digitos LJsonObject.AddPair('cnegocCobr', AgenciaContaFormatada(18)); Obs: não se esqueça de alterar na RequisicaoJson do registro do boleto e depois na RequisicaoConsultaDetalhe e RequisicaoBaixa.

Testei e não deu certo...está formatando errado... "cnegocCobr":"38610041000" - aqui estava correto se fosse na consulta e baixa do boleto. Para registro do boleto "cnegocCobr":"386100000000041000" Tamanho = 18 Para consulta de baixa de boleto "cnegocCobr":"38610041000" Tamanho = 11 @HelioNeto só uma observação, você já conseguiu registrar boleto em homologação com essas credenciais pelo postman? ou por outro meio? Porque talves seja problema nas suas credenciais sem permissão para consumir API de cobrança hibrida.

Mais você está nã entendo, nessa campo cnegocCob tem passar a agencia e conta normal sem acrescentar zero a esquerda na conta, o zero tem ser no meio, agencia + zero + conta = 18 digitos.

@Victor H. Gonzales - Panda Boa tarde, hoje fomos ativar um cliente Bradesco em produção e vimos que essa formatação aqui precisa ser dinâmica e não fixa. LJsonObject.AddPair('cnegocCobr', FormatarAgenciaContaBradesco(Boleto.Cedente.Agencia, Boleto.Cedente.Conta)); Não pode ser passada assim como está abaixo LJsonObject.AddPair('cnegocCobr', Boleto.Cedente.Agencia+'0000000'+Boleto.Cedente.Conta); Ai eu crei essa função FormatarAgenciaContaBradesco e FormatarAgenciaContaBradescoBaixaConsulta porque 2 funções? porque na consulta e baixa a formataçao do zero no meio é diferente da geração do boleto. E por ultimo a unt que está no SVN está faltando o campo ptxJuroVcto quando taxa de juros é mensal...ai acrescentei ela também Vou anexar a unt que alterei...acho que é só isso e está pronto....ai é pessoal ir testando e postando aqui no forum ou no discord. Obs: no ambiente de homologação está apresentando esse erro aleatório. {"statusHttp":400,"errorMessage":"Erro na comunicação CICS X IMS via APPC"} Mais isso já é problema no ambiente de homologação. ACBrBoletoW_Bradesco.pas

@HelioNeto seu problema está nós dados do json....o CNPJ em homologação está correto, mais agencia e conta não....para homologação usar esses dados.... Utilizar para homologação: CNPJ: 68.542.653/1018-38 Carteira: 09 Agência: 3861 Conta: 41000 Esses campos informe com zero conforme o manual orienta "cpssoaJuridContr": 0 "ctpoContrNegoc": 0 "nseqContrNegoc":0

@Victor H. Gonzales - Panda Bom dia, testei um boletos em produção com juros e multa em percentual vencido e o valor saiu errado, observe que na unt que está no SVN está faltando o campo ptxJuroVcto na parte onde gera a juros em percentual. Tanto a multa e juros em percentual tem que passar com 5 casas decimais, por exemplo: 2% = 2.00000 como mostra o print em anexo. Fazendo esse ajuste na unt ACBrBoletoW_Bradesco....fica 100% o Bradesco.

@Victor H. Gonzales - Panda Boa noite...fiz uns testes agora e quase ficou 100%....o detalhe agora está no juros e multa em percentual que você aplicou a mesma regra do valor. AJsonObject.AddPair('ptxJuroVcto', aTitulo.ValorMoraJuros*100); aqui o juros em percentual fica errado AJsonObject.AddPair('pmultaAplicVcto', aTitulo.PercentualMulta*100);aqui a multa também fica errada Essa campo ptxJuroVcto estava faltando no json, no meu aqui também tava faltando ai fui olhar o manual. Os resto está OK. vou anexar o print do juros e multa em percentual.

Dessa forma que vc falou dá certo...basta informar o CNPJ de homologação e o agencia + conta igual faz em produção. Quando alterar a unit anexa aqui novamente pra gente testar. Aqui eu posso testar em homologação e produção.

@Victor H. Gonzales - Panda Bom dia, ajustei sua unit ACBrBoletoW_Bradesco na parte do json...agora ficou registrando o boleto em homologação e produção usando o mesmo json. O Bradesco confundi muito agente com esse manual, mais pelo que testei aqui são apenas esses 4 campos que são fixo no json de homologação. "nroCpfCnpjBenef":"68542653", "filCpfCnpjBenef":"1018", "digCpfCnpjBenef":"38", "cnegocCobr":386100000000041000, O restante dos campos segue o manual. Agora um detalhe que me chamou atenção foi isso. No manual manda eu passar um valor numérico no campo vnmnalTitloCobr mais por exemplo vou gerar um boleto com valor 5.10 reais, no json de registro fica normal, vai 5.10...mais na hora de pagar o boleto aparece é 0.50 no valor ou seja fica errado o valor, então fiz um teste assim LJsonObject.AddPair('vnmnalTitloCobr', OnlyNumber(TransFormaRealEmString(aTitulo.ValorDocumento))); ai no json ficou assim "vnmnalTitloCobr" : "510" ai na hora de pagar ficou certo, era bom fazer mais testes em produção. Já corrigi a unt ACBrBoletoRet_Bradesco e está OK, também ajustei a consulta e baixa do boleto e ficou funcionando em produção. Vou anexar as 2 unit pra você testar ai. ACBrBoletoRet_Bradesco.pas ACBrBoletoW_Bradesco.pas

Hoje fiz uns testes e meu comentário estava errado sobre o json. Forma correta abaixo Em homologação "cpssoaJuridContr":"0" "ctpoContrNegoc":"0" "nseqContrNegoc":"0" Em Produção "cpssoaJuridContr":"0" "ctpoContrNegoc":"0" "nseqContrNegoc":"0" Vamos seguir o manual mesmo, parece que essa questão do json de homologação foi só no inicio.

@Victor H. Gonzales - Panda Boa noite...esses 3 campos ai são diferentes em homologação e produção. Em homologação "cpssoaJuridContr":"2337627" "ctpoContrNegoc":"000" "nseqContrNegoc":"2337627" Em Produção "cpssoaJuridContr":"0" "ctpoContrNegoc":"0" "nseqContrNegoc":"0" Outro detalhe, por exemplo no manual manda eu passar esse campo assim "registrarTitulo": 1 ai dá erro....porque estou passando numérico igual manda o manual, ai eu passo assim "registrarTitulo":"1" e dá certo. Isso são varios campos. Eu nunca entendi essa forma diferente de validação de campos do Bradesco, quandi fiz aqui na empresa à 8 meses atrás quebrei muito a cabeça com isso. Você pode até usar o mesmo json em homologação e produção, mais vai ter que parametrizar muitos campos. Eu consegui registrar o boleto em homologação com sucesso usando sua unit fixando esse json em anexo...fixa ele nessa parte como mostra o print. Caso apareça o erro TITULO JÁ CADASTRADO ai é só alterar o nosso numero (ctitloCobrCdent). json_homologacao.txt

@Victor H. Gonzales - Panda Esse json que vc postou não foi gerado nesse unit ACBrBoletoW_Bradesco que te mandei. O seu erro está no json de homologação tem varios campos errados. um deles é esse aqui nroCpfCnpjBenef":"07615615000171"....aqui tem que ser os 8 primeiros numeros do CNPJ de homologação "nroCpfCnpjBenef":"68542653".....essa unit ai já vai gerar o json de homologação pra vc forma correta. basta vc informar os dados do cliente, nela tem campos fixo e danâmico.