Ir para conteúdo
  • Cadastre-se

Gumercino

Membros
  • Total de ítens

    54
  • Registro em

  • Última visita

Posts postados por Gumercino

  1. Boa tarde.

    Então, eu utilizo o mesmo padrão para os demais componentes de DFe, como NFE, CTe e MDFe, e não tenho esse problema que estou tendo com a NFSe. Revisei todo meu código e não consegui encontrar nada que estivesse causando esse erro. Trabalho com thread para diversas outras coisas. Vou dar uma olhada no link que você mencionou acima, e ver se encontro alguma coisa.

    O passo a passo é o seguinte:

    - Tenho um form para a tela de NFSe;

    - Chamo um form de animação para cada rotina da NFSe (Enviar, Consultar por Lote, Consultar por RPS e Cancelar);

    - Dentro desse form de animação eu chamo a thread da seguinte maneira:

    procedure TFMensagem.ExecutarNFSeProvedorABRASF;
    var
      vThread: TThreadNFSeProvedorABRASF;
    begin
      vThread                 := TThreadNFSeProvedorABRASF.Create(True);
      vThread.FreeOnTerminate := True;
      vThread.Start;

    end;

    - Ao finalizar a thread ela fecha o form de animação retornando ao form da NFSe.

     

    Não acontece erro algum até esse momento, consigo trabalhar normalmente com as demais telas do sistema, pois o erro só ocorre quando fecho o form da NFSe após ter executado alguma rotina da NFSe.
     

    A thread esta em anexo, e caso necessite de mais alguma informação ou esclarecimento, estou a disposição.

         

    UThreadNFSeProvedorABRASF.pas

  2. Bom dia.

    Estou tendo um problema com o componente ACBrNFSe, e acredito que necessite de alguma ajuste, pois utilizo o mesmo método para os demais componentes de DFe. Segue resumo abaixo:

    - Eu tenho um form para a tela de NFSe, e para enviar o Lote RPS eu chamo uma Thread, o envio é feito normal mas quando eu vou fechar o form da NFSe, ele acusa o erro "System error, code 1400. O identificador da janela é inválido".

    Já tive esse erro em outras ocasiões, pois trabalho muito com Thread, mas revisei tudo na minha rotina e não identifiquei nenhum problema referente a esse assunto, então acredito que no momento que vou fechar o form, a Thread ainda esteja aberta por algum motivo, ocasionando assim o erro.

    Desde já, fico a disposição para qualquer esclarecimento no intuito de identificar e resolver o erro.

  3. Boa tarde Italo.

    Desculpe a demora mas estava resolvendo uma demanda com um cliente.

    Então, após a atualização dos fontes e realização de novos testes, o erro ainda permanece ocorrendo na seguinte situação:

    1° - Faço o envio da NFSe pelo método ACBrNFSe1.Enviar;

    2º - Faço a consulta da NFSe pelo método ACBrNFSe1.ConsultarLoteRps logo após o envio para verificar a situação da mesma;

    3º - Executo o método ACBrNFSe1.NotasFiscais.Clear.

    O erro esta ocorrendo na unit pnfsNFSe na linha 962.

  4. pnfsNFSe.thumb.png.4d0e8e35b0bf333a7a9c9ede63b80054.pngBoa noite Italo.

    Acredito que eu encontrei aonde esta o erro.

    Na unit pnfsNFSe a function TItemServicoCollection.New entrou no lugar da function TItemServicoCollection.Add, o que estava ocorre ndo é que dentro da function TItemServicoCollection.New tem a chamada da function TItemServicoCollection.Add.

    Eu comentei a linha 1204, que se refere ao que citei acima e rodei o programa sem erro.

    Segue imagem para melhor entendimento.

  5. Boa tarde Italo.

    Sim, reinstalei todos novamente.

    Eu utilizo o seguinte método para adicionar os serviços, "Servico.ItemServico.Insert(Index, AObject)" e antes não tinha esse parâmetro AObject.

    Mas eu estou passando ele de acordo com o que esta na função LerRps_EL, "Servico.ItemServico.Insert(Index, Servico.ItemServico.New)".

    Não sei se pode estar vinculado.

     

  6. Boa tarde.

    Após a atualização do ACBr, comecei os testes e identifiquei que estou tendo retorno do erro "invalid pointer operation" na linha 962 da unit pnfsNFSe.

    O erro sempre ocorre após eu carregar o componente com o arquivo .xml pelo método "LoadFromString" e efetuar qualquer operação com o webservice ou até mesmo após a impressão.

    Segue imagem do erro e da unit com a linha especificada.

    pnfsNFSe.png

    Erro.png

  7. Bom dia a todos.

    No meio da preparação de uma rotina de faturamento, aonde ao enviar por o(s) boleto(s) no layout fatura e os respectivos documentos que compõem o mesmo, identifiquei que a propriedade ACBrNFSeDANFSeFR.ArquivoPDF não esta retornando nenhum valor, tendo em vista que a mesma propriedade é preenchida no ACBrNFeDANFEFR.

    Verifiquei e comparei as unti's e quero deixar uma solicitação/sugestão para que seja incluída a rotina no componente assim que imagem em anexo.

    Desde já agradeço o atenção e fico no aguardo de retorno.

    Abraço a todos.

    ACBrNFSe.jpeg

  8. Boa tarde a todos.

    Após a última atualização que fiz do ACBr, eu tive problema na impressão da NFSe do Provedor EL pelo FastReport, e após analisar identifiquei o problema e estou postando a Unit para que possa ser atualizada no repositório.

    Obs.: Não alterei nenhuma função, apenas comentei as linhas 251, 252 e 253 e coloquei as mesmas no início da função, como imagem em anexo.

    ACBrNFSeDANFSeFR.png

    ACBrNFSeDANFSeFR.pas

  9. Bom dia BILLI579 e Gr@c@.

    Ainda permanece a situação do tamanho da conta esta definida para o tamanho 12, e toda vez tenho que alterar para o tamanho 8 manualmente.

    Algum de vocês teve um posicionamento se será ajustado ou alguma outra maneira de alterar?

  10. NatyEb, bom dia.

    Verifiquei com Italo e os fontes estão corretos, apenas foi alterado a parte que você citou acima, tendo que passar para baixo a alimentação da variável "AValorToal".

    Já fiz a alteração, encaminhei para Italo e ele vai atualizar.

    Abraços

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