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. 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
  5. Tu pode tentar redimensionar o BitMap antes de salvar. algo assim https://stackoverflow.com/questions/61309826/tbitmap-savetofile-is-changing-a-bitmap
    1 ponto
  6. Italo , Otimo, estarei realizando os teste , qualquer coisa retorno Desde já agradeço
    1 ponto
  7. Eu usava o 5000 para todas as outras prefeituras, nem me liguei nisso, obrigado pela ajuda.
    1 ponto
  8. 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
  9. 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
  10. 1 ponto
  11. Boa Tarde, segue a atualização do código para quem tiver necessidade de utilizar. GerarAssSofthouse.zip
    1 ponto
  12. @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
  13. 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
  14. 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.