Ir para conteúdo
  • Cadastre-se

JMOURAJR

Membros
  • Total de ítens

    24
  • Registro em

  • Última visita

Posts postados por JMOURAJR

  1. Amigos, boa tarde!

     

    Por favor uma ajuda:

    Fiz a atualização do ACBr e ao utilizar o ACBrInstall, na compilação dos pacotes, esta me gerando dois erros, sendo estes para os pacotes ACBr_NFe2.dpk e ACBrNFeDanfeRVCodeBase.dpk.

    Anexei o arquivo de log, para melhor compreensão.

    Toda e qualquer ajuda é muito bem vinda.

     

    Agradeço a atenção de todos.

     

    Abraços.

     

    José de Moura

  2. Régys, boa tarde!

     

    É isso mesmo.

    Acima, no primeiro post, eu mencionei a chave de acesso da NF-e (35130613378171000109550000000033171000033173), para que se pudesse ver na consulta, que havia sido registrado a carta de correção.

    Por isso que estou estranhando e perdido com esta situação, pois me retorna o erro e meu aplicativo não segue em frente, pois com o erro ele sai e sequer grava os retornos e nem o XML.

     

    Grande abraço!

     

    José de Moura

     

    Ps: O trem bão sô. (sobre Araxá vamos falar em PVT. Ok?).

     

    Abraços a todos da lista também.

  3. Prezados amigos bom dia!

     

    Por favor uma ajuda:

    A tempos que não tenho que utilizar a CC-e aqui na empresa, fiz as atualizações devidas quanto ao envio por evento mas:

     

    Esta retornando o erro código: 573 - Duplicidade de evento (tpEvento + chNfe + nSeqEvento), acredito ser conforme, estive lendo em alguns post do amigo Régys, o número sequencial do evento, mas acontece que ao consultar a NFe na base da SEFAZ, consta o envio da correção.

     

    NFe chave de acesso: 35130613378171000109550000000033171000033173

     

    Que papagaida estou fazendo?

     

    Agradeço pela atenção de todos.

     

    Abraços.

     

    José de Moura 

     

    Linhas do código:

    ...

        NumeroLote := StrToInt(FormatDateTime('yymmddhhmm', NOW));
        ACBrNFe1.EventoNFe.Evento.Clear;
        ACBrNFe1.EventoNFe.idLote := NumeroLote;
        with ACBrNFe1.EventoNFe.Evento.Add do begin
            infEvento.chNFe                := Chave;
            infEvento.cOrgao                        := StrToInt(Copy(Chave,1,2));
            infEvento.CNPJ                           := CNPJ;
            infEvento.dhEvento                     := now;
            infEvento.tpEvento                      := teCCe;
            infEvento.nSeqEvento                 := StrToInt(nSeqEvento);
            infEvento.versaoEvento               := '1.00';
            infEvento.detEvento.descEvento := 'Carta de Correção';
            infEvento.detEvento.xCorrecao   := Correcao;
            infEvento.detEvento.xCondUso    := ''; //Texto fixo conforme NT 2011.003 -  http://www.nfe.fazenda.gov.br/portal
        end;
        ACBrNFe1.EnviarEventoNFe(StrToInt(idLote));
        MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetWS);
        LoadXML(MemoResp, WBResposta);


      if ACBrNFe1.EnviarEventoNFe(NumeroLote) then begin
        with ACBrNFe1.WebServices.EnvEvento do begin
          if not(EventoRetorno.retEvento.Items[0].RetInfEvento.cStat in [135, 136]) then begin
            raise EDatabaseError.CreateFmt(
              'Ocorreu o seguinte erro ao enviar a carta de correção:'  + sLineBreak +
              'Código:%d' + sLineBreak +
              'Motivo: %s', [
                EventoRetorno.retEvento.Items[0].RetInfEvento.cStat,
                EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo
            ]);
          end;

          // retornos
          DataHoraEvento   := EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento;
          NumeroProtocolo  := EventoRetorno.retEvento.Items[0].RetInfEvento.nProt;
          XMLCCe                := EventoRetorno.retEvento.Items[0].RetInfEvento.XML;
          CodigoStatus        := EventoRetorno.retEvento.Items[0].RetInfEvento.cStat;
          MotivoStatus         := EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo;
        end;
      end else begin
        with ACBrNFe1.WebServices.EnvEvento do begin
          raise Exception.Create(
            'Ocorreram erros ao enviar a Carta de Correção:' + sLineBreak +
            'Lote: '     + IntToStr(EventoRetorno.idLote) + sLineBreak +
            'Ambiente: ' + TpAmbToStr(EventoRetorno.tpAmb) + sLineBreak +
            'Orgao: '    + IntToStr(EventoRetorno.cOrgao) + sLineBreak +
            sLineBreak +
            'Status: '   + IntToStr(EventoRetorno.cStat) + sLineBreak +
            'Motivo: '   + EventoRetorno.xMotivo
          );
        end;
      end;
     

     

  4. Amigos, boa tarde!

     

    Já que a "Lei da transparência dos impostos", faz com que tenhamos que mencionar, nas NFes e Cupons fiscais, a carga tributária dos impostos dos produtos, informando ao consumidor sobre os mesmos, pergunto:

    E no caso de emissão de NFe pelo fabicante para uma revenda ou loja, faz-se necessário informar tanto no arquivo XML quanto na DANFE, esta(s) informação(ões)?

     

    Obrigado pela atenção.

     

    Abraços a todos.

     

    José de Moura

     

  5. Regys por favor!

     

    A instalação ocorreu 100% via ACBrInstall, mas ao tentar compilar o meu aplicativo, surgiu o seguinte erro:

     

    "debugger kernel bordbk70.dll is missing or not registered"

     

    Rodei o seguinte comando pelo "DOS":  REGSVR32 bordbk70.dll - e OK registrado com exito.

     

    Mas ao tentar compilar novamente retorna o mesmo erro.

     

    Você tem alguma idéia para que eu possa corrigi-lo.

     

    Mais uma vez muito obrigado!

     

    José de Moura

  6. Amigos, boa tarde!

     

    Desculpe pela repetição, mas também não estou tendo sucesso.

    Já movi a pasta, movi todas as pastas, deletei-as e baixei toda o ACBR novamente (23/05), via svn, e o erro persiste, conforme abaixo.

    Eu utilizo o Delphi 7.

    Agradeço alguma luz para resolve-lo.

     

    Abraços a todos.

     

    José de Moura

     

    [Error] ACBrSocket.pas(653): Too many actual parameters
    [Error] ACBrSocket.pas(657): Undeclared identifier: 'DecodeToSys'
    [Fatal Error] ACBrTCP.dpk(46): Could not compile used unit '..\..\Fontes\ACBrTCP\ACBrSocket.pas'
     

  7. Prezados amigos, boa tarde!

    Por favor uma pequena ajuda.

    Estou implantando, junto ao meu aplicativo de NFe (que funciona OK), o processo de Carta de Correção eletrônica (CCe), porém ao enviar a correção (seguindo-se como exemplo o ACBR Monitor) me retorna o erro: Número de Série do Certificado Digital não especificado !, uma vez que o certificado/path esta sendo especificado na abertura do aplicativo de NFe.

    Redeclarei todos os valores de configuração que são pegos na abertura do form principal (para emissão da NFe) e nada .

    - O que posso estar fazendo de errado (Ou esquecendo de declarar.) ?

    Obs: Criei um novo Form para trabalhar com a Carta de Correção. (utilizo Delphi 7)

    Agradeço muito pela atenção.

    Grande abraço a todos e um prospero 2012, cheio de paz e saúde.

    José de Moura

  8. Prezados amigos, boa tarde!

    Por favor uma ajuda:

    Acabei de ser incumbido de criar, organizar e colocar em pratica, até final de janeiro de 2012, todo o processo de implantação do Sped. Sendo primeiro o Sped PIS/COFINS e um pouco mais a frente o Sped Fiscal.

    A ajuda que peço é:

    Por onde eu posso começar a estudar e desenvolver algum aplicativo para tais processos?

    O componente ACBr pode me ajudar?

    Na empresa, a qual trabalho, o sistema de apuração de impostos é lucro presumido e já utilizo o ACBr para a emissão de NFe (Notas fiscais eletrônicas).

    Agradeço de ante-mão quaisquer dicas, para começar a por a mão na massa (Pois tenho pouco tempo, e o nosso contador acabou de enviar uma carta sobre esta obrigatoriedade).

    Um grande abraço a todos.

    José de Moura Reis Jr.

  9. Prezados amigos, bom dia!

    Há tempos venho emitindo NFe p/ o estado de Minas Gerais e nunca tive problemas, mas hoje me surgiu este erro:

    -> total da bc icms difere do somatório dos itens...

    Peço por favor, se possível, uma ajuda ou uma luz para o que posso estar errando, pois já vasculhei e não encontrei nada. Anexei junto a este o

    arquivo XML.

    35111113378171000109550000000004271000004270-nfe.xml

    Um grande abraço a todos e obrigado pela atenção.

    José de Moura

  10. Prezados amigos, bom dia!

    Por favor uma ajuda:

    Até o ontem efetuei a emissão de NFes (de venda, ou remessa p/ industrialização) normalmente, só que hoje, já não consigo mais emiti-las.

    Sendo que me retorna a seguinte rejeição: Total do PIS difere do somatório dos itens sujeitos ao ICMS.

    O que pode estar ocorrendo?

    Sem mais e agradeço antecipadamente.

    José de Moura

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