Ir para conteúdo
  • Cadastre-se

cefantacini

Membros
  • Total de ítens

    390
  • Registro em

  • Última visita

Community Answers

  1. cefantacini's post in Transmissão SNGPC ANVISA was marked as the answer   
    Era isso mesmo, peguei o WSDL novo, importei e resolveu.
    Se quiser pode fechar o tópico.
    Obrigado!
  2. cefantacini's post in Atualização do Fortes Report no Lazarus was marked as the answer   
    Eu consegui resolver reinstalando a package frce.
    Se quiser pode fechar o tópico...
  3. cefantacini's post in Modelo de SAT não definido was marked as the answer   
    Era isso mesmo, o cliente tinha alterado o código de ativação na tela de configurações.
    Problema resolvido
    Se quiser pode fechar o tópico
  4. cefantacini's post in Erro de validação do CTE was marked as the answer   
    Consegui resolver, estava fazendo confusão com o preenchimento dos campos toma3 e toma4.
    Vi o manual e esse tópico:
    e consegui corrigir a forma de preencher o XML.
    Se quiser pode fechar o tópico.
  5. cefantacini's post in Certificado Digital Banco do Brasil was marked as the answer   
    Consegui resolver
    Eu extrai as chaves raiz e intermediária do PFX seguindo este passo a passo:
    https://learn.microsoft.com/pt-br/azure/application-gateway/mutual-authentication-certificate-management
    Enviei para o portal do banco, depois que o banco aceitou, eu anexei o PFX no ACBrPIX e o problema foi resolvido.
    Se quiser pode fechar o tópico.
  6. cefantacini's post in Roda wheel do mouse was marked as the answer   
    Eu consegui resolver, eu tinha um código no Delphi 7 que estava gerando o erro no Delphi 11.
    Se quiser pode fechar o tópico...
     
    unit...;
    .
    .
    type TEvents = Class
      protected
        procedure DefaultApplicationMessage( var Msg: tagMSG; var Handled: Boolean );
      end;
    .
    .
    procedure...
    begin
      Events := TEvents.Create;
      Application.OnMessage := Events.DefaultApplicationMessage;
      Events.Free;
    end;
    .
    .
    procedure TEvents.DefaultApplicationMessage( var Msg: tagMSG; var Handled: Boolean );
    var i : SmallInt;
    begin
       if Msg.Message = WM_MouseWheel
       then
         begin
           Msg.Message := WM_KeyDown;
           Msg.lParam := 0;
           i := HiWord( Msg.wParam );
           if i > 0
           then
             Msg.wParam := VK_Up
           else
             Msg.wParam := VK_Down;
           Handled := False;
         end;
    end;
     
     
  7. cefantacini's post in ISSNet Ribeirão Preto NFSeX was marked as the answer   
    Boa tarde, consegui resolver, o problema era com a TAG
    <ExigibilidadeISS>1</ExigibilidadeISS>
    Eu estava preenchendo com 2 e o valor correto seria o 1
    O problema é que a mensagem de erro não indicava onde realmente estava o problema.
    Se quiser pode fechar o tópico
  8. cefantacini's post in ACBrNFSex - ConsultarNFSePorPeriodo - ISSNet - Ribeirão Preto was marked as the answer   
    Entendido, vou adaptar a loja para o padrão do provedor.
    Se quiser pode fechar o tópico.
  9. cefantacini's post in Frete no DANFe was marked as the answer   
    Entendido, obrigado!
  10. cefantacini's post in Migração ACBrNFSe - ACBrNFSeX was marked as the answer   
    Eu que agradeço por todos os esclarecimentos.
    Já finalizei as rotinas de migração.
    Se quiser pode fechar o tópico.
  11. cefantacini's post in Quebra de linha ISSNet Ribeirão Preto was marked as the answer   
    Eu consegui resolver, estava faltando preencher a propriedade 
    Configuracoes.Geral.CodigoMunicipio := ...
    E chamar o método
    Configuracoes.Geral.SetConfigMunicipio;
    Antes de imprimir.
    Se quiser pode fechar o tópico;
  12. cefantacini's post in Fortes Report e Delphi 7 was marked as the answer   
    Consegui resolver, o problema era relacionado com permissão de pasta de usuário do windows na pasta em que eu salvei a instalação do fortes.
    Se quiser pode fechar o tópico.
    Obrigado!
  13. cefantacini's post in Fortes Report e Delphi 7 was marked as the answer   
    Consegui resolver, o problema era relacionado com permissão de pasta de usuário do windows na pasta em que eu salvei a instalação do fortes.
    Se quiser pode fechar o tópico.
    Obrigado!
  14. cefantacini's post in Evento de Desacordo de CT-e (Homologação) was marked as the answer   
    Oi, Italo.
    Realmente estava fazendo confusão sim.
    Eu consegui resolver, deu um pouco de trabalho, eu emiti um CTe em homologação, usando o certificado digital do emitente.
    Depois executei o evento de desacordo para esse CTe usando o certificado digital do tomador.
    No final deu tudo certo.
    Se quiser pode fechar o tópico.
  15. cefantacini's post in Lazarus - Ordem de Tabulação was marked as the answer   
    Eu consegui resolver, da seguinte forma:
    Selecionei todos os controles (Edit, ComboBox, BitBtn, etc) da tela (Shift pressionado + clique do mouse sobre o controle).
    Com todos marcados apertei Ctrl+X, ou seja, removi eles da tela.
    Compilei o programa que deu erro pq o código fazia referência aos controles.
    Voltei ao Form, apertei Ctrl+V e colei de volta, aí, o lázatus já cola nos mesmos locais.
    Pedi para o próprio lázarus fazer o alinhamento do TabOrder e o problema foi resolvido.
    Fechei, abri o projeto, testei, tudo ok.
    Se quiser pode fechar o tópico.
  16. cefantacini's post in Ajuda com RLGroup no Fortes was marked as the answer   
    Acabei resolvendo aqui, não achei muita lógica, já tinha removido e inserido vários componente e não tinha resolvido, aí joguei tudo fora, deixei só o form e fiz de novo e deu certo.
    Leva a crer que era alguma coisa com o RLReport mesmo...
  17. cefantacini's post in Erro ao enviar e-mail was marked as the answer   
    Eu consegui resolver, usando a dica enviada por um amigo aqui do fórum num outro tópico, mais agora não encontro o tópico para dar os créditos da dica, mais de toda forma, vamos lá:
     
    Talvez possa ajudar, dependendo de como foi configurada a segurança da conta google/gmail , por exemplo se usada "em duas etapas", so consegui enviar via gmail usando a configuração do Regis. Porem tive q acessar minha conta google e criar uma SENHA DE APP: e através dessa senha ele autentica o envio do email.
    1 - https://myaccount.google.com/ (acessar a conta google)
    2 - Clicar em COMO FAZER LOGIN NO GOOGLE.
    3 - SENHAS DE APP  (lado direito)
    4 - Selecionar APP  no caso "EMAIL"
    5 - Selecionar DISPOSITIVO no meu caso COMPUTADOR / WINDOWS
    6 - Clicar em GERAR.. 
    Ai através daquela senha gerada de 16 dígitos, eu inseri como SENHA / Password no componente
    ACBrMail1.Password:= ert3f4ai67x8xagh "exemplo"
    E ai finalmente o Gmail liberou o envio.
     
    Caso queira pode fechar o tópico...
  18. cefantacini's post in Erro após atualização do ACBr no Lazarus was marked as the answer   
    Resolvi, apaguei a pasta i386 que o lazarus cria e aí compilou...
  19. cefantacini's post in DBGrid no Lazarus was marked as the answer   
    Valeu Daniel, era isso  mesmo, tinha uma rotina o evento DrawColumnCell, assim:
    begin
      //inverte a cor quando selecionado
      if gdSelected in State
      then
        begin
          TDBGrid( Sender ).Canvas.Brush.Color := clHighlight;
          TDBGrid( Sender ).Canvas.Font.Color  := clHighlightText;
          TDBGrid( Sender ).Canvas.Pen.Color := Brush.Color;
        end
      else
        begin
          if DMBDComum.IbQrPesquisaPRO_DESATIVADO.AsString = '1'
          then
            TDBGrid( Sender ).Canvas.Font.Color := clRed;
          if DMBDComum.IbQrPesquisaPRO_SELECIONADO.AsString = '1'
          then
            TDBGrid( Sender ).Canvas.Font.Color := clBlue;
        end;
      TDBGrid( Sender ).DefaultDrawColumnCell( Rect, DataCol, Column, State );
    end;
    a última linha, TDBGrid( Sender ).DefaultDrawColumnCell( Rect, DataCol, Column, State );, estava no lugar errado, tem que ser antes do end, assim:
    begin
      //inverte a cor quando selecionado
      if gdSelected in State
      then
        begin
          TDBGrid( Sender ).Canvas.Brush.Color := clHighlight;
          TDBGrid( Sender ).Canvas.Font.Color  := clHighlightText;
          TDBGrid( Sender ).Canvas.Pen.Color := Brush.Color;
        end
      else
        begin
          if DMBDComum.IbQrPesquisaPRO_DESATIVADO.AsString = '1'
          then
            TDBGrid( Sender ).Canvas.Font.Color := clRed;
          if DMBDComum.IbQrPesquisaPRO_SELECIONADO.AsString = '1'
          then
            TDBGrid( Sender ).Canvas.Font.Color := clBlue;
          TDBGrid( Sender ).DefaultDrawColumnCell( Rect, DataCol, Column, State );
        end;
    end;
  20. cefantacini's post in Impressão em Bobina no Fortes was marked as the answer   
    Já deu certo, as propriedades eram as que eu setei mesmo, nem precisei usar o RLDraftFilter.
    O problema é que eu estava definindo as propriedades em tempo de projeto e em tempo de execução eu setava o tamanho da página como a4 novamente.
     
  21. cefantacini's post in Iniciante no Fortes Report was marked as the answer   
    Valeu Juliomar, resolvi o prolema vendo esse vídeo:
     
×
×
  • 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.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...