Jhonlenon Ribeiro

Bom dia...eu estava precisando ocultar o e-mail do tomador na NFS-e Autorizada na hora de gerar o DANFSE...eu uso o fortes report. A situação é o seguinte, se o tomador fornecer o e-mail no cadastra ai fica tudo certo, agora quando ele não tem e-mail eu precisava informar um e-mail cooporativa nosso que seria específico para essa situação, só que quando fosse esse e-mail cooporativo não era pra mostrar no DANFSE...passava apenas no xml. Porque isso? porque para CANCELAR uma NFS-e de serviço a prefeitura só deixa se na emissão da NFS-e estiver sido informado um e-mail válido. Uso o componente ACBrNFSeX e Fortes Report. Tem alguma forma de fazer isso usando o componente ACBrNFSeX?

Boa tarde....eu resolvi o problema e tinha esquecido de postar aqui a solução....tinha 4 propriedade que eu não tinha criado...que são essas. ACBrMail.ReadingConfirmation := False; ACBrMail.IsHTML := False; ACBrMail.TimeOut := 0; ACBrMail.Tag := 0; ACBrMail.DeliveryConfirmation := False; Alguém pode encerrar o tópico.

Boa tarde @Italo Giurizzato Junior deu certo a emissão de nota fiscal de serviço em Santa Fé do Araguaia - TO, obrigado....pode encerrar o tópico.

Boa tarde....teria como incluir a cidade de Santa Fé do Araguaia - TO no ACBrNFSeXServicos do componente ACBrNFSeX? lá usa o provedor MegaSoft. [1718865] ; Incluído em 25/02/2025 Nome=Santa Fé do Araguaia UF=TO Provedor=MegaSoft Versao=2.00 ProRecepcionar=https://santafedoaraguaia.megasoftarrecadanet.com.br/santafedoaraguaia/ws/nfseSOAP ACBrNFSeXServicos.ini

Boa tarde.....depois de algumas atualizações do comoponente ACBrEmail quando crio o componente ACBrEmail em tempo de execução o texto do campo Subject não vai no envio....ACBrMail.Subject :='TESTE'; Envia normal só não vai o Subject Alguém já passou por isso?

@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.

Você viu que nessa unit ACBrBoletoW_Bradesco que lhe mandei tem a montagem do json em homologação e produção. O json em homologação tem algumas partes dinâmica e outras fixa, porque em homologação tem alguns campos que não pode ser alterado, pelo menos antes era assim, só semudou agora. Aqui estou conseguindo registrar em homologação 100%. Agora em produção terá que ajustar esse json ai ainda. Esse erro invalid signature as vezes pode ser assinatura ou json, nesse caso o código da assintarua do X-Brad-Signature do boleto está OK.

@Victor H. Gonzales - Panda Eu consegui registrar o boleto em homologação.....vou te mandar a unit em anexo, o problema tava do Content-Type...porque tanto para o pegar o token e registro do boleto está usando application/x-www-form-urlencoded. Para o token Content-Type :='application/x-www-form-urlencoded'; Para o registro do Boleto Content-Type :='application/json'; Mesmo que agente tava setando na procedure GerarHeader da unit ACBrBoletoW_Bradesco...lá na unit ACBrBoletoWS.Rest sempre passava o Content-Type :=application/x-www-form-urlencoded....fiz um ajuste na unit ACBrBoletoW_Bradesco aqui....Vou anexar a unit também. ACBrBoletoW_Bradesco.pas

@Victor H. Gonzales - Panda Bom dia...agora pela manhã voltei a mexer. Olha só se eu pego headers, json boleto e token gerado pela ACBr e coloco no postman, o boleto é registro 100% sem erro. Então código da assintura está OK e também não é erro no json de homologação.

Não está vindo a unit atualizada....consegui anexar aqui?

Agora ficou mais fácil...esse erro ai é na assintarua do X-Brad-Signature no readers....pode anexar a unit? ai vou tentar descobrir o motivo da assintura está invalida.