luciano_f
-
Total de ítens
291 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que luciano_f postou
-
o Banco me disse o seguinte Gostaríamos de ressaltar que, a criação da workspace é uma etapa realizada pela própria empresa. Do lado do banco, não é possível efetuar essa configuração para os clientes, pois esse processo exige a utilização do certificado digital (parte privada) e da senha. Caso desejem, podemos agendar uma reunião e podemos apoiá-los na criação da workspace através do Postman. Alguem pode me explicar melhor como fazer isso pois não faço a mínima ideia
-
Não entendi ?
-
Pessoal gerando homologação para Banco Santander como faço para pegar o KeyUser já li o manual do banco e não sei como gerar esse KeyUser o ClientSecret eu consegui porém o KeyUser não encontro
-
A Exceção não mostra um Log detalhado como é o arquivo que é salvo
-
Como capturar retorno de Boleto sem precisar abrir o arquivo de Log salvo no Disco ?
um tópico no fórum postou luciano_f ACBrBoleto
Como faço para capturar esse retorno e exibir em um Memo para o usuário sem eu precisar ler o arquivo de log que o ACBr salvar no disco ? estou usando tipo de detalhamento Simples e tentei o seguinte código porém ele pega um arquivo de log gigante e diferente do listado abaixo Procedure TForm_MenuPrincipal.P_OnGravarLog(const ALogLine: String; var Tratado: Boolean); Begin BoletoLogLine := BoletoLogLine + ALogLine + SlineBreak; End; eu quero capturar um log parecido com esse: 26/02/26 19:53:31:987 -03:00 - Autenticando Token... 26/02/26 19:53:31:988 -03:00 - Comando Enviar: TOAuth 26/02/26 19:53:31:989 -03:00 - URL: [POST] https://trust-open.api.santander.com.br/auth/oauth/v2/token 26/02/26 19:53:32:156 -03:00 - Erro: HTTP_Code=403 Erro=<HTML><HEAD> <TITLE>Access Denied</TITLE> </HEAD><BODY> <H1>Access Denied</H1> You don't have permission to access "http://trust-open.api.santander.com.br/auth/oauth/v2/token" on this server.<P> Reference #18.c542db17.1772146454.122b3e29 <P>https://errors.edgesuite.net/18.c542db17.1772146454.122b3e29</P> </BODY> </HTML> 26/02/26 19:53:32:159 -03:00 - Retorno Envio: TBoletoW_Santander_API 26/02/26 19:53:32:160 -03:00 - Código do Envio: 0 1.1 Forbidden 26/02/26 19:53:32:161 -03:00 - Falha Envio: Falha na Autenticação: HTTP_Code=403 Erro=<HTML><HEAD> <TITLE>Access Denied</TITLE> </HEAD><BODY> <H1>Access Denied</H1> -
Isso mesmo " PINPAD" não soube dizer, já vi para comprar porém seria algo apenas para testes e depois não vou usar por isso estava querendo algo emprestado, a coisa tá feia cortando todos os custos que puder rs rs rs rs rs rs rs se não conseguir vou esperar algum cliente ser obrigado o USO para fazer os testes, eu já fiz a homologação do Sitef porém a mais de 5 anos e como nenhum cliente meu usou terei fazer uma nova homologação pois meu ERP mudou muito.. Grato.
-
Pessoal indica alguma empresa que cede uma máquina de TEF para fazer os testes de homologação ?
-
Em terceiro lugar, porque não usar RTTI para clonar dados de uma Nota para outra. Poderia postar um codigo que faz isso ?
-
os dois objetos estão no formulario e não faço free neles de forma manual porém acabei de tentar sua ideia porém mesmo erro o problema que esse codigo meu não clona ele apenas passar de um para outro que queria uma forma de Clonar de fato e poder destruir a origem e deixar apenas o destino porem usando "Assign" isso não é possivel e esse Metodo ADD internamente acredito usar um Assign
-
Pessoal eu tinha resolvido esse questão com o seguinte codigo Procedure P_CloseAcbrNFe(Origem, Destino: TACBrNFe); Var I, vIndex: Integer; Begin with Origem.NotasFiscais.Items[0].NFe do begin for I := 0 to Det.Count - 1 do begin vIndex := Destino.NotasFiscais.Items[0].NFe.Det.Count; Destino.NotasFiscais.Items[0].NFe.Det.Add(Det.Items[I]); Destino.NotasFiscais.Items[0].NFe.Det.Items[vIndex].Prod.NItem := vIndex + 1; end; end; End; Estava funcionado 100% porém ao atualizar para ultima versão de ontem dá erro ao fechar o Formulario onde esse codigo é executado o erro é interno no ACBR ao destruir Como eu deve fazer para clonar ? Eu já cansei de pesquisar porém o que de fato preciso não encontrei se existe me passe o topico extado onde está o problema pois estou cego aqui. certeza? abre a pesquisa e veja a primeira ou segunda opção https://www.projetoacbr.com.br/forum/search/?q=assign&quick=1 Erro em : destructor NotaFiscal.Destroy; begin // Xml FNFeW.Free; FNFeR.Free; // Ini FNFeIniR.Free; FNFeIniW.Free; FNFe.Free; Erro AccessViolation inherited Destroy; end;
-
já fiz essa pesquisa e não consegui encontrar algo que faça o que eu preciso
-
isso mesmo copiar uma objeto de um TACBrNFe para outro porém usar "Assign" e pegar a referencia e isso está gerando os problemas
-
Pessoal a 4 horas batendo cabeça e não sei como adicionar itens de um objeto para outro procedure TForm3.Button2Click(Sender: TObject); Var I, vIndex: Integer; Var ACBrNFe1, ACBrNFe2: TACBrNFe; Var StringStreamIn: TStringStream; Var Produto: TDetCollectionItem; Var NotaF: NotaFiscal; begin ACBrNFe1 := TACBrNFe.Create(Self); ACBrNFe2 := TACBrNFe.Create(Self); Try StringStreamIn := TStringStream.Create; StringStreamIn.LoadFromFile('D:\A.xml'); ACBrNFe1.NotasFiscais.LoadFromStream(StringStreamIn); FreeAndNil(StringStreamIn); StringStreamIn := TStringStream.Create; StringStreamIn.LoadFromFile('D:\B.xml'); ACBrNFe2.NotasFiscais.LoadFromStream(StringStreamIn); FreeAndNil(StringStreamIn); with ACBrNFe2.NotasFiscais.Items[0].NFe do begin for I := 0 to Det.Count - 1 do begin // vIndex := ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Count; { NotaF := ACBrNFe1.NotasFiscais.Add; Produto := NotaF.NFe.Det.New; Produto.Assign(Det.Items[I]); Erro } // ACBrNFe1.NotasFiscais.Items[0].NFe.Det.New.Assign(Det.Items[I]); Erro // ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Items[vIndex].Prod.nItem := vIndex + 1; End; end; ACBrNFe1.NotasFiscais.Items[0].GerarXML; ACBrNFe1.NotasFiscais.Items[0].GravarXML('D:\XMLteste.XML'); Finally ACBrNFe1.Free; ACBrNFe2.Free; // Erro End; end;
-
Votação para Dephi IDE 64 Bits
luciano_f replied to luciano_f's tópico in Dúvidas Gerais sobre o ACBr
Se uma IDE de 32 Bits consegue copilar app de 64 bits porque o inverso não é possivel ? -
Votação para Dephi IDE 64 Bits
luciano_f replied to luciano_f's tópico in Dúvidas Gerais sobre o ACBr
Pode ser que minhas units sejam grandes, porém minha luz no fundo do tunel é a embacadero entender que 64 Bits é um caminho a ser seguido assim como Lazarus e Visual Studio. Como eu trabalho com Unigui e já está no Rodmap Lazarus isso me faria migrar correndo. -
Votação para Dephi IDE 64 Bits
luciano_f replied to luciano_f's tópico in Dúvidas Gerais sobre o ACBr
Acredito que sim pois são varios problemas relatados ao copilar grande aplicativos Até porque porque em 2023 uma IDE 32 Bits acredito sem pobre pelo preço cobrado pelo mesmo Olhe para o Lazarus com IDE de 64 Bits para Windows e também uma IDE para MacOS e Linux -
Tenho uma licença da versão 10.2 e tenho problemas com pouca memória ao compilar uma aplicação grande. Testei a versão 11.3 e o problema é o mesmo. Quando a Embarcadero terá vergonha e fará um IDE robusto de 64 bits ? Já estou pensando seriamente no Lázaros quando a Unigui o Suportar. Os amigos também poderiam votar. Para quem não tem a conta na Embarcadero essa conta é Free. https://quality.embarcadero.com/browse/RSP-33115 Os Admin do forum poderia deixar esse topico como Fixo
-
O ACBr não matou o Capicom, tanto que ele ainda funciona. Esse era o meu Medo de o ACBR não tem mais o Suporte que bom que ele não será tirado OpenSSL e resolverá seus problemas. Infelizmente em alguns clientes também não resolveu apenas o Capicom que funciona
-
Como já mencionei acima é inaceitável pedir para um Cliente formatar a maquina ou mesmo atualizar o Windows só para resolver o meu problema. todos os meus clientes que teve o problema essa semana Foram Windows 7 eu consegui resolver com Capicom 3 Desses Clientes tem vários outros sistema de Bancos e pedir para formatar é um pesadelo, problema de ransomware ou invasão não é desculpa pois como esses clientes acessam banco todos eles tem ótimos antivírus pagos como Kaspersky ou Bitdefender. 2 desses clientes tem sistemas legados que usam para consulta feito em Clipper e outro em Cobol e não tem como reinstalar novamente pois nem acesso ao desenvolvedor eles tem mais. Outro cliente é um deposito de construção e tem um sistema misturador de tinta antigo que também é sem chance de formatar ou atualizar. ou seja são muitas varias para dizer simplesmente formata que resolve ou atualiza o windows correndo grande de risco de BSO. Meu intuito principal com esse tópico é mostrar para os desenvolvedores do ACBR que não pode matar o Capicom eu já tinha visto esse topico
-
Já vi vários tópicos aqui no fórum onde é relatado para não usar Capicom então pergunto porque essa implicância em usar Capicom ? Sou do Paraná e ontem teve uma mudança na sefaz e vários clientes tiveram problemas de canal seguro a única forma que funcionou foi com cryCapicom. Não posso pedir para os clientes formatar o Windows e colocar o Windows 10 ou mesmo tentar atualizar o Windows 7 e correr o risco de ter um bso. E gostaria de pedir para os desenvolvedores não tirar o cryCapicom do Acbr pois ele me salvou e a alternativa seria formatar ou atualizar o Windows o que é completamente inviável.
-
hum acredito que entendi. vou fazer mais testes Grato.
-
Analisando melhor o arquivo "ACBrCargaBal.pas" existe um erro na linha em function ValorComVirgula(nValor:Currency):string; tive que trocar por sTemp := LFIll(FormatFloat('##0.00', nValor), 9, ' '); Result := TrocaPontoPorVirgula(sTemp); Em anexo o arquivo com correção ACBrCargaBal.pas
-
Pessoal estou com a ultima versão do ACBR atualizada e num cliente novo fiz exportação nos 3 formatos modUrano, modUranoS e modUranoURF32 Nenhum deles o aplicativo da Urano consegue fazer a leitura tem alguma outra configuração que deixei passar além de escolher certo o tipo da balança. ou o ACBR não suporta a carga para essa balança ? o Layout é esse em anexo. Configurações_txt - Topmax SS R1.0 geral.pdf Produtos_txt - Topmax SS R1.1 geral.pdf
-
Não consigo Instalar no Delphi 10.4.2
luciano_f replied to luciano_f's tópico in Dúvidas Gerais sobre o ACBr
Fico muito agradecido colega eu de fato tinha pegado uma versão errada do ACBR seguindo seus concelhos deu certo. -
Não consigo Instalar no Delphi 10.4.2
um tópico no fórum postou luciano_f Dúvidas Gerais sobre o ACBr
Pessoal eu não consigo Instalar o ACBR no Delphi 10.4.2, Eu baixei a ultima versão do ACBR hoje ao Executar o Aplicativo "ACBrInstall_Trunk2.exe" dentro da Pasta "NextGen" não detecta a versão 10.4.2 do Delphi Dessa forma tentei instalar os pacotes de forma manual porém está dando erro ao copilar "ACBr_DFeComum" Erro na Linha 181 do arquivo "ACBrDFeWinCrypt.Pas" [dcc32 Error] ACBrDFeWinCrypt.pas(181): E2010 Incompatible types: 'ACBr_WinCrypt.PCCERT_CONTEXT' and 'Winapi.Windows.PCCERT_CONTEXT'
