Ir para conteúdo
  • Cadastre-se

alexandre.abaco

Membros
  • Total de ítens

    148
  • Registro em

  • Última visita

Posts postados por alexandre.abaco

  1. Bom dia!!!

    estou com um problema ao enviar email da NFe com PDF.... no comando abaixo do DEMO NFe, se uso TRUE para mandar o PDF da o erro anexo.

    ACBrNFe1.NotasFiscais.Items[0].EnviarEmail( Para, edtEmailAssunto.Text,
                                                   mmEmailMsg.Lines
                                                   , True // se Deixo FALSE envia sem problema apenas o XML... com TRUE da erro
                                                   , CC   
                                                   , nil);

     

    erro AcbrMail.JPG

  2. Juliomar.. boa tarde!

    estou com o mesmo problema citado pelo Ricardo, utilizando o Delphi 7 e trunk

    "rlVenda: Erro durante a preparação do relatório. EAcess Violation...."

    este erro acontece ao imprimir o cupom SAT ACBR... o que preciso fazer, apenas rodar o apagaACBR.bat? isso vai dar algum problema no meu acbr ja instalado? 

    ja utilizo o Trunk2, mesmo assim preciso atualizar a Versão? (apenas clicando com o botão direito sobre a pasta ACBR e "SVN ATualizar",)

    Como recompilar com o acbrInstal, preciso fazer isso tb?? 

     

    no aguardo.

     

    att

    Alexandre

  3. Bom dia Galera...

    Estou usando o AcbrBoleto pela primeira vez e meu cliente pediu para adicionar o logo dele no boleto. Utilizo o Trunk2 com fortesreport

    Gostaria de saber como faço para editá-lo... qual arquivo abrir? de qual pasta? basta apenas edita-lo? essa mudança ira mudar para outro projeto que eu utilize posteriormente, se sim, tem como deixar essa alteração apenas para este cliente?

    Segue EXEMPLO do boleto anexo.

     

    no aguardo.

    obrigado

    Alexandre

    BOLETOExemplo.JPG

  4. Bom dia!!

     

    tenho um cliente que utiliza a impressora HP OFFICEJET PRO X451dw e quando mando imprimir demora mais de 5min cada Danfe. Na versão Trunk imprimia normalmente, esta lento após atualização para o Trunk2. (AcbrNfe1.Danfe:=ACBrNFeDANFeRL1)

    Utilizo o sistema via TS no Windows Server 2008R2

     

    att

    Alexandre

  5. Boa tarde!!

    esta acontecendo com frequencia o erro de digestvalue em meus clientes. Pelo que li e entendi isso ocorre quando assino novamente a nova e tento envia-la novamente usando o loadfromfile, só que não estou utilizando este comando. 

    segue abaixo minha rotina de envio da NFe.

    GeraNota;

      try
        ACBrNFe1.Enviar(StrToint(edtNf.Text), TRUE);
      except
        if ACBrNFe1.NotasFiscais.Items[0].Alertas <> '' then
          ShowMessage(ACBrNFe1.NotasFiscais.Items[0].Alertas)
        else
        begin
          While true do
          begin
            ShowMessage('Erro: '+IntToStr(ACBrNFe1.WebServices.Retorno.cStat)+'-'+ACBrNFe1.WebServices.Retorno.xmotivo);

            if ACBrNFe1.WebServices.Retorno.cStat = 204 then
            begin
              i := Pos('[nRec:',ACBrNFe1.WebServices.Retorno.xmotivo);
              frmImpNF.tabVendaNrRecibo.value:=copy(ACBrNFe1.WebServices.Retorno.xmotivo,i+6,15);
            end;

           //guardo os campos na tabela

           if frmImpNF.tabVendaNrRecibo.AsString = '' then
              frmImpNF.tabVendaNrRecibo.value:=ACBrNFe1.WebServices.Retorno.Recibo;
            frmImpNF.tabVendaChaveNFe.value:=AcbrNFe1.WebServices.Retorno.ChaveNFe;
            frmImpNF.tabVendaNumeroLote.value:=edtNf.Text;
            

            // Consulta  NFe, pra pegar o protocolo
            ACBrNFe1.Consultar;

            if ACBrNFe1.WebServices.Consulta.cStat = 100 then
            begin
              frmImpNF.tabVendaNrProtocolo.value:=ACBrNFe1.WebServices.Consulta.Protocolo;

              //salvar o arquivo -PRocNFE.xml
              NomeArq := ACBrNFe1.NotasFiscais.Items[0].NomeArq;
              if pos(UpperCase('-nfe.xml'),UpperCase(NomeArq)) > 0 then
                 NomeArq := StringReplace(NomeArq,'-nfe.xml','-procNfe.xml',[rfIgnoreCase]);

              NomeArq := ExtractFileName(NomeArq);
              ACBrNFe1.NotasFiscais.Items[0].GravarXML(NomeArq);

              // Gerar PDF
              ACBrNFe1.NotasFiscais.ImprimirPDF;

              // Gerar DANFE
              ACBrNFe1.NotasFiscais.Imprimir;

              BReak;
            end;
                                                 
            if MessageDlg('Erro no envio da NFe. Consultar Novamente?',mtConfirmation,[MbYes,mbNo],0)=mrNo then
              Break;
          end;
        end;

        // salva o arquivo XML na pasta log
        NomeArq := ACBrNFe1.NotasFiscais.Items[0].NomeArq;

        NomeArq := ExtractFileName(NomeArq);
        ACBrNFe1.NotasFiscais.Items[0].GravarXML(NomeArq);
      end;

  6. Boa tarde!!

    atualizei o componente e instalei o AcbrGnre sem nenhum problema. Ele já esta funcionando normalmente? pois quando executo o DEMO da o seguinte erro ao clicar no botao "Consulta Configuração UF": URL não definida para a TAG: TGnreConsultaUF (conforme anexo)

    no aguardo.

     

    att

    Alexandre

     

    erroGNRE.JPG

    erroGNRE.JPG

  7. Italo.... no exemplo NFe acontece o mesmo erro.

    Clico no botão "Adicionar nfeProc ao XML" , escolhe um XML valido (assinado e com protocolo recebimento = 100) e ao Gravar da o mesmo erro.

    Configuracoes.Arquivos.Salvar :=True;  

    PathNFe:='C:\TarpanParts\XmlGerado'

    Segue arquivo anexo pra tentar executar a Rotina.

    --- outra maneira de enviar  ------

    Se eu deixar a  Configuracoes.Arquivos.Salvar :=True, obtenho o arquivo Valido e Assinado (anexo) mas não consigo renomea-lo para "procNfe"... 

    ----  outra duvida ------

    NomeArq := ACBrNFe1.NotasFiscais.Items[0].NomeArq; (exemplo: neste comando estou movendo C:\Tarpan\Xmlgerado\12345.xml, como faço pra pegar APENAS o nomedo arquivo 12345.xml)??

     

    Não estou conseguindo gerar o arquivo validado de forma correta....por favor... preciso disso com MUITA urgência

     

    obrigado.

    att

    Alexandre

     

     

    35160105591213000159550010000011621053860804-nfe.xml

  8. Italo.. bom dia!!

    Mudei a propriedade Configuracoes.Arquivos.Salvar :=False, resolveu o erro mas não gera o arquivo com a Extensão procNFe.

    o comando ACBrNFe1.NotasFiscais.Items[0].NomeArq; vem vazio... por isso não funciona a rotina abaixo

    NomeArq := ACBrNFe1.NotasFiscais.Items[0].NomeArq;
          if pos(UpperCase('-nfe.xml'),UpperCase(NomeArq)) > 0 then
             NomeArq := StringReplace(NomeArq,'-nfe.xml','-procNfe.xml',[rfIgnoreCase]);

    como proceder neste caso?

     

    att

    Alexandre

  9. Italo... boa tarde!!

    Desculpa minha ignorância, mas não entendi sua resposta.  Eu usava desta maneira na versão anterior e funcionava.  Apos o envio, não é preciso renomear o arquivo (add o procNFe)? esta rotina não esta correta?  Esses comandos constam no exemplo do trunk2

     como faço pra tirar esse caminho?? ou, o que estou fazendo de errado que não consigo salvar o arquivo xml?

    att

    Alexandre

     

  10. Italo... abaixo a minha rotina;

        IntToStr(ACBrNFe1.WebServices.Retorno.cStat) = '100' then
        begin
           // gravos OS dados no meu banco.

          NomeArq := ACBrNFe1.NotasFiscais.Items[0].NomeArq;
          if pos(UpperCase('-nfe.xml'),UpperCase(NomeArq)) > 0 then
             NomeArq := StringReplace(NomeArq,'-nfe.xml','-procNfe.xml',[rfIgnoreCase]);


          //ate aqui o caminho vem correto.. qdo chama a Unit  (acbrNfeNotasFiscais) que DUPLICA o caminho do arquivo... segue rotina abaixo.


          ACBrNFe1.NotasFiscais.Items[0].GravarXML(NomeArq);  // AQUI que ocorre o erro

          // Gerar PDF
          ACBrNFe1.NotasFiscais.ImprimirPDF;
        end

     

    Unit... AcbrNfeNotasFiscais.

    function NotaFiscal.CalcularNomeArquivoCompleto(NomeArquivo: String;
      PathArquivo: String): String;
    begin
      if EstaVazio(NomeArquivo) then
        NomeArquivo := CalcularNomeArquivo;

      if EstaVazio(PathArquivo) then
        PathArquivo := CalcularPathArquivo
      else
        PathArquivo := PathWithDelim(PathArquivo);

      Result := PathArquivo + NomeArquivo; //aqui esta juntando 2x o caminho do arquivo.
    end;

    no aguardo.

    att

    Alexandre

  11. Boa tarde.

    utilizo o Trunk2 e ocorre um erro  ao emitir uma Nfe (ao fechar o Danfe). 

    ACBrNFe1.Configuracoes.Arquivos.PathNFe:='C:\TarpanParts\XmlGerado';
     ACBrNFe1.Configuracoes.Arquivos.PathSalvar:='C:\TarpanParts\XmlGerado';
     ACBrNFe1.Configuracoes.Arquivos.PathSchemas:='C:\TarpanParts\XmlGerado';

     ACBrNFe1.Configuracoes.Arquivos.PathEvento:='C:\TarpanParts\XmlGerado';

    o componente esta duplicando o caminho e da erro ao salvar os arquivos PDF e proc-NFe.

    Segue erro abaixo:

    Att

    Alexandre

    Erro_ao_Salvar.JPG

  12. Regys e Maxi... resolvi o problema. Os schemas não estavam atualizados. baixei do site, joguei dentro da pasta schemas\ve310 e as Nfes foram aceitas.

    O curioso é que baixei o programa do governo, simulei as mesmas nfes e ocorreram os mesmos problemas. muito estranho isso.... por causa disso que pensei que o problema NÃO eram nos schemas.

    me desculpe pelo transtorno.

    att

    Alexandre

     

     

    • Curtir 1
  13. Regys.... tudo bem!! Voce acabou respondendo ao Daxxi e não a minha pergunta. No meu xml consta a tag <pICMSInterPart>40
     
     O erro Rejeicao 697 hoje já não aparece mais.. sem mudança alguma. rsrs 

    Rejeicao 793 passo as seguintes tags, conforme arquivo anexo. 

    <vBCUFDest>100.00</vBCUFDest>

    <pFCPUFDest>2.0000</pFCPUFDest>
    <pICMSUFDest>18.0000</pICMSUFDest>
    <pICMSInter>12.00</pICMSInter>
    <pICMSInterPart>40.0000</pICMSInterPart>
    <vFCPUFDest>2.00</vFCPUFDest>
    <vICMSUFDest>2.40</vICMSUFDest>
    <vICMSUFRemet>0.00</vICMSUFRemet

    <vFCPUFDest>2.00</vFCPUFDest>

    <vICMSUFDest>2.40</vICMSUFDest>

    pelo que pesquisei e o que me passaram os cálculos estão corretos.

    o que seria essa instrução " vBCUFDest * pFCPUFDest (*4) "??

    Anexos:

    NFe 1146 consta o erro acima

    NFe 1147, o xml esta Válido, mas mesmo assim não não consigo imprimir pelo ACBR. (sem o fundo de pobreza)

    no aguardo

    att

    Alexandre

    1146-nfe.xml

    1147-nfe.xml

  14. Regys.... tudo bem!!
     
    Rejeicao 697 Uso a  tag:pICMSInter = 12 e a  <orig>0</orig>, não era pra cometer este erro.

    Rejeicao 793 passo as seguintes tags, conforme arquivo anexo.

    <vBCUFDest>100.00</vBCUFDest>

    <pFCPUFDest>2.0000</pFCPUFDest>
    <pICMSUFDest>18.0000</pICMSUFDest>
    <pICMSInter>12.00</pICMSInter>
    <pICMSInterPart>40.0000</pICMSInterPart>
    <vFCPUFDest>2.00</vFCPUFDest>
    <vICMSUFDest>2.40</vICMSUFDest>
    <vICMSUFRemet>0.00</vICMSUFRemet

     

    <vFCPUFDest>2.00</vFCPUFDest>
    <vICMSUFDest>2.40</vICMSUFDest>

    pelo que pesquisei e o que me passaram os cálculos estão corretos.

    o que seria essa instrução " vBCUFDest * pFCPUFDest (*4) "??

    no aguardo

    att

    Alexandre

     

     

    35160105591213000159550010000011461044659626-nfe.xml

  15. Pelo Projeto, da erro 0, sem nenhum motivo.... pelo validador tecnospeed 

    No XML SEM FCP NFe 1145 e COM FCP 1146

    Rejeicao 695: informado indevidamente o grupo de ICMS para UF de destino.

    Rejeicao 697. Aliquota Interestadual do ICMS com Origem diferente do previsto.

    Rejeicao 793. Valor do ICMS relativo ao FCP na UF de destino difere do calculado

    a Outra NFe 1145 sem as TAGs foi validado, mas mesmo assim não consigo emitir a NFe

     

     

  16. Bom dia... li as notas técnicas e mesmo assim não estou conseguindo emitir as NFes através do ACBR. 

    No caso da NFe SEM FCP, tentei emitir sem as alíquotas e valores, o xml gerado não gera as tags, não imprime, mas no validador tecnospeed é validado. Ja tentei passar também com pICMSInter e o pICMSInterPart e me ocorre os erros.

    No xml COM FCP, o calculo "aparentemente" esta correto e não consigo nem validar o xml. 

    queria saber se é alguma TAG que eu esteja omitindo ou usando indevidamente.

    PS: segue mais uma vez, os arquivos XMLs anexos. XML NFe 1145 sem FCP, um gerado sem as tag e outro com. E o XML NFe 1146 com FCP

    no aguardo galera....

    att

    Alexandre

     

    35160115666976000175550010000011451053860802-nfe_SEM FCO_SEM_ALIQUOTASVALIDADO.xml

    35160115666976000175550010000011461044659625-nfe.xml

    35160105591213000159550010000011451053860803-nfe_SEM FCP.xml

  17. Daxxi...  fiz as mudanças que mencionou e o erro permanece. Não consigo emitir nenhuma nfe apos a atualização para o Trunk2.  Notei apenas que mudando a ORIGEM do meu produto o erro 697 é corrigido mas o  793 não. Tentei mudar os NCM e ocorre o mesmo problema.

    Estou com um cliente sem emitir Nfe desde sexta feira... preciso resolver o problema o quanto antes.

    Se alguem postar algum xml valido (homologacao) já me ajudaria bastante. se possível para estados sem o calculo do FCP tb

    Galera.... segue novamente o arquivo em anexo pra ver se alguém consegue me ajudar.

    att

    Alexandre

     

     

     

     

    35160115666976000175550010000011461044659625-nfe.xml

  18. Bom dia Regis...  fiz algumas mudanças seguindo a respostas do forum mas continuo com problema para a emissão das Nfes em modo Homologaçao. NFe de SP - PR pra Consumidor Final no Simples Nacional;

    mudei o  <indPres>9, <indIEDest>9 e aparece os seguintes erros no validador tecnospeed.

    Rejeicao 697. Aliquota Interestadual do ICMS com Origem diferente do previsto.

    Rejeicao 793. Valor do ICMS relativo ao FCP na UF de destino difere do calculado

    segue arquivo XML anexo.

    outra pergunta: e quando for emitir NFe sem o FCP, como fica o XML, preciso passar esse campos novos tambem? tem algum XML de exemplo pra ver o que passar para o componente?

     

    att

    Alexandre

    35160115666976000175550010000011461044659625-nfe.xml

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