Ir para conteúdo
  • Cadastre-se

  • Este tópico foi criado há 783 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Consultores
Postado

tente dar um showmessage nessa informação!

se mostrar é erro no componente que está usando para salvar

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • 7 anos depois...
Postado (editado)

Boa tarde, estou tendo um problema sobre a função de ACBrNFe1.NotasFiscais[0].XMLAssinado....

ACBrNFe1.NotasFiscais.LoadFromFile(sArquivoXML, false);
ACBrNFe1.NotasFiscais.Assinar;

ACBrNFe1.NotasFiscais[0].XMLAssinado....

estou emitindo cupons em contingência, e quando pego XML de retorno, após assinado a tag tpEmis=9 fica tpEmis=1.... invalidando o XML... Além de retornar este xml assinado com a tag diferente, cria um outro xml, como se estivesse emitindo de forma normal.. atualizei a ACBR semana passada e começou isso.. reatualizei hoje e não mudou nada. Vou mandar o XML que carrego pro componente e depois o retorno dele, com o XML modificado... somente nessa tag e assinado, além do xml criado sem informações de contingência...

43240503157446000112650070000010111443270350-nfe.xml43240503157446000112650070000010119443270355-nfe ASSINADO.xml43240503157446000112650070000010119443270355-nfe SEMASSINATURA.xml 

Editado por Éva Cleidiane Coutinho
  • Consultores
Postado
14 minutos atrás, Éva Cleidiane Coutinho disse:

Boa tarde, estou tendo um problema sobre a função de Assinatura do XML... 

ACBrNFe1.NotasFiscais.LoadFromFile(sArquivoXML, false);
ACBrNFe1.NotasFiscais.Assinar;CBrNFe1.NotasFiscais[0].XMLAssinado.... estou emitindo cupons em contingência, e quano odo peg XML de torno, após assinado a tag tpEmis=9 fica tpEmis=1....

o xml está com 9 e o componente está configurado também para isso?

pois ao carregar o xml e passar false ele não vai gerar o xml ou corrigir ou modificar o mesmo.

o xml gerado foi feito no ACBrNFe também?

esse tópico é um pouco antigo 2016.

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Postado
11 minutos atrás, Juliomar Marchetti disse:

o xml está com 9 e o componente está configurado também para isso?

pois ao carregar o xml e passar false ele não vai gerar o xml ou corrigir ou modificar o mesmo.

o xml gerado foi feito no ACBrNFe também?

esse tópico é um pouco antigo 2016.

Geramos o XML fora do componente e este arquivo que 'não está assinado' é o que mandamos pro componente, a unica coisa que o componente teria que fazer, ao meu ver era assinar.

Nós pegávamos o rertono do .XMLAssinado e gravamos um novo arquivo assinado, e nesse retorno a tag está modificada, isso que achei estranho...
Não configuramos isso no componente pois não é ele quem faz. Parou de funcionar após a atualização, pelo que percebi. será que foi modificado algo ?

Acompanhei a função "function NotaFiscal.GerarXML: String;" da uses 'ACBrNFeNotasFiscais' que seria as configuraçoes populadas pelo XML e   o campo FormaEmissão está do tipo normal... já está errado aqui, pois não passo nada, só pegaria do XML  FNFeW.tpEmis := Configuracoes.Geral.FormaEmissao

  • Consultores
Postado

sim lembrando que o componentre precisa estar configurado para o ambiente de contigencia mesmo assim

 

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Postado
13 horas atrás, Juliomar Marchetti disse:

sim lembrando que o componentre precisa estar configurado para o ambiente de contigencia mesmo assim

 

Bom dia.. Sim mas é isso que eu quero dizer.. Não mexiamos em nada disso antes.. Tenho um executavel de marco que está funcionando, só passamos o XML para o componente e pegamos o XML Assinado para criar um novo arquivo, e isso funcionva. Por isso pergunto, sabes se foi alterado alguma coisa?

Postado

Esta configurtação (ACBrNFe1.Configuracoes.Geral.Salvar  := True) estava sempre salvando, os xmls gerado pela ACBR, isso tiramos também, só em alguns casos estamos gravando, mas isso não me parece algo que interferiria...

Configuramos o componente assim, estando em contingência ou normal.. 

Se for cupom acrescentamos essas duas linhas:

         ACBrNFe1.Configuracoes.Geral.ModeloDF     := moNFCe;
         ACBrNFe1.Configuracoes.Geral.VersaoQRCode := veqr200;
e de padrão é o resto...

  ACBrNFe1.Configuracoes.Geral.SSLLib := libWinCrypt; 
  If Trim(TAB_EMPRES.FieldByName('FLAG_ACBR_TLS12').AsString)='S' then   
    ACBrNFe1.SSL.SSLType := LT_TLSv1_2;

  ACBrNFe1.Configuracoes.Certificados.NumeroSerie := TAB_EMPRES.FieldByName('CERTIFICADO_NROSERIE').AsString; 
  ACBrNFe1.Configuracoes.Certificados.VerificarValidade :=True;
  ACBrNFe1.Configuracoes.Arquivos.AdicionarLiteral := True;
  ACBrNFe1.Configuracoes.Arquivos.SepararPorMes    := IfThenSV(TAB_EMPRES.FieldByName('FLAG_NFE_SEPARARPORMES').AsString='S',TRUE,FALSE);
  ACBrNFe1.Configuracoes.Arquivos.SepararPorCNPJ   := False;
  ACBrNFe1.Configuracoes.Arquivos.PathSalvar      := sPath;
  ACBrNFe1.Configuracoes.Arquivos.PathNFe         := sPath;
  If Trim(TAB_EMPRES.FieldByName('PATH_SCHEMAS_NFe').AsString)='' then
    ACBrNFe1.Configuracoes.Arquivos.PathSchemas := ExtractFilePath(ParamStr(0))+'SchemasNFeACBr\'

  Else
    ACBrNFe1.Configuracoes.Arquivos.PathSchemas := Trim(TAB_EMPRES.FieldByName('PATH_SCHEMAS_NFe').AsString)+'\';
  PathMensal := ACBrNFe1.Configuracoes.Arquivos.GetPathNFe(0);
  if TRIM(PathMensal)='' then
  BEGIN
    PathMensal:=sPath;
  END;


  If Trim(TAB_EMPRES.FieldByName('PATH_INI_ACBR').AsString)='' then
   spathini := ExtractFilePath(ParamStr(0))+'ArqINIACBr\' 
  Else
   spathini := Trim(TAB_EMPRES.FieldByName('PATH_INI_ACBR').AsString)+'\';

  if not FileExists(spathini+'Cidades.ini') then 
   spathini := ExtractFilePath(ParamStr(0))+'ArqINIACBr\';

  ACBrNFe1.Configuracoes.Arquivos.PathSalvar := PathMensal;
  ACBrNFe1.Configuracoes.Arquivos.Salvar     := True;

  if (bnaosalva) then
     ACBrNFe1.Configuracoes.Geral.Salvar  := True
  else
     ACBrNFe1.Configuracoes.Geral.Salvar  := False;
  ACBrNFe1.Configuracoes.WebServices.Salvar     := false;
  ACBrNFe1.Configuracoes.WebServices.Ambiente   := StrToTpAmb(baux, TAB_EMPRES.FieldByName('NFe_AMBIENTE').AsString);
  ACBrNFe1.Configuracoes.WebServices.Visualizar := false;
  ACBrNFe1.Configuracoes.WebServices.UF         := TAB_EMPRES.FieldByName('UF').AsString;


  //Flag para exibir mensagens de log da acbr
  If Trim(TAB_EMPRES.FieldByName('ACBR_FLAG_VERLOG').AsString)='S' then
    ACBrNFe1.Configuracoes.WebServices.Visualizar := True;

  //Set de timeout para os envios da ACBR
  ACBrNFe1.Configuracoes.WebServices.TimeOutPorThread := True;
  If TAB_EMPRES.FieldByName('ACBR_TIMEOUT').AsInteger > 0 then
   ACBrNFe1.Configuracoes.WebServices.TimeOut          := TAB_EMPRES.FieldByName('ACBR_TIMEOUT').AsInteger
  else
   ACBrNFe1.Configuracoes.WebServices.TimeOut          := 10000;

  ACBrNFe1.Configuracoes.WebServices.TimeZoneConf.ModoDeteccao := tzManual;
  if TAB_EMPRES.FieldByName('TZD').AsString = 'N' then
    ACBrNFe1.Configuracoes.WebServices.TimeZoneConf.TimeZoneStr := '-03:00';
  if TAB_EMPRES.FieldByName('TZD').AsString = 'S' then
    ACBrNFe1.Configuracoes.WebServices.TimeZoneConf.TimeZoneStr := '-02:00';
  ACBrNFe1.Configuracoes.Geral.RetirarAcentos:=true;

  ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFe;
  if TAB_EMPRES.FieldByName('VERSAONFE').AsString='3.10' then
   ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
  if TAB_EMPRES.FieldByName('VERSAONFE').AsString='4.00' then
   ACBrNFe1.Configuracoes.Geral.VersaoDF := ve400;

  ACBrNFe1.Configuracoes.Geral.IdCSC:=TAB_EMPRES.FieldByName('IDTOKEN').AsString;
  ACBrNFe1.Configuracoes.Geral.CSC:=TAB_EMPRES.FieldByName('CSC').AsString;

  ACBrNFe1.Configuracoes.Geral.ExibirErroSchema := True;
  ACBrNFe1.Configuracoes.Geral.FormatoAlerta    := 'TAG:%TAGNIVEL% ID:%ID%/%TAG%(%DESCRICAO%) - %MSG%.';
 

E então, passamos o arquivo para o componente, como comentei na primeira postagem

 

ACBrNFe1.NotasFiscais.Clear;

ACBrNFe1.NotasFiscais.LoadFromFile(sArquivoXML, false);
ACBrNFe1.NotasFiscais.Assinar;

Result := ACBrNFe1.NotasFiscais[0].XMLAssinado;

  • Consultores
Postado

Faz update no ACBr e reinstala

vi que foi modificado algo em alguns componentes incluindo o NFE

  • Curtir 1

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Consultores
Postado

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

 

Consultora ACBr Pro

Juliomar Marchetti

Ajude o Projeto ACBr crescer - Seja Pro

discord: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br

 

MVP_NewLogo_100x100_Transparent-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Este tópico foi criado há 783 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...