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.