Ir para conteúdo
  • Cadastre-se

ANT.CARLOS/SP

Membros
  • Total de ítens

    52
  • Registro em

  • Última visita

Posts postados por ANT.CARLOS/SP

  1. Olá boa noite!
    Resolvi o problema instalando o componente JEDI VLC
    Configurei o caminho na aba Tools, Enviroment Options, Library :C:\JEDI\jvcl\devtools\MakePNG

    Fiz as modificações abaixo, e pronto funcionou.




    uses PngImage;


    procedure TF_Principal.LabAtualizarCaptchaClick(Sender: TObject);
    var
      Stream: TMemoryStream;
      Png: TPngObject;
     
    begin
      Stream := TMemoryStream.Create;
      Png := TPngObject.Create;
      try
        ACBrConsultaCNPJ1.Captcha(Stream);
        Png.LoadFromStream(Stream);
        Image1.Picture.Assign(Png);

        EditCaptcha.Clear;
        EditCaptcha.SetFocus;
      finally
        Stream.Free;
        Png.Free;
      end;
    end;

  2. Olá boa tarde!

    Estou usando a NF-e 3.10 já a um bom tempo, cerca de uns 3 meses. Acontece que ontem fiz atualizacao em um cliente e uma mensagem de erro começou a aparecer ao enviar a nota.

    Já fiz a atualizacao do ACBr, mas nada, esta msg continua e não envia a nota. Na mensagem diz que a nota está duplicada, mas simplesmente ainda estou enviando um número que ainda não foi usado. Vou na opção de consulta NF-e e a mesma retorna. O problema maior é que alem da demora ao enviar as vezes trava o sistema.

    Estou inserindo em anexo uma imagem do retorno do erro.

     

    A quem puder ajudar desde já meus agradecimentos,

     

    100+

     

    ANT.CARLOS/SP

    post-609-0-21602400-1427315416_thumb.jpg

  3. NF-E 3.10 ERRO CODIGO 773 - OPERAC INTERNA E UF DEST DIFER DA UF DO EMITENTE

     

    Olá bom dia!

     

    Estou tendo o seguite erro de rejeição na NF-e 3.10 que começou a aparecer hoje.

     

    Estou enviando uma NF-e normal de SP para MS e é rejeitado pela SEFAZ.

     

     

    Alguém poderia me ajudar nessa?

     

     

    Veja o xml em anexo

     

     

    100+

     

    ANT.CARLOS/SP

    35150104695543000121550010000105531000105538-nfe.xml

  4. Olá boa tarde!

     

    Enquanto usava o Acbr-NF-e 2.0 conseguia cancelar uma nota e em seguida gerava um PDF no caminho específico.

    Fiz a atualizacao para a NF-e 3.10, o cancelamento está ok, mas na sequencia como fazia na versao 2.0 ja não ocorre mais.

     

    Obs: Se entro direto na opção gerar PDF funciona normal.

     

    Veja meu código:

    -------------------------------------------------------

    If (Status = 'C') then Begin
       Origem := DMACBRNFE.ACBrNFe1.Configuracoes.Arquivos.PathNfe+'\'+eCnpj+'\'+anoMes+'\Evento\Cancelamento\110111'+_ChNfe+'01-procEventoNFe.xml';

       Destino:= DMACBRNFE.ACBrNFe1.Configuracoes.Arquivos.PathCan+'\'+eCnpj+'\'+anoMes+'\Can\'+_ChNfe+'-nfe.xml'; //C:\Aceinfo\NFe\01868640000180\201412\Can

       CopyFile(Pchar(Origem),Pchar(Destino),False);


       //...Copia o Nfe para Meus Documentos
       Origem := Destino; //...destino pasta cancelados
       Destino:= DMACBRNFE.ACBrNFeDANFERaveCB1.PathPDF+'Nfeletronica-Cancelada-'+FormatFloat('#000',Numnota)+'.xml';
       CopyFile(Pchar(Origem),Pchar(Destino),False);
                                

     

                                        
       //..Gera o P.D.F.

       // AKI GERA O ERRO embora o arquivo exista no destino, na versao 2.0 funcionava normal
       DMACBRNFE.ACBrNFe1.NotasFiscais.Clear;
       DMACBRNFE.ACBrNFe1.NotasFiscais.LoadFromFile(Destino);
       DMACBRNFE.ACBrNFe1.NotasFiscais.ImprimirPDF;
    End;

    -------------------------------------------------------

     

    A quem puder ajudar desde ja meus agradecimentos

     

    100+

     

    ANT.CARLOS/SP

     

    post-609-0-75370900-1419710090_thumb.jpg

  5. Estou tendo o mesmo problema.

     

    Em alguns casos instalo "Certificados do Serasa", baixei os Drivers + nova cadeias de certificados, desisntalei tudo, reiniciei a maq. e tudo

    funcionou de primeira.

    Mas em algumas maq. só com reza brava, fiz fazer funcionar sem atualizar o programa.

    Em outras só atualiando o programa, coma as instruções lidas aqui.

    Em duas maq. não consegui fazer funcionar de jeito algum, vou formatar a maq. e depois posto o resultado.

  6. 1-verifique se o leitor esta lendo o cartao

    2-No internet explorer verifique se o IE é padrao, e mesmo sendo clique na aba Opções da Internet, Avançados e clique no botão Redefinir.

    3-Veja se o capicom está intalado corretamente, para verificar eu uso o site do Serasa Expirian, caso o cartao seja desta AC.

    4-Reinsta-le o capicom o via ACBR

     

    Geralmente quando acontece isto resolvo desta maneira.

     

    100+

  7. Olá boa tarde!

     

    Estou testando a homologação de um ct-e com operaçao no exterior e o CFOP está sendo rejeitado.

    Já compareio meu XML com outros e parece estar tudo certo.

     

    alguém poderia dar uma olhadinha no meu XML pra ver o q está de errado?

     

    Status: 519

     

    Obs: CT-e Normais dentro e fora do estado funciona normal.

     

    Fiz um Ct-e Exterior no Programa gratuito da sefaz e comparei parece estar td certo.

     

    Veja o cte-e q fiz no program da Sefaz

     

    100+

     

    ANT.CAROS/SP

     

     

    Desde já meus agradecimentos,

     

    100+

     

    ANT.CARLOS/SP

    35140614048791000134570010000000451000030065-procCte.xml

    Meu cte - 35140614048791000134570010000000261000000268-cte.xml

  8. Olá bom dia!

     

    To precisando implementar o Cte Complementar

    e estou precisando de uma rotina completa para fazer minhas adaptações, alguém poderia passa estas informações ?

     

    Ou no caso fazer uma descrição do que tem q ser feito para a implementação?

     

    A quem puder ajudar dwesde já meus agradecimentos.

     

    100+

     

    ANT.CARLOS/SP

  9. Olá bom dia!

    tivbe que baixar uma atualizacao por completo do ACBR, fiz as alterações no ACBrCTeDAEventoQRRetrato.pas.

    Estou compilando o Pacote ACBrCTeDacteQRpkg.dpk e está me retornando o seguinte erro:

     

    Veja a imagem.

     

     

    if (FResumoCanhoto) then
        qrlResumoCanhotoCTe.Caption := getTextoResumoCanhoto   <=========
      else
        qrlResumoCanhotoCTe.Caption := '';     <==============
     

    Já desinstalei o pacote mas o erro contua, tive que comentar estas linha para compilar.

     

    A quem puder ajudar desde já meus agradecimentos.

     

     

    ANT.CARLOS/SP

     

     

     

     

     

     

    post-609-0-10873700-1393766271_thumb.jpg

  10. Olá boa tarde!

     

    Estou imprimindo o CT-e já algum tempo, mas agora surgiu um problema.

     

     

    O CNPJ do Tomado esta saindo zerado, embora o programa informa-o corretamente.

    Quando visualizo pela primeira vez sai ok, mas quando pesquiso o XML e visualizo, o mesmo sai zerado no vídeo e olhando o XML o mesmo está zerado tbém.

     

    já rastrei os dados mas tudo está correto na hora de inserir no componente.

    Estou anexando o XML para q alguem de uma analizada e veja o q está errado.

     

    100+

     

    A quem puder ajudar, desde já mes agradecimentos.

     

     

     

    ANT.CARLOS/SP

     

     

     

     

     

    CTE-143.xml

  11. Olá boa noite!

     

    Estou com um problema ao imprimir a carta de correção.

     

    Já fiz atualização dos fontes, já olhei o arquivo exemplo de fontes para impressão de CCe, mas mesmo

    assim não consigo resolver o problema.

     

    O arquivo já foi transmitido e retornado ok.

     

    Veja meu fonte:

    ------------------------------------

      OpenDialog1.Title := 'Selecione o CTe';
      OpenDialog1.DefaultExt := '*-cte.xml';
      OpenDialog1.Filter := 'Arquivos CTe (*-cte.xml)|*-cte.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*';
      OpenDialog1.InitialDir := DMACBRCTE.ACBrCTe1.Configuracoes.Geral.PathSalvar;

      DMACBRCTE.ACBrCTe1.Conhecimentos.Clear;
      if OpenDialog1.Execute then
      begin
        DMACBRCTE.ACBrCTe1.Conhecimentos.LoadFromFile(OpenDialog1.FileName);
      end;

      OpenDialog1.Title := 'Selecione o Evento';
      OpenDialog1.DefaultExt := '*-procEventoCTe.xml';
      OpenDialog1.Filter := 'Arquivos Evento (*-procEventoCTe.xml)|*-procEventoCTe.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*';
      OpenDialog1.InitialDir := DMACBRCTE.ACBrCTe1.Configuracoes.Geral.PathSalvar;

      if OpenDialog1.Execute then
      begin
        DMACBRCTE.ACBrCTe1.EventoCTe.Evento.Clear;
        DMACBRCTE.ACBrCTe1.EventoCTe.LerXML(OpenDialog1.FileName);
        DMACBRCTE.ACBrCTe1.ImprimirEvento;
      end;
    ------------------------------------

    post-609-0-43670300-1390431554.jpg

  12. Olá boa tarde!

     

    Bom como descobri o problema, simplesmente modifiquei a linha excluindo a variável.

     

    Minha rotina tá assim

     

    Onde passo para false esta variável?

     

    ----------------------------------------

          OpenDialog1.Title := 'Selecione a NFE';
          OpenDialog1.DefaultExt := '*-cte.xml';
          OpenDialog1.Filter := 'Arquivos CTE (*-cte.xml)|*-cte.xml|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*';
          if OpenDialog1.Execute then begin
            DMACBRCTE.ACBrCte1.Conhecimentos.Clear;
            DMACBRCTE.ACBrCte1.Conhecimentos.LoadFromFile(OpenDialog1.FileName);
          end;

          DMACBRCTE.ACBrCTe1.Conhecimentos.Imprimir;;
    ----------------------------------------

     

    100+

     

    ANT.CARLOS/SP

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