Painel de líderes

Na pasta do executável, eu tenho o gswin32c.exe e o gsdll32.dll, que pode ser baixado na página ghostScript.com o trecho de código abaixo atribui a senha a um novo pdf, a partir do que foi gerado pelo Fortes. vcomando := 'gswin32c -sDEVICE=pdfwrite -dCompatibilityLevel=1.4 -dBATCH -dNOPROMPT -dNOPAUSE -dQUIET'+ ' -sOwnerPassword=7B51BE9D-3960-4F6C-968E-8ED381DC061C' + // essa senha seria para quem gerou o PDF ( pode ser qualquer outra coisa ) ' -sUserPassword=' + vPartedoCPF + // variável com a senha que vai ser requisitada ao destinatário ' -sOutputFile=' + 'boleto_sem_senha.pdf' + ' ' + 'boleto_com_senha.pdf'; ExecuteAndWait(vcomando,'', SW_HIDE); A função ExecuteAndWait eu usei da biblioteca Jedi, na JvJCLUtils, mas deve haver outras disponíveis também. O interessante é que ocorre tudo de forma silenciosa.

Bom dia @tobexy. segue o arquivo nfse.pas. O arquivo nfse.pas é apenas um exemplo de como preencher o componente ACBrNFSe para o provedor IPM, quais comandos utilizar etc, um guia para com está começando a se familiarizar com as dificuldades deste provedor. Outra coisa, a comunicação com o servidor da IPM é com HTTP POST, então, ao processar o envio, eles já irão responder com a NFS-e gerada com o HTML para impressão. mas no arquivo de exemplo a impressão é feita de outra forma, faço abrir um link para impressão. O xml de retorno é somente isso. <?xml version='1.0' encoding='iso-8859-1'?> <retorno> <mensagem> <codigo>00001 - Sucesso</codigo> </mensagem> <numero_nfse>22</numero_nfse> <serie_nfse>1</serie_nfse> <data_nfse>15/06/2016</data_nfse> <hora_nfse>17:41:38</hora_nfse> <arquivo_gerador_nfse>22_0180450000040119.xml</arquivo_gerador_nfse> <nome_arquivo_gerado_eletron>22_0180450000040119.xml</nome_arquivo_gerado_eletron> <link_nfse>https://www.nfs-e.net/datacenter/include/nfw/nfw_imp_notas.php?codauten=0180450000040119</link_nfse> <cod_verificador_autenticidade>0180450000040119</cod_verificador_autenticidade> <codigo_html>Aqui retorna o HTML para impressão.</codigo_html> </retorno> nfse.pas

A tabela 20.2.A já se encontra também no repositório: https://svn.code.sf.net/p/acbr/code/trunk2/Exemplos/ACBrTCP/ACBrIBPTax/tabela

Deu certinho Juliomar, muito obrigado pelo suporte!

Troque CNPJ por CNPJCPF. @José M. S. Junior Creio que precise corrigir nos modelos na documentação do comando MDFE.ENVIAREVENTO. https://acbr.sourceforge.io/ACBrMonitor/Encerramento.html

Qual o erro que está ocorrendo? lembre-se que o Fast Report e o Fortes Report tem os próprios instaladores, portanto eles não são instalados com o ACBrInstall_trunk2. poderia repassar prints e o log do instalador?

Ok, irei implementar e passarei os fontes

Creio que dá pra começar a fazer as mudanças e testar mas vai precisar esperar pra subir pois é par ao mês dez a produção

Olá pessoal, Estive estudando todo o material sobre ACBrLib SAT e sua aplicação em sistemas desenvolvidos em Java e vi que o Demo em Java é bem diferente do Demo em Delphi e isso me gerou certa dúvida/insegurança. Seguindo os exemplos do Demo do SAT em Java eu estarei adequando meu sistema para realizar todas as operações necessárias em meu sistema comercial ou devo seguir o Demo em Delphi?

Rafael Dias, obrigado pela resposta. Estudei novamente os assuntos tratados nos links que me passou e considerando que preciso adequar meu sistemas para a várias necessidades que o cliente vai precisar, decidi que vou seguir o exemplo do Java mesmo. Creio que seguindo este exemplo vou conseguir fazer todo o processo SAT necessário para que o cliente possa emitir seus cupons, realizar consultas e realizar os envios para SEFAZ. Estou certo? Mais uma vez obrigado pela ajuda.

Entendi. Obrigado. Caso tenho avanço, irei postar aqui.

Infelizmente não estou conseguindo compilar o exemplo. Outra coisa que não estou entendendo é que se for gerado para outro branco (testei com santander), está sendo informado corretamente. Vou revisar aqui o código e depois retorno

Sim estará aqueles dados extras tbm pode sem configurado na acbrlib ou passado dentro do ini do cfe. https://acbr.sourceforge.io/ACBrLib/ConfiguracoesdaBiblioteca17.html https://acbr.sourceforge.io/ACBrLib/ModeloCFeINI.html

Está na forma de preencher o componente. poderia informar como fez isso usando o exemplo do svn.? informe os dados no mesmo e gere o titulo e o pdf exemplificando como fez isso aqui .

Se você usa Fortes... a configuração de Colunas não se aplica, pois ela tem sentido apenas para EscPos

ACBrNFeDANFeRL.MargenDireita := valor; ACBrNFeDANFeRL.MargenEsquerda := valor; ....

Obrigado pela resposta Julio. Sim ja alterei isso, coloquei o QrCode em outra tela, aguardando algo, o problema e saber o que ? Não existe homologação para esse tipo de implementação..

vou abrir o exemplo do ACBR ver se não está faltando configurar algo...

Obrigado @BigWings, corrigi no manual.

Olá, eu resolvi de outra forma. Usei o ghostscript para "empacotar" o PDF gerado pelo Fortes. Se quiser, eu mando a forma que fiz.

uPortoSeguroIndy.pas Exemplo de uso com Opendialog procedure TF_Cte.wb_averbarExecute(Sender: TObject); var chave , wdir : string; wn : integer; fSeg: TPortoSeguroIndY; begin wdir := dts_empresa.DataSet.FieldByName('PATH_RAIZ').AsString+'x_dfe\_Cte\'+'20'+copy(edl_chave.Text,3,2)+copy(edl_chave.Text,5,2); od.InitialDir := wdir; edl_averbado.Text:=''; MemoDados.Lines.Clear ; if oD.Execute then begin fSeg := TPortoSeguroIndy.create ; fSeg.UserName := '00000000000000'; // atencão username e Password tem que solicitar junto a Porto Seguro fSeg.Password := '000'; // Esse é o meu acesso wn := pos('-',oD.FileName); if wn>0 then chave := copy(od.FileName,wn-44,44); fSeg.Averbacao := maUpload ; fSeg.UpLoad(oD.FileName) ; MemoDados.Lines.Add('Resultado do Envio') ; MemoDados.Lines.Add('Protocolo => '+fSeg.Protocolo) ; MemoDados.Lines.Add('Chave => '+fSeg.Chave) ; MemoDados.Lines.Add(fSeg.MensagemRetorno) ; fSeg.Averbacao := maConsulta ; fSeg.Chave := chave ; fSeg.Consulta(oD.FileName) ; MemoDados.Lines.Add('Resultado da Consulta') ; MemoDados.Lines.Add('Protocolo => '+Trim(fSeg.Protocolo)) ; MemoDados.Lines.Add('Chave => '+fSeg.Chave) ; MemoDados.Lines.Add(stringreplace(fSeg.MensagemRetorno,';',#13,[rfReplaceAll])) ; if fSeg.Sucesso then Begin ShowMessage(stringreplace(fSeg.MensagemRetorno,';',#13,[rfReplaceAll])) ; edl_averbado.Text:= Trim(fSeg.Protocolo); End; fSeg.Free ; end; pn_card4Click(pn_card4); end;

Legal, a mesma resposta da Juliana, eu não achei nada..............mas ja dei fora do monitor ....muito obrigado

Bom dia! Ontem ainda, as notas começaram a aprovar normalmente. Provavelmente, foi problema no provedor mesmo, pode fechar o tópico. Obrigado.

Ok, irei olhar com eles, muito obrigado.

Verifica que eu mandei uma alteração esses dias atentendo a um banco no fr3 que precisava exibir os dados de endereço. atualize o svn e teste os fr3

Muito obrigado pela ajuda, resolveu meu problema.

Você poderia usar a versão Fast Report.. que permite edições no arquivo .FR3

Boa tarde Juliomar, demorei para responder hein. Devido a quarentena estamos trabalhando com redução jornada de trabalho e com isso acaba acumulando chamados, o que complicou algumas coisas. Porém eu achei sim uma questão que precisei alterar nos fontes. arquivo: ACBrNFSeWebServices, na linha 4810 estava if FProvedor = proCTA then ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso else ChaveAcessoPrefeitura := FNotasFiscais.Items[0].NFSe.Prestador.ChaveAcesso; a minha alteração foi if FProvedor = proCTA then ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso else if FProvedor = proSigep then begin ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso; CodVerificacaoRPS := FNotasFiscais.Items[0].NFSe.CodigoVerificacao; end else ChaveAcessoPrefeitura := FNotasFiscais.Items[0].NFSe.Prestador.ChaveAcesso; Com essa alteração consegui resolver o problema da chave do contribuinte, porém apresentou outro erro só que na comparação do XML gerado com o XLM de modelo enviado pelo provedor eu não consegui achar a diferença e não foi possível efetuar o cancelamento. O erro apresentado é: Informe um motivo para o cancelamento. O motivo foi informado, só que a quantidade de caracteres informado como motivo é menor do que está no exemplo, alterei o motivo para ficar igual ao XML do exemplo, porém o erro Informe um motivo para o cancelamento, persiste. Já estramos em contato com o provedor repassando o XML gerado. Vou aguardar o retorno deles e toda e qualquer alteração minha irei repassando aqui e no final repassei os arquivos alterados. Por enquanto muito obrigado!

Um SAT não pode ter o seu ambiente modificado... Se ele foi fabricado para se conectar em Produção, ele nunca poderá ser usado em homologação, e vice-versa... Experimente usar o Emulador SAT de SP

Bom dia a todos, Encontra-se disponível no repositório a implementação do provedor SigISS. Favor atualizaram os fontes e façam os testes.

Boa tarde pessoal, Para quem atende o estado do Ceará, sabe que o processo para autorização de operação da softwarehouse com o MFe não é simples e pode tomar um certo tempo, mas no dia 17/07/2020, a SEFAZ publicou uma noticia informando que agora o processo se resume a geração e envio de um Termo de Responsabilidade dentro da área restrita da SEFAZ. Fonte: SEFAZ-CE

Isso é explicado no artigo indicado... é uma característica de como o "Double" foi implementado no Delphi...

Olá a todos! Estou começando a usar somente o Lazarus para criar novos projetos. Estou começando com projetos mais simples para ir percebendo as suas vantagens e limitações. Uma coisa que vejo é que existem muitos componentes para Lazarus e ao mesmo tempo componentes de nomes e lugares diferentes que podem resolver o mesmo problema. Gostaria, se possível, que os usuários do Lazarus nos passassem sua experiência em quais componentes utilizam no dia a dia e que estão agradando bastante. Exemplos de componentes ( mas não somente estes ): - Qual componente vocês utilizam para banco de dados (Nativo, Zeos, etc -- para conectar no Firebird e no MySQL por exemplo) - Para gerar relatórios (LazReport, Fortes, etc) - Para rede, para consumir JSON, XML etc (Indy etc) - E outros componentes que vocês utilizam e gostam. Se puderem ajudar vai facilitar muito para quem pretende migrar de Delphi para o Lazarus.