Ir para conteúdo
  • Cadastre-se

MarceloCampos

Membros
  • Total de ítens

    3
  • Registro em

  • Última visita

Últimos Visitantes

340 visualizações

MarceloCampos's Achievements

Newbie

Newbie (1/14)

  • First Post
  • Conversation Starter
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

0

Reputação

  1. Boa tarde, Minha aplicação está dando o erro mostrado na imagem abaixo. No ACBr_Nfe_demo o erro não ocorre. Copiei todas as rotinas de criar e enviar NFe do demo para minha aplicação e o erro continua. O erro corre no módulo ACBrNFeWebServices na instrução. AssignFile(f,'C:\Total\NFE\PrjNFE.txt'); Rewite(f); WiteLn(f,Texto); Close(f); Acao.Text := Texto; // if assigned(TACBrNFe( FACBrNFe ).WebServices.Retorno.NFeRetorno) then // TACBrNFe( FACBrNFe ).WebServices.Retorno.NFeRetorno.Free; {$IFDEF ACBrNFeOpenSSL} Acao.SaveToStream(Stream); HTTP := THTTPSend.Create; {$ELSE} ReqResp := THTTPReqResp.Create(nil); ConfiguraReqResp( ReqResp ); ReqResp.URL := FURL; ReqResp.UseUTF8InHeader := True; ReqResp.SoapAction := SoapAction; {$ENDIF} try TACBrNFe( FACBrNFe ).SetStatus( stNFeRecepcao ); if FConfiguracoes.Geral.Salvar then begin FPathArqEnv := Lote+'-env-lot.xml'; FConfiguracoes.Geral.Save(FPathArqEnv, FDadosMsg); end; {$IFDEF ACBrNFeOpenSSL} HTTP.Document.LoadFromStream(Stream); ConfiguraHTTP(HTTP,'SOAPAction: "'+SoapAction+'"'); HTTP.HTTPMethod('POST', FURL); StrStream := TStringStream.Create(''); StrStream.CopyFrom(HTTP.Document, 0); FRetornoWS := TiraAcentos(ParseText(StrStream.DataString, True)); if nfeAutorizacaoLote then FRetWS := SeparaDados( FRetornoWS,'nfeAutorizacaoLoteResult') else FRetWS := SeparaDados( FRetornoWS,'nfeRecepcaoLote2Result'); StrStream.Free; {$ELSE} ReqResp.Execute(Acao.Text, Stream); O erro ocorre na linha em vermelho. As linhas em azul foram criadas por mim para salvar a varável texto. Executei a minha aplicação e o Demo e comparei os dois arquivos textos gerados. Os parâmetros estava idênticos. Alguém tem alguma ideia do que pode ser?
  2. Opss...Desculpe.... Esta falando a mesma coisa mesmo... Se quiser podem excluir este tópico... abs
  3. Bom dia Amigos, Após implementar a rotina de cancelamento via evento reparei que o Abcr não atualiza a Tag cStat de 100 para 101 como fazia antes, isto além de na minha modestíssima(verdade...rs) opinião ser o certo, ajudava o usuario, pois no Danfe aparecia um dizer de: " NF-e Cancelada" em vermelho. Isto não esta mais acontecendo, fiz na mão no código. Gostaria de saber se fiz certo? Se o Acbr deveria fazer isso? Enfim... Obrigado pela atenção
×
×
  • 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.