Ir para conteúdo
  • Cadastre-se

cefantacini

Membros
  • Total de ítens

    368
  • 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.