Pesquisar na Comunidade
Showing results for tags 'nfc-e erro retorno'.
Encontrado 1 registro
-
Retorno Enviar Nfc-E Sem Informação
um tópico no fórum postou J Pereira NFe/NFCe - Nota Fiscal Eletrônica
Boa noite. Pesquisei no fórum usando várias dicas e nada. Todos retornam vazio. Na NFe funciona ok, mas na nfc-e nao consigo. Não consigo pegar o xMotivo do retorno quando a nfc-e não é autorizada, como por exemplo duplicidade. usei os seguintes comandos: ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.xMotivo ACBrNFe1.WebServices.Retorno.NFeRetorno.xMotivo ACBrNFe1.WebServices.Retorno.xMotivo Alguem pode me dar uma luz? um exemplo? No exemplo acbrnfe não tem tratamento de retorno. Grato. códigos abaixo: ACBrNFe1.Configuracoes.Certificados.NumeroSerie := edtnumserie.Text; // ACBrNFe1.Configuracoes.Geral.IdToken := edtIdToken.Text; / ACBrNFe1.Configuracoes.Geral.Token := edtToken.Text; ACBrNFe1.Configuracoes.WebServices.UF := 'RJ'; ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe; ACBrNFe1.DANFE := ACBrNFeDANFeESCPOS1; ACBrNFe1.DANFE.Name := 'ACBrNFeDANFeESCPOS1'; ACBrNFeDANFeESCPOS1.MarcaImpressora := iDaruma; //iBematech; // ACBrNFeDANFeESCPOS1.Device.Porta := 'COM3'; ACBrNFeDANFeESCPOS1.Device.Baud := 9600; ACBrNFeDANFeESCPOS1.Device.Ativar; ACBrNFe1.DANFE.TipoDANFE := tiNFCe; ACBrNFe1.DANFE.MostrarPreview := false; ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310; ACBrNFe1.Configuracoes.Geral.PathSchemas := uppercase(gsAppPath+'Schemas\V310'); ACBrNFe1.NotasFiscais.Clear; GerarNFCe(vAux); ACBrNFe1.Enviar(vNumLote,False,Sincrono); MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetWS); memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetornoWS); LoadXML(MemoResp, WBResposta); MemoDados.Lines.Add(''); MemoDados.Lines.Add('Envio NFe'); MemoDados.Lines.Add('tpAmb: '+ TpAmbToStr(ACBrNFe1.WebServices.Retorno.TpAmb)); MemoDados.Lines.Add('verAplic: '+ ACBrNFe1.WebServices.Retorno.verAplic); MemoDados.Lines.Add('cStat: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cStat)); MemoDados.Lines.Add('cUF: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cUF)); MemoDados.Lines.Add('xMotivo: '+ ACBrNFe1.WebServices.Retorno.xMotivo); MemoDados.Lines.Add('cMsg: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cMsg)); MemoDados.Lines.Add('xMsg: '+ ACBrNFe1.WebServices.Retorno.xMsg); MemoDados.Lines.Add('Recibo: '+ ACBrNFe1.WebServices.Retorno.Recibo); MemoDados.Lines.Add('Protocolo: '+ ACBrNFe1.WebServices.Retorno.Protocolo); IF NOT ACBrNFe1.NotasFiscais.Items[0].Confirmada then begin ShowMessage('NFC-e não autorizada' + #13#13#10 + 'Chave de Acesso = ' + ACBrNFe1.WebServices.Retorno.ChaveNFe + #13#13#10 + 'Código de Retorno = ' +IntToStr(ACBrNFe1.WebServices.Retorno.cStat) +#13#10 + 'Mensagem = ' +ACBrNFe1.WebServices.Retorno.xMsg +#13#10 + 'Msg de Retorno = ' + ACBrNFe1.WebServices.Retorno.xMotivo ); OperacaoOk := false; ErroRetorno := ACBrNFe1.WebServices.Retorno.NFeRetorno.cStat; // PostMessage(Handle, WM_CLOSE, 0, 0);; Exit; end; ACBrNFeDANFeESCPOS1.ImprimirDANFE(nil, True);