Ir para conteúdo
  • Cadastre-se

jaidomini

Membros
  • Total de ítens

    76
  • Registro em

  • Última visita

Contact Methods

  • Website URL
    http://www.firesoftware.com.br

Últimos Visitantes

1.400 visualizações

jaidomini's Achievements

  1. Nos arquivos de retorno durante a transmissão, em algum tem o numero do protocolo, pega este número, entra no site da prefeitura logado com o cnpj do seu cliente, faz a consulta por protocolo, deve vir o motivo certo.
  2. Nos arquivos de retorno durante a transmissão, em algum tem o numero do protocolo, pega este número, entra no site da prefeitura logado com o cnpj do seu cliente, faz a consulta por protocolo, deve vir o motivo certo.
  3. @Italo Giurizzato Junior Ítalo(Vamos apelar para o mestre ), bom dia! Sabe de alguma coisa a respeito?
  4. Estou com esse mesmo problema com Paulínia, acabou de mudar do Ginfes para Giss e a consulta acontece o mesmo problema.
  5. Onde grifei abaixo, o correto seria o número do RPS, ou estou enganado?
  6. [3536505] Nome=Paulinia UF=SP ; A partir de 07/05/2025 Provedor=Giss Versao=2.04 Params=Dividir100: ProRecepcionar=https://ws-paulinia.giss.com.br/service-ws/nf/nfse-ws
  7. Fiz os testes, e já incluí minhas contribuições. (Data do Crédito na Consulta Detalhada e Sacador Avalista na criação do JSON na emissão) Também incluí o Log do tipo paranóico para maiores detalhes. Precisei incluir 1 título apenas para infomar a carteira No tipo de consulta, tpConsulta não está vindo a data de pagamento, provavelmente é uma das 2 datas do print abaixo, porém o Itaú não fornece a data do crédito. ACBrBoletoRet_Itau_API.pas ACBrBoletoW_Itau_API.pas BoletoWS_341.txt
  8. Bom dia, Segue contribuição para Api do Itaú, no ACBr não tinha a criação do bloco Sacador_Avalista (identico ao Pagador) Segue PAS, json da documentação e foto do site com a documentação do bloco. Inclui as novas procedures abaixo e fiz as adaptações necessárias no restante do PAS Obg Jaisson ACBrBoletoW_Itau_API.pas jsonBoleto_Itau.json
  9. Bom dia, posso tentar sim, só não prometo hoje.
  10. Olá, segue contribuição para retornar a data do crédito, em verde as alterações. Procedure function TRetornoEnvio_Itau_API.LerRetorno(const ARetornoWS: TACBrBoletoRetornoWS): Boolean; LJsonArray, LJsonBoletoIndividualArray, LJsonPagamentoCobrancaArray, LJsonHistoricoCobrancaArray : TACBrJSONArray; if LJsonBoletoObject.AsJSONObject['dado_boleto'].IsJSONArray('pagamentos_cobranca') then begin LJsonPagamentoCobrancaArray := LJsonBoletoObject.AsJSONObject['dado_boleto'].AsJSONArray['pagamentos_cobranca']; for j := 0 to Pred(LJsonPagamentoCobrancaArray.Count) do begin ARetornoWS.DadosRet.TituloRet.DataProcessamento := Iso8601ToDateTime(LJsonPagamentoCobrancaArray.ItemAsJSONObject[J].AsString['data_inclusao_pagamento']); ARetornoWS.DadosRet.TituloRet.DataCredito := Iso8601ToDateTime(LJsonPagamentoCobrancaArray.ItemAsJSONObject[J].AsString['data_inclusao_pagamento']); ARetornoWS.DadosRet.TituloRet.ValorPago := StrToFloatDef( StringReplace(LJsonPagamentoCobrancaArray.ItemAsJSONObject[J].AsString['valor_pago_total_cobranca'],'.',',',[rfReplaceAll]), 0); ARetornoWS.DadosRet.TituloRet.ValorMulta := StrToFloatDef( StringReplace(LJsonPagamentoCobrancaArray.ItemAsJSONObject[J].AsString['valor_pago_multa_cobranca'],'.',',',[rfReplaceAll]), 0); ARetornoWS.DadosRet.TituloRet.ValorMoraJuros := StrToFloatDef( StringReplace(LJsonPagamentoCobrancaArray.ItemAsJSONObject[J].AsString['valor_pago_juro_cobranca'],'.',',',[rfReplaceAll]), 0); ARetornoWS.DadosRet.TituloRet.ValorDesconto := StrToFloatDef( StringReplace(LJsonPagamentoCobrancaArray.ItemAsJSONObject[J].AsString['valor_pago_desconto_cobranca'],'.',',',[rfReplaceAll]), 0); ARetornoWS.DadosRet.TituloRet.ValorAbatimento := StrToFloatDef( StringReplace(LJsonPagamentoCobrancaArray.ItemAsJSONObject[J].AsString['valor_pago_abatimento_cobranca'],'.',',',[rfReplaceAll]), 0); if ARetornoWS.DadosRet.TituloRet.ValorPago > ARetornoWS.DadosRet.TituloRet.ValorDocumento then ARetornoWS.DadosRet.TituloRet.ValorOutrasDespesas := (ARetornoWS.DadosRet.TituloRet.ValorPago - ARetornoWS.DadosRet.TituloRet.ValorDocumento) end; end; //Caso estiver liquidado, pegar a data do crédito real, quando cai no conta corrente o dinheiro, e remaneja a data credito para a data movimento, que é a data do pagto if LJsonBoletoObject.AsJSONObject['dado_boleto'].IsJSONArray('historico') then begin LJsonHistoricoCobrancaArray := LJsonBoletoObject.AsJSONObject['dado_boleto'].AsJSONArray['historico']; for j := 0 to Pred(LJsonHistoricoCobrancaArray.Count) do begin if UpperCase(LJsonHistoricoCobrancaArray.ItemAsJSONObject[J].AsString['operacao'])='TITULO LIQUIDADO' then begin if ARetornoWS.DadosRet.TituloRet.DataCredito > 0 then begin ARetornoWS.DadosRet.TituloRet.DataMovimento := ARetornoWS.DadosRet.TituloRet.DataCredito; ARetornoWS.DadosRet.TituloRet.DataCredito := DateToDateTimeItau(LJsonHistoricoCobrancaArray.ItemAsJSONObject[J].AsString['data']); end; end; end; end; JSON de Retorno e .pas em anexo Local do JSON com a data de compensção ACBrBoletoRet_Itau_API.pas Ret_Bol_Itau_Api.json
  11. Meus fontes estão atualizados, mas o problema foi uma unit que coloquei para este provedor Betha, para converter "tags" da discriminacao em produtos e tem uma parte que acaba limpando os serviços. Ignore este post, se possível delete este post.
  12. Olá, Problema encontrado Servico.ItemServico.Count vem maior que zero porém o "ItemListaServico" vem em branco Segue correção feita, proceder com essa correção ou na origem na origem da leitura do XML, anexei um XML de exemplo. Obg Jaisson NFSe_Autorizada_Cod_13280.xml ACBrNFSeXDANFSeRLRetrato.pas
  13. Olá, tive problema com o provedor Elotech quanto precisava ter 5 casas de decimais, melhor colocando no campo "ValorUnitario" com 5 casas o ACBR arredonda para 2 casas. Basicamente o erro é ValorLiquido difere da quantidade * valorunitario Fiz a alteração na unit EloTech.GravarXml.pas Na função: function TNFSeW_Elotech203.GerarItemServico: TACBrXmlNodeArray; Alterado de Result[i].AppendChild(AddNode(tcDe2, '#', 'ValorUnitario', 1, 17, 1, NFSe.Servico.ItemServico[i].ValorUnitario)); Para Result[i].AppendChild(AddNode(tcDe5, '#', 'ValorUnitario', 1, 17, 1, NFSe.Servico.ItemServico[i].ValorUnitario)); Feito isso a NFSe transmite normalmente. No arquivo nfse_v2_03.xsd da Elotech, já fala que o limite é 5 dígitos Att Jaisson EloTech.GravarXml.pas
  14. Resolvido, era o problema com certificado A3 da Certisign, conforme post abaixo, podem fechar o tópico
  15. Olá, estou com o seguinte erro Erro de Conexão: Erro Interno: -2146893815 Erro HTTP: 0 URL: https://producao.ginfes.com.br/ServiceGinfesImpl Erro: 2148073481 - Falha Enviando a Requisição. Erro: 2148073481 Não teve atualização de sistema e a partir do dia 22/08 começou a dar este erro, já atualizei o ACBR e continua o mesmo erro. Achei esta instrução do Ítalo, que talvez fosse o caso de Paulínia também, mas não consigo acessar, dá este erro "Algo deu errado! Por favor, tente novamente" Alguém consegue copiar e colar as instruções aqui como resposta?
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...