Ir para conteúdo
  • Cadastre-se

EdmarFrazao

Membros
  • Total de ítens

    463
  • Registro em

  • Última visita

  • Days Won

    6

Tudo que EdmarFrazao postou

  1. AcbrNfsex Imprimir DANFSe Provedor Webiss 2 não imprime provedor:Webiss v2 (Formiga/3126109/MG) Consultou NFSe por RPS o xml é retornado mas quando imprime fica todo em branco, não esta lendo as tags segue em anexo arquivo retorno da consulta por Rps e por Lote Retorno.zip
  2. Funcionou. Creio que foi adicionado em todos os projetos o comando RttiSetProp(frxPDFExport, 'Transparency', 'False'); units alteradas: ACBrBPeDABPEFR, ACBrCTeDACTEFR, ACBrGNREGuiaFRDM, ACBrMDFeDAMDFEFR, ACBrNFeDANFEFRDM, ACBrNFeDANFEFRDM, ACBrNFSeDANFSeFR obrigado pela atualização.
  3. alguma posição da alteração? A alteração precisa ser feita em todos os projetos que usam Fastreport
  4. Estou gerando no Delphi 11 com o Fast 2021.003(versão Standard), e não tive o problema relatado mas com relação a tamanho a propriedade traz mais efeito frxPDFExport.Transparency := FALSE;
  5. seria interessante declarar a função RttiSetProp em uma unit para ser compartilhada com todos os projetos que usaram a mesma
  6. Usei a mesma rotina para Cte e funcionou também segue ACBrCTeDACTEFR.pas
  7. fiz o Teste no Fast 2021.3 e funcionou
  8. Poderia usar a propriedade if frxreport.Version >= '6.0.0' mas não sei se tem no fast 4
  9. Não seria melhor pela versão do delphi, Quais versões de Delphi ainda estariam usando Fast 4? Se houver varios com Fast teria que ter uma diretiva de compilação no instalador(mais trabalhoso ) O pdf fica de 4x ou mais maior e deve esta afetando todos os componentes acbr que geram pdf com fast. Um exemplo pdf deu 500k versos 1500k so mudando a propriedade A propriedade esta no Lazarus também talvez afete ( não uso) https://www.fast-report.com/en/blog/show/make-PDF-from-Delphi-Lazarus-CBuilder/ {Set whether to export images with transparency} frxPDFExport1.Transparency := True;
  10. não sei dizer esta propriedade ja tinha no Fast 6 e mudou o padrão para o fast 2021
  11. O componente FastReport passou a propriedade frxPDFExport.Transparency para padrão true Fazendo assim todos os pdf com Logos ficarem muito maiores quando gera o pdf do xml e este tem logo o PDF passou a ficar grande precisamos mudar a propriedade do componente e ou publicar um nova unit:ACBrNFeDANFEFRDM linha : frxPDFExport.Transparency := FALSE; Talvez tenha que ser mudado em todos os fontes da Acbr que use o Fast para gerar PDF. ACBrNFeDANFEFRDM.pas
  12. Atualização com Sucesso. Esocial sem erro Acbr e Fortes Funcionando sem problemas Delphi XE 3 Delphi 10.4 Delphi 11
  13. Tive o mesmo problema, mesmo apagando os fontes. Desmarquei o e social e instalou no delphi 10.4 e Delphi 11. Mas fiz os testes só até as 17:30
  14. Configura a propriedade timeout com um tempo menor
  15. Tive um problema parecido para funciona no NuvemShop que so aceita com Bearer. No meu caso eu tinha que passar no handle RESTRequest1.Params.Clear; RESTClient1.Authenticator := nil; RESTRequest1.Method := TRESTRequestMethod.rmGET; RESTRequest1.AddAuthParameter('Authentication','bearer ' + FTOKEN, TRESTRequestParameterKind.pkHTTPHEADER, [poDoNotEncode]); No meu caso tinha que passar: Authentication no seu se for RESTRequest1.AddAuthParameter('Authorization','bearer ' + FTOKEN, TRESTRequestParameterKind.pkHTTPHEADER, [poDoNotEncode]); se precisar de outros campos adicionar manulamente tem caso que o "bearer" deve ser minusculo e com um espaço entre o FToken e com poDoNotEncode // RESTRequest1.Accept := 'application/json'; // RESTClient1.ContentType := 'application/json'; with RESTRequest1.Params.AddItem do begin name := 'Content-Type'; Value := 'application/json'; ContentType := ctMULTIPART_FORM_DATA; Kind := TRESTRequestParameterKind.pkREQUESTBODY; end; with RESTRequest1.Params.AddItem do begin name := 'Accept'; Value := 'application/json'; ContentType := ctMULTIPART_FORM_DATA; Kind := TRESTRequestParameterKind.pkREQUESTBODY; end; with RESTRequest1.Params.AddItem do begin name := 'User-Agent'; Value := 'SeApiWs ([email protected])'; ContentType := ctMULTIPART_FORM_DATA; Kind := TRESTRequestParameterKind.pkREQUESTBODY; end; RESTRequest1.Execute; Funciona até no Rest Debuguer , so não pode usar o OAuth2AuthenticatorOauth diretamente
  16. tem outra informação sobre o componente?
  17. Todos os envios no Evento com Schemas s.1.0 estão dando erro, informa que não acha os schemas mas os schemas tem nomes: v_S_01_00_00.xsd O que esta errado na unit: pcesConversaoeSocial linha 2471 Esta assim: function StrToVersaoeSocial(out ok: Boolean; const s: String): TVersaoeSocial; begin result := StrToEnumerado(ok, s, ['02_04_01', '02_04_02', '02_05_00', 'S01_00_00'], [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]); end; function VersaoeSocialToStr(const t: TVersaoeSocial): String; begin result := EnumeradoToStr(t, ['02_04_01', '02_04_02', '02_05_00', 'S01_00_00'], [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]); end; se os schemas estiverem certos deveria ser assim? function StrToVersaoeSocial(out ok: Boolean; const s: String): TVersaoeSocial; begin result := StrToEnumerado(ok, s, ['02_04_01', '02_04_02', '02_05_00', '_S_01_00_00'], [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]); end; function VersaoeSocialToStr(const t: TVersaoeSocial): String; begin result := EnumeradoToStr(t, ['02_04_01', '02_04_02', '02_05_00', '_S_01_00_00'], [ve02_04_01, ve02_04_02, ve02_05_00, veS01_00_00]); end;
  18. Dll na pasta Windows diferente das dll da sua pasta do executável, dll da ACBr
  19. O Danfe Fortes já tem a propriedade marca d'agua(Impressão do Logo como marca D'Agua no Fundo do Danfe) Fortes funciona. ACBrNFeDANFeRL.MarcadAgua := 'logo.png' Fast não tem a proprieade Tem a msg ACBrNFeDANFEFR.MarcaDaguaMSG := ' msg texto' Poderiam implementar o mesmo no Danfe do Fast? ACBrNFeDANFEFR.MarcaDagua := 'logo.png'
  20. Sobre o uso PDV m8. Ele roda Android da para instalar o cliente Remote Desktop para conectar ao Windows server? Qual resolução ele suporta? E a impressora pode ser compartilhada no Remote Desktop? obrigado desd já.
  21. ok vamos aguardar. Obrigado
  22. Sim, se pagar o boleto via QRCODE não dará baixa automático, pois seria uma transação independente. Sim, haverá confusão. Mas entendo que poderia ser incluído na parte de cima do boleto (opcional)
  23. Criar o código sim e gerar o Qrcode Dinâmico, visualizar,imprimir, enviar por e-mail etc, Sim receber diretamente Não.” O cliente usará o app do celular dele para pagar” Você chega no PDV e cliente quer pagar com PIX, como a empresa não tem integração você gera o PIX dinâmico na tela e ou imprimir, o cliente lê o Qrcode no celular dele faz o pagamento e envia o comprovante para você. Assim o cliente não precisa digitar nem a chave nem o valor só confirmar a transação. outra opção será imprimir diretamente no boleto para o cliente que paga via depósito ter uma opção mais rápida de pagamento
  24. Arquivo Fast Padrão do Boletofr.frx ja com o Qrcode Agora basta preencher em tempo de execução o código no Fast uses frxBarcode2D; TfrxBarcode2DView(frxReport1.FindObject('Barcode2D1')).Visible := True; TfrxBarcode2DView(frxReport1.FindObject('Barcode2D1')).text := '00020126480014br.gov.bcb.pix0126Suporte@projetoacbr.com.br0204ACBR52040000530398654041.125802BR5909ACBR nome6008BRASILIA6205050106304FB95' BoletoFR.fr3
  25. O Qrcode(desenho) e o mesmo que sai no NFCe o Qrcode PIx e o mesmo Qrcode só muda o texto. No fast o componente Qrcode normal. Só preencher o campo texto do Qrcode com o código pix por exemplo 00020126480014br.gov.bcb.pix0126Suporte@projetoacbr.com.br0204ACBR52040000530398654041.125802BR5909ACBR nome6008BRASILIA6205050106304FB95
×
×
  • 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.