Ir para conteúdo
  • Cadastre-se

Painel de líderes

Conteúdo popular

Showing content with the highest reputation on 21-07-2023 em todas as áreas

  1. Bom dia, vamos abrir os chamados para que possam solucionar o problema, hoje abri um chamado através do https://www.fazenda.pr.gov.br/webservices/sefa/servicos# opção documentos fiscais eletrônicos.
    3 pontos
  2. Bom dia. São sequenciais diferentes, pois são serviços diferentes.
    2 pontos
  3. Migre pois o componente não é mais dado suporte a uns 2 anos
    2 pontos
  4. Senhores Alexandre e Daniel Muito obrigado pela ajuda. Tudo funcionou perfeitamente. Podem fechar o Post. Grato
    2 pontos
  5. Segue alteração a ser feita no ACBRPixPSPAilos: const //Anterior cAilosURLSandbox = 'https://apiendpoint.ailos.coop.br/ailos/pix-cobranca/api/v1'; cAilosURLSandbox = 'https://apiendpointhml.ailos.coop.br/qa/ailos/pix-cobranca/api/v1'; // cAilosURLProducao = 'https://apiendpoint.ailos.coop.br/ailos/pix-cobranca/api/v1'; cAilosPathAuthToken = '/client/connect/token'; cAilosURLAuthTeste = cAilosURLSandbox+cAilosPathAuthToken; cAilosURLAuthProducao = cAilosURLProducao+cAilosPathAuthToken; Aproveitando, no FrPrincipal do exemplo na Pasta ACBR incluir a opção do PSP Ailos: case cbxPSPAtual.ItemIndex of 0: ACBrPixCD1.PSP := ACBrPSPShipay1; 1: ACBrPixCD1.PSP := ACBrPSPBancoDoBrasil1; 2: ACBrPixCD1.PSP := ACBrPSPItau1; 3: ACBrPixCD1.PSP := ACBrPSPSantander1; 4: ACBrPixCD1.PSP := ACBrPSPSicredi1; 5: ACBrPixCD1.PSP := ACBrPSPSicoob1; 6: ACBrPixCD1.PSP := ACBrPSPPagSeguro1; 7: ACBrPixCD1.PSP := ACBrPSPGerenciaNet1; 8: ACBrPixCD1.PSP := ACBrPSPBradesco1; 9: ACBrPixCD1.PSP := ACBrPSPPixPDV1; 10: ACBrPixCD1.PSP := ACBrPSPInter1; 11: ACBrPixCD1.PSP := ACBrPSPAilos1; / / <<< else raise Exception.Create('PSP configurado é inválido'); end;
    1 ponto
  6. Boa tarde! Como está a alimentação da chave do CT-e original no seu código? while eof do begin with infCteComp10.Add do begin chCTe := ''; end; Next; end; Compare...
    1 ponto
  7. Boa tarde Juliomar. Agradeço pela dica! Eu tinha ido por um caminho parecido, mas achei que não seria ruim verificar se não tinha uma maneira mais "oficial" rs... Eu precisei aumentar o bitmap do QRCode porque estou gerando faturas de pagamento por PIX com o Fast Report (impresso, PDF) e também enviando por email, e o tamanho original é extremamente pequeno para este fim (sim, antes de tudo eu ainda converto para JPG). Vou postar a função que montei para redimensionar o QRCode e, se alguém quiser, sinta-se a vontade para usar e melhorar: function tamanhoQRCode(imagemOriginal: TBitmap; tamanho: integer): TBitmap; var novaImg : TBitmap; begin novaImg := TBitmap.Create; try novaImg.SetSize(tamanho, tamanho); novaImg.Canvas.StretchDraw(Rect(0, 0, tamanho, tamanho), imagemOriginal); TamanhoQRCode := novaImg; finally novaImg.Free; end; end; Um abraço para todos. Danilo Grespan
    1 ponto
  8. No SVN a contribuição validei aqui com o sistema e passou At revision: 30188
    1 ponto
  9. Tu pode tentar redimensionar o BitMap antes de salvar. algo assim https://stackoverflow.com/questions/61309826/tbitmap-savetofile-is-changing-a-bitmap
    1 ponto
  10. Certo, vou enviar para teste então. Logo que testarem, dou retorno.
    1 ponto
  11. Boa tarde Junior, Eu não trabalho com VB, mas alguém da Equipe ACBr vai analisar o seu problema e tentar lhe ajudar. Lembre-se que ninguém da equipe conhece todas as linguagens, logo com certeza quem vai tentar lhe ajudar vai lhe pedir mais algumas informações e até mesmo que você faça os testes.
    1 ponto
  12. Já esta no SVN. Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça os testes usando o programa exemplo.
    1 ponto
  13. Boa tarde Sergio, Substitua pela unit em anexo. Reinstale o ACBr e faça novos testes. Tecnos.GravarXml.pas
    1 ponto
  14. Italo , Otimo, estarei realizando os teste , qualquer coisa retorno Desde já agradeço
    1 ponto
  15. Eu usava o 5000 para todas as outras prefeituras, nem me liguei nisso, obrigado pela ajuda.
    1 ponto
  16. Tópico movido para a área do SAC, para que o SLA de respostas seja considerado Bom dia! Muito obrigado por reportar! Foi criada a #TK-4227 para análise do caso e parecer do consultor responsável.
    1 ponto
  17. @Rafael Vivan Na seção [BoletoCedenteConfig] TipoInscricao=0 https://acbr.sourceforge.io/ACBrLib/ConfiguracoesdaBiblioteca18.html
    1 ponto
  18. Adriano, Já esta no SVN. Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.
    1 ponto
  19. aqui o pessoal já não tinha ajudado? https://www.projetoacbr.com.br/forum/topic/72556-nfse-vbnet/
    1 ponto
  20. Bom dia a todos, Para a cidade Marituba/PA ocorreu a alteração não só da URL de homologação e de produção, mas também as URL: SoapAction, NameSpace e a URL de NameSpace do Schema, portanto até os Schemas de homologação e produção foram alterados. Eu não entendo o motivo de colocar o nome da cidade nessas URL. Paciência. Já inclui na minha lista de tarefas para fazer todos esses ajustes. TK-4226
    1 ponto
  21. Bom dia! Foi enviado ao SVN na Rev-30182 uma alteração visando sanar este problema. Por favor, queira atualizar seus fontes, reinstalar o ACBr para realizar novos testes e reportar qualquer problema.
    1 ponto
  22. 1 ponto
  23. Bom dia, Pelos testes que fiz, na unit ACBrPIXCD.pas, na function SolicitarDevolucaoPix, na seguinte linha: Result := (ResultCode = HTTP_CREATED); O ResultCode é 200 e o HTTP_CREATED é 201, por isso a variável Result fica como false, exibindo a mensagem de erro e reiniciando o fluxo de pagamento. Consultando a devolução depois ela aparece como STATUS=DEVOLVIDO.
    1 ponto
  24. Bom dia! A NT para tributação monofásica sobre combustíveis não considera CSOSN. Inclusive, nela foram criados os CSTs 02, 15, 53 e 61 especificamente para isso e adicionadas exceções em algumas regras. Então mesmo que seja do Simples, vai enviar usando um desses CSTs. Agora sobre a sua rejeição em específico. Se conferirmos na NT, a regra de validação dela é a seguinte: No seu XML da nota de número 100776, você informou o valor 620505001 na tag cProdANP. Este valor não consta na Tabela de Combustíveis Sujeitos a Tributação Monofásica, por isso a rejeição.
    1 ponto
  25. Ricardo Carvalho deSousa Boa noite....eu fiz o modulo do SPED FISCAL EFD ICMS IPI e SPED CONTRIBUIÇÕES PIS E COFINS com parte do xml...uns 70% das informações são do XML de Entrada e Saídas. Mais criei algumas tabelas e conversão de CFOP e CST . Caso tenha interesse me chama no PV que te mostro como fiz....
    1 ponto
  26. 1 ponto
  27. Boa Tarde, segue a atualização do código para quem tiver necessidade de utilizar. GerarAssSofthouse.zip
    1 ponto
  28. Oi Diego, boa tarde! Conforme a orientação eu fiz os testes aqui... fiz o procedimento: Atualizei a DLL Alterei o acbrlib.ini conforme orientado. fiz o teste em homologação, veio tudo certinho. em produção, com essa nova versão da dll, está dando erro agora de Usuário/Senha, sendo que com a DLL antiga transmitiu normal... não sei se é erro meu e coincidiu com a atualização da DLL, mas, não consegui emitir a nota. O usuário e senha estão corretos, eu enviei as evidencias para vocês no email [email protected]. se precisar que faça mais algo, estou a disposição!
    1 ponto
  29. @Juliana Tamizou tenho esta outra contribuição também. Qualquer outra informação está disponível aqui: https://portal.fazenda.sp.gov.br/servicos/fci
    1 ponto
  30. Boa tarde a todos, Consegui implemetar, segue abaixo para quem quiser utilizar; function TF_LancarVendas.DeduzirBandeiraTEF(ATEFResp: TACBrTEFResp) : string; var p: Integer; Bandeira: String; RetNomeBandeira : string; begin Bandeira := LowerCase(Trim(ATEFResp.NFCeSAT.Bandeira)); RetNomeBandeira := ''; // Pega apenas a Perimeira Palavra p := pos(' ',Bandeira); if (p > 0) then Bandeira := copy(Bandeira,1, p-1); if (pos('visa',Bandeira) = 1) then RetNomeBandeira := 'VISA' else if (pos('mastercard',Bandeira) = 1) then RetNomeBandeira := 'MASTERCARD' else if (pos('american',Bandeira) = 1) or (pos('amex',Bandeira) = 1) then RetNomeBandeira := 'AMERICAN EXPRESS' else if (pos('sorocred',Bandeira) = 1) then RetNomeBandeira := 'SOROCRED' else if (pos('diners',Bandeira) = 1) then RetNomeBandeira := 'DINERSCLUB' else if (pos('elo',Bandeira) = 1) then RetNomeBandeira := 'ELO' else if (pos('hipercard',Bandeira) = 1) then RetNomeBandeira := 'HIPERCARD' else if (pos('aura',Bandeira) = 1) then RetNomeBandeira := 'AURA' else if (pos('cabal',Bandeira) = 1) then RetNomeBandeira := 'CABAL' else RetNomeBandeira := 'OUTROS'; Result := RetNomeBandeira; end;
    1 ponto
  31. Olá Pessoal, O método Consultar agora possui um novo parâmetro chamado: AExtrairEventos. function Consultar(const AChave: String = ''; AExtrairEventos: Boolean = False) ; Boolean; Para quem utiliza os métodos direto da classe WebServices, deve acrescentar a seguinte linha: (...).WebServices.Consulta.ExtrairEventos := True ou False; O que ocorre quando o campo ExtrairEventos possui o valor True? Simples, quando realizamos um consulta a um DF-e além de retornar a sua situação é retornado também alguns eventos vinculados a ele, como por exemplo o evento de cancelamento. Se o valor de ExtrairEventos for True o método Consultar vai se encarregar de verificar se no retorno contem eventos, caso afirmativo eles serão extraídos e salvos em disco nas pastas conforme o seu tipo. Por exemplo, se no retorno tivermos o evento de cancelamento, será salvo na pasta: ...\Evento\Cancelamento o arquivo *-procEventoNFe.xml (caso estejamos consultando uma NF-e). Essa nova funcionalidade esta disponível nos componentes: ACBrBPe, ACBrCTe, ACBrMDFe, ACBrNF3e e ACBrNFe. Em breve tanto o ACBrMonitor quanto o ACBrLib vão passar a ter também essa funcionalidade. O que eu ganho com essa nova funcionalidade no método Consultar. Vamos supor que o seu cliente venha perder o XML da nota por exemplo, neste caso basta você ler os dados da nota do banco de dados, gerar e assinar o XML e por fim realizar uma consulta com o XML carregado, desta forma ao realizar a consulta a SEFAZ vai retornar o protocolo de autorização e o componente se encarrega de atualizar o XML acrescentando o protocolo nele, deixando-o assim um documento com validade jurídica. Mas se o seu cliente perder o XML de um evento como por exemplo o de cancelamento, não tinha como refazer o mesmo, pois não temos um método para consultar eventos, aliais a SEFAZ não possui um serviço para esse fim. Como dito acima o Consultar além de retornar a situação do documento e retorna também alguns eventos. Antes o componente ignorava esse conteúdo, mas agora foi implementado a extração dos eventos. Resumindo caso o seu cliente venha perder o XML de um evento (*-procEventoNFe.xml), lembre-se que o método Consultar pode recuperar ele novamente, desde que esse tipo de evento que foi perdido é retornado pelo Consultar. Espero que tenham gostado dessa nova funcionalidade.
    1 ponto
×
×
  • 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.