datilas

lazarus para revolver o problema precisei alterar 3 unit's ACBrBoleto.pas ACBrBancoSicredi.pas ACBrBancoABCBrasil.pas na unit ACBrBoleto.pas linha 5504 estava: Result := Format(ACBrStr(CInstrucaoPagamento), [fpNome]); alterei para: Result := ACBrStr(Format(CInstrucaoPagamento, [fpNome])); na unit ACBrBancoSicredi.pas linha 638 estava: Result := Format(ACBrStr(CInstrucaoPagamentoCooperativa), [fpNome]); alterei para: Result := ACBrStr(Format(CInstrucaoPagamentoCooperativa, [fpNome])); na unit ACBrBancoABCBrasil.pas linha 963 estava: Result := CInstrucaoPagamentoTodaRede; alterei para: Result := ACBrStr(CInstrucaoPagamentoTodaRede); segue as units alteradas svn rev-34114 ACBrBoleto.pasACBrBancoSicredi.pasACBrBancoABCBrasil.pas

para reproduzir o problema no ...\Exemplos\ACBrBoleto\Lazarus\uDemoBoleto.pas no OnChange do componente cbxBanco (TComboBox) adicionar o seguinte código: Var b: TACBrBanco; Begin b := TACBrBanco.Create(FACBrBoleto); Try b.TipoCobranca := TACBrTipoCobranca(cbxBanco.ItemIndex); edtLocalPag.Text := b.LocalPagamento; Finally b.Free; End; End; voce vera o resulta da imagem 1-1,2-1: então para resolver o problema de charset eu adicionei "CP1252ToUTF8" como o codigo abaixo: Var b: TACBrBanco; Begin b := TACBrBanco.Create(FACBrBoleto); Try b.TipoCobranca := TACBrTipoCobranca(cbxBanco.ItemIndex); edtLocalPag.Text := CP1252ToUTF8(b.LocalPagamento); Finally b.Free; End; End; então o problema de charset inverteu com nas imagens 1-2,2-2: a pergunta é como faço para resolver definitivamente esse problema? ja tentei com ACBrStr(b.LocalPagamento) e não resolveu. só para deixar claro essa situação acontece em varias ocasiões até no AcbrTEFApi usando sitef ja aconteceu.(eu sei que é outro componente) mas o problema é o mesmo

na unit pcnConversao existe uma function que precisa adicionar o crtMEI para validação antes: function CRTTocRegTrib(const t: TpcnCRT): TpcnRegTrib; begin if T = crtSimplesNacional then Result := RTSimplesNacional else Result := RTRegimeNormal; end; agora: function CRTTocRegTrib(const t: TpcnCRT): TpcnRegTrib; begin if (T in [crtSimplesNacional, crtMEI]) then Result := RTSimplesNacional else Result := RTRegimeNormal; end; segue a unit alterada: ..\Fontes\PCNComum\pcnConversao.pas pcnConversao.pas versão da pcnConversao: svn rev-34108

tente alterar "bkmk: TBookmarkStr;" para "bkmk: TBookmark;"

isso é um erro de validação nos schema, e esta dizendo falta informar o bairro, e no nome da rua,(xBairro,xLogra). no xBairro vc esta enviando "0", no xLogra vc esta enviando "B" e o tamanho mínimo é 2 caracteres

então na porta tente usar /dev/usb/pl1 mas vc vai ter que rodar sua aplicação como super usuario eu uso /dev/ubs/lpx (onde x é o numero da porta) para dispositivos usb. /dev/ttySx (onde x é o numero da porta) para dispositivos serial. se vc olhar na imagem abaixo ao lado do botão "testar balança" tem o valor "0,628" que eu acabei de testar no linux

tente usar o comando ls /dev/usb para ver as portas. eu uso isso para impressoras, mas para acessar essas portas precisa de permissão:

eu consegui usando esse video, funcionou sem problema.

https://discord.com/channels/798697718800318484/806113038976548894/1233137128020644035 Emissão Assincrona de DFes, porque vc deve considerar mudar a forma de emissão em o quanto antes https://open.spotify.com/episode/2q28LuD3eaq1Eig3zwmkk2?si=e0288c458d4e4230

pode ser porque os servidores da sefaz RS estão desligados. por causa das enchentes

lembrando que tambem tem que preencher o xJust eo dhCont

eu uso assim e funciona perfeitamente: ACBrNFe1.Configuracoes.Geral.FormaEmissao := teOffLine; ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis := teOffLine;

dentro de ..\Exemplos\ACBrTCP\ACBrIBPTax\tabela tem as tabelas em csv e sempre são atualizadas pela equipe do acbr, vc poderia usar esses arquivos atualizando de forma off-line ou enviando para seu servidor proprio

na minha opinião e melhor solução é essa: pois não alterou a assinatura do evento e alterou apenas o unit referente ao sitef, na minha aplicação a alteração foi mínima. na procedure ACBrTEFAPI1QuandoPerguntarCampo eu adicionei: If (MR = mrRetry) Then Resposta := '-2'; e funcionou perfeitamente.

atualize o acbr e as dlls do openssl que estão em: ..\DLLs\OpenSSL\3.1.3 adicione a uses: blcksock e faça assim: ACBrHTTP.HTTPSend.Sock.SSL.SSLType := TSSLType.LT_TLSv1_3;

sim

o acbrtefapi tambem atende sitef e ja tem topicos para adicinar tef elgin e tef auttar mas esses não tem previsão lembrando que não tem previsão

vc tem libxml2 e libxml2-devel instalado?

vc esta copiando dll para o linux, linux não trabalha com dll. linux trabalha com .so por padrao mas não nesessariamente.

o problema esta na interpretação do base64: data:image/png;base64,PD94bWwgdmVyc2lvbj0iMS4wIi... data: é o tipo de arquivo, que no caso é image/png base64, é o tipo de configuração. resumindo vc precisa decodificar o texto depois de: "data:image/png;base64," (PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0i.....) esse texto:"data:image/png;base64," server para os navegadores conseguirem interpretar e renderizar o arquivo (png,jpg,pdf etc.)

usando synapse: Var http: THTTPSend; sURLRedirect: string; Begin http := THTTPSend.Create; Try sURLRedirect := ''; HTTP.HTTPMethod('POST', 'SUAURL'); If (http.ResultCode = 301) or (http.ResultCode = 302) Then Begin HeadersToList(http.Headers); sURLRedirect := http.Headers.Values['Location']; sURLRedirect := Trim(sURLRedirect); End; If sURLRedirect <> '' Then HTTP.HTTPMethod('POST', sURLRedirect); Finally Begin http.Free; End; End; End;

tenta usar : procedure TForm1.ACBrPSPGerenciaNet1QuandoTransmitirHttp(var AURL, AMethod: string; ReqHeaders: TStrings; ReqBody: AnsiString); begin ReqHeaders.Add('partner-token: seutoken'); end; mas creio que não há necessidade. já tentou usar o demo como esta preenchendo ClientId e ClientSecret?

não sei qual componente vc esta usando. mas tente: jSubObj.TryGetValue<string>('cont_pessoa')

não seria melhor stEnvio.Add(',"anexoType":"application/pdf;base64"'); ? para quem usar e-mail em navegador poder ver um resumo ou todo ele sem a necessidade de baixar. pois os navegadores reconhecem tipos específicos para tarefas especificas. mas o importante é que esta funcionando. foi só uma dica. https://developer.mozilla.org/en-US/docs/Web/HTTP/Basics_of_HTTP/MIME_types/Common_types