Ir para conteúdo
  • Cadastre-se

EdmarFrazao

Membros
  • Total de ítens

    484
  • Registro em

  • Última visita

  • Days Won

    6

Tudo que EdmarFrazao postou

  1. Usei a mesma rotina para Cte e funcionou também segue ACBrCTeDACTEFR.pas
  2. fiz o Teste no Fast 2021.3 e funcionou
  3. Poderia usar a propriedade if frxreport.Version >= '6.0.0' mas não sei se tem no fast 4
  4. 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;
  5. não sei dizer esta propriedade ja tinha no Fast 6 e mudou o padrão para o fast 2021
  6. 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
  7. Atualização com Sucesso. Esocial sem erro Acbr e Fortes Funcionando sem problemas Delphi XE 3 Delphi 10.4 Delphi 11
  8. 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
  9. Configura a propriedade timeout com um tempo menor
  10. 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
  11. tem outra informação sobre o componente?
  12. 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;
  13. Dll na pasta Windows diferente das dll da sua pasta do executável, dll da ACBr
  14. 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'
  15. 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á.
  16. ok vamos aguardar. Obrigado
  17. 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)
  18. 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
  19. 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
  20. 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
  21. https://github.com/bacen/pix-api/issues/189 https://www.bcb.gov.br/content/estabilidadefinanceira/spb_docs/ManualBRCode.pdf https://social.msdn.microsoft.com/Forums/pt-BR/ca33769b-0d8c-4296-b17d-fa14ed32d3a3/como-calcular-o-crc-do-pix?forum=vscsharppt em php com fontes
  22. O codigodigitavel, Tentei gerar mas esbarrei no crc16 página 21, o resto é texto padrão. https://www.bcb.gov.br/content/estabilidadefinanceira/forumpireunioes/Anexo I - Padrões para Iniciação do PIX.pdf
  23. 1)Entro no banco e gero o codigodigitavel com valor zero, assim tenho um código padrão 2) outra opção é comprar os fontes que gera o código do FredMontier(https://www.unigui.com.br/pix.html). mesmo assim preciso da nova propriedade para informar o código. até alguém compartilhar os fontes com o ACBr de como gera o código , a propriedade já poderia ser usada com o 1 e ou 2. o fast gera o Qrcode bastando informar o código”texto”
  24. Manualmente alterei o Arquivo fast Incluir um QRCode (fixo) salvei o .frx, imprimi o boleto, só que todos os boletos tem o mesmo QrCode PIx. Preciso de uma nova propriedade para se preenchida no Boleto (CodigoDigitavelQrCode) Poderiam criar esta nova propriedade para cada Boleto? veja exemplo
  25. Gostaria de poder imprimir o QrCode Pix no Boleto. No Campo Instruções gostaria de imprimir o QRCode PIX , tem alguma maneira de implementar? Obs. Não é integração com o Pagamento, e so imprimir a chave em QRCode no boleto no campo instruções. Tem alguma maneira? obrigado
×
×
  • 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.