Ir para conteúdo
  • Cadastre-se

pcbonetti

Membros
  • Total de ítens

    57
  • Registro em

  • Última visita

Posts postados por pcbonetti

  1. Pois é Italo, estou trabalhando exatamente numa solução por esse caminho: Abro o XML em um IXMLDocument para identificar o município antes de ler o XML. Porém meu medo é que caso exista um volume muito grade de XMLs isso acarrete em lentidão no sistema.

    • Curtir 1
  2. Existe alguma maneira do ACBrNFSeX identificar o provedor na hora e que lê o XML? Procurei no programa exemplo e não encontrei.

    Com o advento do Reinf 2.1.2 meus clientes precisam importar o XMLs de serviços tomados e nesse caso existem serviços tomados de diversos municípios o que fica inviável de setar o Município/Provedor antes de ler o XML.

  3. 1 hora atrás, Gabriel Lazarin disse:

    Bom dia amigos!

    Realizei a atualização agora dos fontes, reinstalei e tentei inclusive adicionar o ajuste sugerido acima, mas não funcionou. Pelo que percebi nem chega nesse ponto.

    Caso ajudar Italo, posso fornecer dados de acesso para testes.

    Mensagem.thumb.png.ef18e2940cbb668bad06e0d13e071878.png

    Você sabe me dizer qual versão da SmarApd é usada em Cariacica?

    2 minutos atrás, pcbonetti disse:

    Você sabe me dizer qual versão da SmarApd é usada em Cariacica?

    image.png.b5c53b37461e30b8124b9f943653794c.png

     

    Achei aqui, é a mesma de Vila Velha. Com a alteração que eu sugeri estou conseguindo emitir, consultar, cancelar, etc. Experimente sobrescrever a unit com a que eu coloquei aí em cima e de um Build All na sua aplicação.

    • Curtir 1
  4. 1 hora atrás, Italo Giurizzato Junior disse:

    Boa tarde Gabriel,

    Após atualizar os fontes você reinstalou o ACBr e recompilou a aplicação?

    Boa tarde Ítalo. 

    Estou acompanhando o post pois Vila Velha está exatamente com o mesmo problema, afinal também é Smarapd. Eu reinstalei inclusive removendo arquivos antigos e dei um Build All na aplicação e o erro é exatamente o que o Gabriel colocou aí cima

  5. Senhores, estou tentando emitir NFSe para a prefeitura de Cachoeiro do Itapemirim utilizando o envio do RPS porém estou recebendo a mensagem de erro em anexo. Todos os fontes estão atualizados e inclusive recompilei ACBrNFSeXServicos.res. Coloco anexo os XMLs gerados e recebidos e assim como o código utilizado para o envio. (tentei nos modos síncrono, assíncrono e automático).

    <code>

      Try
        Configura;
        NFSe.Emitir(IntToStr(Lote), Metodo, False);
        Result := ChecarResposta(IIf(Metodo = meLoteAssincrono, tmRecepcionar, tmRecepcionarSincrono));
      Except
        On E: Exception Do
          MostraErroValidacao(E.Message, True);
      End;


    </code>

    image.png.0cc2e37bbc95f489f6d595608d3af713.png

     

    467-env-lot-sinc.xml 467-env-lot-sinc-soap.xml 467-lista-nfse-sinc.xml 467-lista-nfse-sinc-soap.xml

  6. Em 02/03/2021 at 16:42, Italo Giurizzato Junior disse:

    Boa tarde Bonetti,

    A unit que você anexou tem muito mais alterações do que apenas essa que você colocou na figura.

    Não entendi o porque foi criado uma nota unit para ler o XML do provedor EL e o que vem a ser o LerCampos.

    Em tempo: LerCampos foi outro teste antigo que eu fiz.

    Agora que vi a confusão que fiz, eu precisei formatar meu HD e vi que voltei um backup antigo da pasta ACBr e depois atualizei pelo SVN fazendo um merge, vou apagar a pasta e atualizar novamente.

  7. Em 02/03/2021 at 16:42, Italo Giurizzato Junior disse:

    Boa tarde Bonetti,

    A unit que você anexou tem muito mais alterações do que apenas essa que você colocou na figura.

    Não entendi o porque foi criado uma nota unit para ler o XML do provedor EL e o que vem a ser o LerCampos.

    Boa Tarde Ítalo,

     

    Fui verificar aqui e vi que peguei uma unit velha em que eu estava fazendo alguns testes antes do ACBr disponibilizar o provedor EL.

    Peço que por favor despreze essa que enviei vou reverter aqui e fazer a alteração novamente.

     

  8. 22 horas atrás, BigWings disse:

    O método TACBrTXTClass.LFill é genérico, não se deve levar apenas o Sped Fiscal em consideração, e essa alteração pode causar efeito colateral em algum lugar. Rodando os testes unitários não detectou nenhum problema, mas nunca se sabe.

    Acho que o mais correto é mover o Trim acima do IF que preenche os caracteres à esquerda, assim mantém-se a finalidade do método, que é preencher os caracteres à esquerda e corrige possíveis erros de input.

    De fato você está certo. Eu não havia prestado atenção no IF acima. Fiz a modificação e estou anexando a unit.

    ACBrTXTClass.pas

    • Curtir 1
  9. Aconteceu no registro 0150 nos campos de Nome e endereço. Na verdade foi erro do meu cliente que ao digitar o cadastro colocou espaços no primeiro caracter. Erro de digitação mesmo.

    Porém como vi que o componente tem o recurso de dar um TRIM achei que deveria ser feito assim, afinal não existe nenhum campo dos SPEDs que aceitam espaços no início do campo.

     

  10. Boa tarde,

    Sei que existem outros tópicos sobre isso, mas todos os que entrei estavam exibindo um aviso de que o tópico é muito antigo sugerindo a criação de um novo. Então vamos lá:

    De algumas atualizações para cá venho tendo problemas ao imprimir a NFCe com Fast Report, pois as configurações de margens não estavam sendo respeitadas. Percebi que vários amigos aqui tem o mesmo problema. Depois de alguns testes consegui resolver alterando a procedure TACBrNFeFRClass.AjustaMargensReports acrescentando apenas uma linha na mesma, que está em negrito no texto abaixo. Vou anexar a unit para avaliação.

    procedure TACBrNFeFRClass.AjustaMargensReports;
    var
      Page: TfrxReportPage;
      I: Integer;
    begin
      for I := 0 to (frxReport.PreviewPages.Count - 1) do
      begin
        Page := frxReport.PreviewPages.Page;
        if (DANFEClassOwner.MargemSuperior > 0) then
          Page.TopMargin := DANFEClassOwner.MargemSuperior;
        if (DANFEClassOwner.MargemInferior > 0) then
          Page.BottomMargin := DANFEClassOwner.MargemInferior;
        if (DANFEClassOwner.MargemEsquerda > 0) then
          Page.LeftMargin := DANFEClassOwner.MargemEsquerda;
        if (DANFEClassOwner.MargemDireita > 0) then
          Page.RightMargin := DANFEClassOwner.MargemDireita;
        frxReport.PreviewPages.ModifyPage(I, Page);
      end;
    end;

    ACBrNFeDANFEFRDM.pas

    • Curtir 2
  11. Em 17/03/2020 at 08:14, Italo Jurisato Junior disse:

    Bom dia Antônio,

    O eFrete não disponibilizou os Schemas para que fosse possível a validação antes do envio, infelizmente.

    Bom dia Bonetti,

    Pelo que eu entendi no paragrafo:

    "Art. 25 As IPEFs terão 90 (noventa) dias para adequar seus sistemas informatizados, a contar da data de entrada em vigor desta Resolução." (NR)

    Os 90 dias devem ser contados a partir da data da publicação da Resolução 5.862 de 17 de dezembro de 2019 e não a partir da publicação da Resolução 5.873 de 10 de março de 2020.

    Se essa interpretação estiver correta então a obrigatoriedade realmente será a partir do dia 15/04/2020.

     

    Bom dia Ítalo,

    Eu interpretei como sendo a data de publicação no DOU da NR 5873, pois é o texto "desta Resolução" dá a entender isso.

    Além disso, se for contar a partir da resolução 5862 o prazo teria sido em 16/03/2020 (que seria o prazo anterior e foi prorrogado) e não 15/04/2020

    De qualquer forma estou correndo aqui pra terminar o sistema ainda essa semana e entrar em processo de homologação com a eFrete

  12. 7 horas atrás, robinhovrb disse:

    Bom dia;

    RESOLUÇÃO Nº 5.873, DE 10 DE MARÇO DE 2020

    Art. 1º Alterar o caput do art. 25 da Resolução nº 5.862, de 17 de dezembro de 2019, que passa a vigorar com a seguinte redação:

    “Art. 25 As IPEFs terão 90 (noventa) dias para adequar seus sistemas informatizados, a contar da data de entrada em vigor desta Resolução.” (NR)

    https://blogdocaminhoneiro.com/2020/03/antt-amplia-novamente-o-prazo-para-ipefs-se-adequarem-ao-ciot-para-todos/

    Obrigado pela informação. Verifiquei no site do Diário Oficial da União e realmente a resolução foi publicada lá.

  13. [RESOLVIDO]. Recebi o link de uma nova imagem ISO pelo meu email, instalei e funcionou corretamente. Peço desculpas por não ter lido o log, aliás nunca tinha prestado atenção àquela mensagem ao final do instalador, sempre clicava em não e pronto. Total falta de atenção minha :)

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