Ir para conteúdo
  • Cadastre-se

vinicius

Membros
  • Total de ítens

    26
  • Registro em

  • Última visita

Posts postados por vinicius

  1. Bastante tempo.

    Não sei como executar esse exemplo.  vou colocar parte do meu código fonte, talvez ajude.

      ACBrNFSe1.NotasFiscais.Clear;
      AlimentaComponente(vAux);
      criou_nota:=false;

      ACBrNFSe1.Enviar(vNumLote);

      Sleep(5000);{Aguarda 5 segundos para o site de belo horizonte responder}

      ACBrNFSe1.ConsultarNFSeporRps(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero,
                                    ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie,
                                    TipoRPSToStr(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo));

      MemoResp.Lines.Text   := UTF8Encode(ACBrNFSe1.WebServices.ConsNfseRps.RetWS);
      memoRespWS.Lines.Text := UTF8Encode(ACBrNFSe1.WebServices.ConsNfseRps.RetWS);
      LoadXML(MemoResp, WBResposta);

  2. Bom dia. Atualizei  ACBr e na NFSe, após escolher o certificado, recebo o erro:

    O documento XML de entrada do servico esta fora do padrao especificado.
    (O atributo da Tag referencia deve informar a referencia local do conteudo usado no processo 
    de assinatura.)

    Não achei nada na internet sobre o assunto.

    Minha versão anterior do sistema continua funcionando normalmente. Não fiz nenhuma alteração no fonte do programa. Delphi 2010

  3. Problema é o seguinte. Ao escolher a impressora funciona, mas ao escolher a segunda impressora ou voltar para a padrão, fica na 1 escolhida. Vou colocar o código fonte.

        if (pos('<mod>65</mod>', linha) > 0) then begin
          ACBrNFeDANFeRL1.TipoDANFE:=tiNFCe;
          ACBrNFe1.DANFE:=ACBrNFeDANFCeFortes1;
          ACBrNFeDANFCeFortes1.Impressora:=Trim(qry_empresa.FieldByName('impressora_nfce').AsString);  // primeira escolha
          ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpImp  := tiNFCe;
        end
        else begin
          ACBrNFe1.DANFE:=ACBrNFeDANFeRL1;
          //ACBrNFeDANFCeFortes1.Impressora:=Printer.Printers[Printer.PrinterIndex];   //depois não volta mais
          if rgTipoDanfe.ItemIndex = 0 then begin
            ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpImp := tiRetrato;
            ACBrNFe1.DANFE.TipoDANFE := tiRetrato;
          end
          else begin
            ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpImp := tiPaisagem;
            ACBrNFe1.DANFE.TipoDANFE := tiPaisagem;
          end;
        end;

    Alguem ja passou por isso ?

  4. Estou gerando a chave da seguinte forma

          chave := GerarChaveAcesso(UFtoCUF(edtEmitUF.Text),                               // Código da UF do emitente do Documento Fiscal //);
                                         now,                                                                                        // Data da emissao //
                                         edtEmitCNPJ.Text,                                                               // CNPJ do emitente
                                         StrToInt(Trim(Dtm_Venda.cds_vendaIDT_serie.AsString)),      // Serie //
                                         StrToInt(NumNFe),                                                                            // numero da nf,
                                         1,                                                                                                          // tipo de emissao
                                         Dtm_Venda.cds_vendaid_nota.asinteger  ,                                  // Nota Técnica 2019/001 ALA 17/06/2019
                                         65);                                                                                                     // Modelo 65

  5. Configurei NFCe. Arrumei os erros. Agora não consigo sair desse. 

    397 : parâmetro do qr-code divergente da nota fiscal (chNFe)

    Tava passando errado o cNF do meu programa. Deixei vazio para que o componente gere o cNF.

    NFCe em Minas Gerais.

    31190933872083000168650010000000011530880247-nfe.xml

    -<qrCode>

    <![CDATA[https://nfce.fazenda.mg.gov.br/portalnfce/sistema/qrcode.xhtml?chNFe=31190933872083000168650010000000011530880247&nVersao=100&tpAmb=1&dhEmi=323031392D30392D31305431363A31323A31352D30333A3030&vNF=18.69&vICMS=0.00&digVal=6B3263456E7643784430563742704F765A567432376750437765453D&cIdToken=000001&cHashQRCode=C264296B950D9E5E65D0309014AF22E60AD88367]]>

    </qrCode>

     

    31190933872083000168650010000000011530880247-nfe.xml

  6. Socorro. Atualizei ACBR pra rodar NFe 4.0

    Compila normal, mas ao gerar nfe da o seguinte erro

    raised exception with message 'Invalid property value'

    ja tentei com 0, 1, 2, 000, 100, 200 - todos com a mesma mensagem. O que eu faço, ja procurei esse erro nos comentarios da internet e não achei

    To pensando em reinstalar o ACBr pra ver se para. Socorro

  7. Bom dia. Todos os meus clientes estão fazendo CTe normalmente, menos 1, e a 3 dias. Mensagem de erro:

    Versão Layout: 2.00

    Ambiente : 1

    Versão Aplicativo: 1.1.4

    Status Código: 225

    Satus Descrição: Rejeição: Falha no Schema do CT-e

    UF: MG

    Recibo:

    Recebimento:

    Tempo Médio: 0

    Quando faço em contingencia ele gera o CTe normalmente, conferi as informações e ta tudo certo. Ao fazer oficial acontece a falha, até 3 dias atras estava tirando os CTe normalmente, de repente parou e não da nenhuma informação a não ser essa mensagem de erro. Será que pode ser problema do certificado da empresa junto a receita ? Ja to 3 dias sem dormir, não sei mais o que fazer. Peguei a base de dados e o certificado dele e instalei na minha máquina. Da o mesmo erro. Socorro !!!! Vou passar 2 cte. o 16006 passou normalmente e o 16007 parou de passar. dai pra frente não passa mais nada.

    31170102940638000138570010000160061000160068-cte.xml

    31170102940638000138570010000160071000160073-cte.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.