| public AtualizarTag ( string chaveNFe, ElementoEditavel tag, string novoConteudo ) : void | ||
| chaveNFe | string | Chave da NFe |
| tag | ElementoEditavel | Tag a ser atualizada |
| novoConteudo | string | Novo conteúdo para a tag |
| Результат | void | |
/// <summary>
/// Finalizar o envio da NFe
/// </summary>
public void FinalizarNFe(XmlNodeList protNFeList, FluxoNfe fluxoNFe, int emp)
{
var oLerXml = new LerXML();
foreach (XmlNode protNFeNode in protNFeList)
{
var protNFeElemento = (XmlElement)protNFeNode;
string versao = protNFeElemento.GetAttribute(NFe.Components.TpcnResources.versao.ToString());
var strProtNfe = protNFeElemento.OuterXml;
var infProtList = protNFeElemento.GetElementsByTagName("infProt");
foreach (XmlNode infProtNode in infProtList)
{
bool tirarFluxo = true;
var infProtElemento = (XmlElement)infProtNode;
var strChaveNFe = string.Empty;
var strStat = string.Empty;
if (infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.chNFe.ToString())[0] != null)
{
strChaveNFe = "NFe" + infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.chNFe.ToString())[0].InnerText;
}
if (infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.cStat.ToString())[0] != null)
{
strStat = infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.cStat.ToString())[0].InnerText;
}
//Definir o nome do arquivo da NFe e seu caminho
var strNomeArqNfe = fluxoNFe.LerTag(strChaveNFe, FluxoNfe.ElementoFixo.ArqNFe);
// danasa 8-2009
// se por algum motivo o XML não existir no "Fluxo", então o arquivo tem que existir
// na pasta "EmProcessamento" assinada.
if (string.IsNullOrEmpty(strNomeArqNfe))
{
if (string.IsNullOrEmpty(strChaveNFe))
throw new Exception("LerRetornoLoteNFe(): Não pode obter o nome do arquivo");
strNomeArqNfe = strChaveNFe.Substring(3) + Propriedade.ExtEnvio.Nfe;
}
var strArquivoNFe = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
strNomeArqNfe;
//Atualizar a Tag de status da NFe no fluxo para que se ocorrer alguma falha na exclusão eu tenha esta campo para ter uma referencia em futuras consultas
fluxoNFe.AtualizarTag(strChaveNFe, FluxoNfe.ElementoEditavel.cStat, strStat);
switch (strStat)
{
case "100": //NFe Autorizada
case "150": //NFe Autorizada fora do prazo
if (File.Exists(strArquivoNFe))
{
//Juntar o protocolo com a NFE já copiando para a pasta de autorizadas
var strArquivoNFeProc = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
Functions.ExtrairNomeArq(strNomeArqNfe, Propriedade.ExtEnvio.Nfe) +
Propriedade.ExtRetorno.ProcNFe;
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
oLerXml.Nfe(strArquivoNFe);
//Verificar se a -nfe.xml existe na pasta de autorizados
bool NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtEnvio.Nfe);
//Verificar se o -procNfe.xml existe na pasta de autorizados
bool procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe);
//Se o XML de distribuição não estiver na pasta de autorizados
if (!procNFeJaNaAutorizada)
{
if (!File.Exists(strArquivoNFeProc))
{
Auxiliar.WriteLog("TaskNFeRetRecepcao: Gerou o arquivo de distribuição através da consulta recibo.", false);
oGerarXML.XmlDistNFe(strArquivoNFe, strProtNfe, Propriedade.ExtRetorno.ProcNFe, versao);
}
}
if (!(procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe)))
{
//Mover a nfePRoc da pasta de NFE em processamento para a NFe Autorizada
//Para enviar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário,
//assim sendo não inverta as posições. Wandrey 08/10/2009
TFunctions.MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
//Atualizar a situação para que eu só mova o arquivo com final -NFe.xml para a pasta autorizado se
//a procnfe já estiver lá, ou vai ficar na pasta emProcessamento para tentar gerar novamente.
//Isso vai dar uma maior segurança para não deixar sem gerar o -procnfe.xml. Wandrey 13/12/2012
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe);
}
if (!NFeJaNaAutorizada && procNFeJaNaAutorizada)
{
//Mover a NFE da pasta de NFE em processamento para NFe Autorizada
//Para enviar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário.
//assim sendo não inverta as posições. Wandrey 08/10/2009
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
//Disparar a geração/impressão do UniDanfe. 03/02/2010 - Wandrey
if (procNFeJaNaAutorizada)
{
///
/// tem que passar o arquivo de distribuicao da nfe
///
string strArquivoDist = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.Autorizados.ToString() + "\\" +
Empresas.Configuracoes[emp].DiretorioSalvarComo.ToString(oLerXml.oDadosNfe.dEmi) +
Path.GetFileName(strArquivoNFeProc);
try
{
TFunctions.ExecutaUniDanfe(strArquivoDist, oLerXml.oDadosNfe.dEmi, Empresas.Configuracoes[emp]);
}
catch (Exception ex)
{
Auxiliar.WriteLog("TaskRecepcao: (Falha na execução do UniDANFe) " + ex.Message, false);
}
}
//Vou verificar se estão os dois arquivos na pasta Autorizados, se tiver eu tiro do fluxo caso contrário não. Wandrey 13/02/2012
NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtEnvio.Nfe);
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe);
if (!procNFeJaNaAutorizada || !NFeJaNaAutorizada)
{
tirarFluxo = false;
}
///
/// se o -nfe.xml já existe na pasta de autorizados e ele está na pasta em processamento,
/// o exclui da pasta em processamento
if (NFeJaNaAutorizada && File.Exists(strArquivoNFe))
File.Delete(strArquivoNFe);
}
else
Auxiliar.WriteLog("TaskRetRecepcao: (Foi efetuada uma consulta recibo e não foi localizado o arquivo da NFe ( " + strNomeArqNfe + ") na pasta EmProcessamento) ", false);
break;
case "110":
case "205":
case "301":
case "302":
case "303":
ProcessaNFeDenegada(emp, oLerXml, strArquivoNFe, protNFeElemento.OuterXml, versao);
break;
default: //NFe foi rejeitada
//O Status da NFe tem que ser maior que 1 ou deu algum erro na hora de ler o XML de retorno da consulta do recibo, sendo assim, vou mantar a nota no fluxo para consultar novamente.
if (Convert.ToInt32(strStat) >= 1)
{
Auxiliar.WriteLog("Arquivo: " + strNomeArqNfe + " codigo de retorno: " + strStat, false);
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoNFe);
}
else
tirarFluxo = false;
break;
}
//Deletar a NFE do arquivo de controle de fluxo
if (tirarFluxo)
fluxoNFe.ExcluirNfeFluxo(strChaveNFe);
break;
}
}
}
/// <summary>
/// Efetua a leitura do XML de retorno do processamento do lote de notas fiscais e
/// atualiza o arquivo de fluxo e envio de notas
/// </summary>
/// <by>Wandrey Mundin Ferreira</by>
/// <date>20/04/2009</date>
private void LerRetornoLoteCTe(int emp)
{
var oLerXml = new LerXML();
var fluxoNFe = new FluxoNfe();
var doc = new XmlDocument();
doc.Load(Functions.StringXmlToStreamUTF8(vStrXmlRetorno));
var retConsReciNFeList = doc.GetElementsByTagName("retConsReciCTe");
foreach (XmlNode retConsReciNFeNode in retConsReciNFeList)
{
var retConsReciNFeElemento = (XmlElement)retConsReciNFeNode;
//Pegar o número do recibo do lote enviado
var nRec = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName(TpcnResources.nRec.ToString())[0] != null)
{
nRec = retConsReciNFeElemento.GetElementsByTagName(TpcnResources.nRec.ToString())[0].InnerText;
}
//Pegar o status de retorno do lote enviado
var cStatLote = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0] != null)
{
cStatLote = retConsReciNFeElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0].InnerText;
}
switch (cStatLote)
{
#region Rejeições do XML de consulta do recibo (Não é o lote que foi rejeitado e sim o XML de consulta do recibo)
case "280": //A-Certificado transmissor inválido
case "281": //A-Validade do certificado
case "283": //A-Verifica a cadeia de Certificação
case "286": //A-LCR do certificado de Transmissor
case "284": //A-Certificado do Transmissor revogado
case "285": //A-Certificado Raiz difere da "IPC-Brasil"
case "282": //A-Falta a extensão de CNPJ no Certificado
case "214": //B-Tamanho do XML de dados superior a 500 Kbytes
case "243": //B-XML de dados mal formatado
case "242": //C-Elemento nfeCabecMsg inexistente no SOAP Header
case "409": //C-Campo cUF inexistente no elemento nfeCabecMsg do SOAP Header
case "410": //C-Campo versaoDados inexistente no elemento nfeCabecMsg do SOAP
case "411": //C-Campo versaoDados inexistente no elemento nfeCabecMsg do SOAP
case "238": //C-Versão dos Dados informada é superior à versão vigente
case "239": //C-Versão dos Dados não suportada
case "215": //D-Verifica schema XML da área de dados
case "404": //D-Verifica o uso de prefixo no namespace
case "402": //D-XML utiliza codificação diferente de UTF-8
case "252": //E-Tipo do ambiente da NF-e difere do ambiente do web service
case "226": //E-UF da Chave de Acesso difere da UF do Web Service
case "236": //E-Valida DV da Chave de Acesso
case "217": //E-Acesso BD CTE
case "216": //E-Verificar se campo "Codigo Numerico"
break;
#region Serviço paralisado
case "108":
case "109":
//Se o serviço estiver paralisado momentaneamente ou sem previsão de retorno, vamos tentar consultar somente a cada 3 minutos pra evitar consumo indevido.
if (nRec != string.Empty)
{
fluxoNFe.AtualizarDPedRec(nRec, DateTime.Now.AddSeconds(180));
}
break;
#endregion Serviço paralisado
#endregion Rejeições do XML de consulta do recibo (Não é o lote que foi rejeitado e sim o XML de consulta do recibo)
#region Lote ainda está sendo processado
case "105": //E-Verifica se o lote não está na fila de resposta, mas está na fila de entrada (Lote em processamento)
//Ok vou aguardar o ERP gerar uma nova consulta para encerrar o fluxo da nota
break;
#endregion Lote ainda está sendo processado
#region Lote não foi localizado pelo recibo que está sendo consultado
case "106": //E-Verifica se o lote não está na fila de saída, nem na fila de entrada (Lote não encontrado)
//No caso do lote não encontrado através do recibo, o ERP vai ter que consultar a situação da NFe para encerrar ela
//Vou somente excluir ela do fluxo para não ficar consultando o recibo que não existe
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
break;
#endregion Lote não foi localizado pelo recibo que está sendo consultado
#region Lote foi processado, agora tenho que tratar as notas fiscais dele
case "104": //Lote processado
var protNFeList = retConsReciNFeElemento.GetElementsByTagName("protCTe");
foreach (XmlNode protNFeNode in protNFeList)
{
var protNFeElemento = (XmlElement)protNFeNode;
var strProtNfe = protNFeElemento.OuterXml;
var infProtList = protNFeElemento.GetElementsByTagName("infProt");
foreach (XmlNode infProtNode in infProtList)
{
var infProtElemento = (XmlElement)infProtNode;
var strChaveNFe = string.Empty;
var strStat = string.Empty;
if (infProtElemento.GetElementsByTagName(TpcnResources.chCTe.ToString())[0] != null)
{
strChaveNFe = "CTe" + infProtElemento.GetElementsByTagName(TpcnResources.chCTe.ToString())[0].InnerText;
}
if (infProtElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0] != null)
{
strStat = infProtElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0].InnerText;
}
//Definir o nome do arquivo da NFe e seu caminho
var strNomeArqNfe = fluxoNFe.LerTag(strChaveNFe, FluxoNfe.ElementoFixo.ArqNFe);
// se por algum motivo o XML não existir no "Fluxo", então o arquivo tem que existir
// na pasta "EmProcessamento" assinada.
if (string.IsNullOrEmpty(strNomeArqNfe))
{
if (string.IsNullOrEmpty(strChaveNFe))
{
oGerarXML.XmlRetorno(Propriedade.Extensao(Propriedade.TipoEnvio.PedRec).EnvioXML, Propriedade.Extensao(Propriedade.TipoEnvio.PedRec).RetornoXML, vStrXmlRetorno);
throw new Exception("LerRetornoLoteCTe(): Não pode obter o nome do arquivo");
}
strNomeArqNfe = strChaveNFe.Substring(3) + Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML;
}
var strArquivoNFe = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + strNomeArqNfe;
//Atualizar a Tag de status da NFe no fluxo para que se ocorrer alguma falha na exclusão eu tenha esta campo para ter uma referencia em futuras consultas
fluxoNFe.AtualizarTag(strChaveNFe, FluxoNfe.ElementoEditavel.cStat, strStat);
//Atualizar a tag da data e hora da ultima consulta do recibo
fluxoNFe.AtualizarDPedRec(nRec, DateTime.Now);
switch (strStat)
{
case "100": //NFe Autorizada
if (File.Exists(strArquivoNFe))
{
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
XmlDocument conteudoXMLCTe = new XmlDocument();
conteudoXMLCTe.Load(strArquivoNFe);
oLerXml.Cte(conteudoXMLCTe);
//Juntar o protocolo com a NFE já copiando para a pasta em processamento
var strArquivoNFeProc = oGerarXML.XmlDistCTe(strArquivoNFe, strProtNfe, oLerXml.oDadosNfe.versao);
//Mover a cteProc da pasta de CTe em processamento para a NFe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procCTe.xml) para
//depois mover o da nfe (-cte.xml), pois se ocorrer algum erro, tenho como reconstruir o senário,
//assim sendo não inverta as posições. Wandrey 08/10/2009
TFunctions.MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
//Mover a CTe da pasta de CTe em processamento para CTe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procCTe.xml) para
//depois mover o da nfe (-cte.xml), pois se ocorrer algum erro, tenho como reconstruir o cenário.
//assim sendo não inverta as posições. Wandrey 08/10/2009
if (!Empresas.Configuracoes[emp].SalvarSomenteXMLDistribuicao)
{
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
else
{
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Originais, oLerXml.oDadosNfe.dEmi);
}
//Disparar a geração/impressao do UniDanfe. 03/02/2010 - Wandrey
try
{
var strArquivoDist = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.Autorizados.ToString() + "\\" +
Empresas.Configuracoes[emp].DiretorioSalvarComo.ToString(oLerXml.oDadosNfe.dEmi) +
Path.GetFileName(strArquivoNFeProc);
TFunctions.ExecutaUniDanfe(strArquivoDist, oLerXml.oDadosNfe.dEmi, Empresas.Configuracoes[emp]);
}
catch (Exception ex)
{
Auxiliar.WriteLog("TaskCTeRetRecepcao: " + ex.Message, false);
}
}
break;
case "301": //NFe Denegada - Irregularidade fiscal do emitente
if (File.Exists(strArquivoNFe))
{
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s Denegados
XmlDocument conteudoXMLCTe = new XmlDocument();
conteudoXMLCTe.Load(strArquivoNFe);
oLerXml.Cte(conteudoXMLCTe);
//Mover a NFE da pasta de NFE em processamento para NFe Denegadas
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Denegados, oLerXml.oDadosNfe.dEmi);
///
/// existe DACTE de CTe denegado???
///
try
{
var strArquivoDist = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.Denegados.ToString() + "\\" +
Empresas.Configuracoes[emp].DiretorioSalvarComo.ToString(oLerXml.oDadosNfe.dEmi) +
Functions.ExtrairNomeArq(strArquivoNFe, Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML) + Propriedade.ExtRetorno.Den;
TFunctions.ExecutaUniDanfe(strArquivoDist, oLerXml.oDadosNfe.dEmi, Empresas.Configuracoes[emp]);
}
catch (Exception ex)
{
Auxiliar.WriteLog("TaskCTeRetRecepcao: " + ex.Message, false);
}
}
break;
case "302": //NFe Denegada - Irregularidade fiscal do remetente
goto case "301";
case "303": //NFe Denegada - Irregularidade fiscal do destinatário
goto case "301";
case "304": //NFe Denegada - Irregularidade fiscal do expedidor
goto case "301";
case "305": //NFe Denegada - Irregularidade fiscal do recebedor
goto case "301";
case "306": //NFe Denegada - Irregularidade fiscal do tomador
goto case "301";
case "110": //NFe Denegada - Não sei quando ocorre este, mas descobrir ele no manual então estou incluindo. Wandrey 20/10/2009
goto case "301";
default: //NFe foi rejeitada
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoNFe);
break;
}
//Deletar a NFE do arquivo de controle de fluxo
fluxoNFe.ExcluirNfeFluxo(strChaveNFe);
break;
}
}
break;
#endregion Lote foi processado, agora tenho que tratar as notas fiscais dele
#region Qualquer outro tipo de status que não for os acima relacionados, vai tirar a nota fiscal do fluxo.
default:
//Qualquer outro tipo de rejeião vou tirar todas as notas do lote do fluxo, pois se o lote foi rejeitado, todas as notas fiscais também foram
//De acordo com o manual de integração se o status do lote não for 104, tudo foi rejeitado. Wandrey 20/07/2010
//Vou retirar as notas do fluxo pelo recibo
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
break;
#endregion Qualquer outro tipo de status que não for os acima relacionados, vai tirar a nota fiscal do fluxo.
}
}
}
public override void Execute()
{
int emp = Empresas.FindEmpresaByThread();
try
{
dadosRec = new DadosRecClass();
FluxoNfe oFluxoNfe = new FluxoNfe();
LerXML oLer = new LerXML();
//Ler o XML de Lote para pegar o número do lote que está sendo enviado
oLer.Nfe(NomeArquivoXML);
if (oLer.oDadosNfe.versao != "2.00")
{
Servico = Servicos.NFeEnviarLote2;
}
var idLote = oLer.oDadosNfe.idLote;
//Definir o objeto do WebService
WebServiceProxy wsProxy = ConfiguracaoApp.DefinirWS(Servico, emp,
Convert.ToInt32(oLer.oDadosNfe.cUF),
Convert.ToInt32(oLer.oDadosNfe.tpAmb),
Convert.ToInt32(oLer.oDadosNfe.tpEmis),
oLer.oDadosNfe.versao,
oLer.oDadosNfe.mod);
System.Net.SecurityProtocolType securityProtocolType = WebServiceProxy.DefinirProtocoloSeguranca(Convert.ToInt32(oLer.oDadosNfe.cUF), Convert.ToInt32(oLer.oDadosNfe.tpAmb), Convert.ToInt32(oLer.oDadosNfe.tpEmis), PadroesNFSe.NaoIdentificado, Servico);
if (Empresas.Configuracoes[emp].CompactarNfe && oLer.oDadosNfe.versao != "2.00" && wsProxy.NomeMetodoWS.Length == 2)
{
Servico = Servicos.NFeEnviarLoteZip2;
}
//Criar objetos das classes dos serviços dos webservices do SEFAZ
object oRecepcao = wsProxy.CriarObjeto(wsProxy.NomeClasseWS);
var oCabecMsg = wsProxy.CriarObjeto(NomeClasseCabecWS(Convert.ToInt32(oLer.oDadosNfe.cUF), Servico));
//Atribuir conteúdo para duas propriedades da classe nfeCabecMsg
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.cUF.ToString(), oLer.oDadosNfe.cUF);
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.versaoDados.ToString(), oLer.oDadosNfe.versao);
//XML neste ponto a NFe já está assinada, pois foi assinada, validada e montado o lote para envio por outro serviço.
//Fica aqui somente este lembrete. Wandrey 16/03/2010
// Envio de NFe Compactada - Renan 29/04/2014
if (Servico == Servicos.NFeEnviarLoteZip2)
{
FileInfo dadosArquivo = new FileInfo(NomeArquivoXML);
TFunctions.CompressXML(dadosArquivo);
}
string nOperacao = wsProxy.NomeMetodoWS[(Servico == Servicos.NFeEnviarLoteZip2) ? 1 : 0];
//Invocar o método que envia o XML para o SEFAZ
if (Empresas.Configuracoes[emp].IndSinc && oLer.oDadosNfe.versao != "2.00" && oLer.oDadosNfe.indSinc)
{
//Não posso gerar o arquivo na pasta de retorno através do método Invocar, por isso não estou colocando os dois ultimos parâmetros com a definição dos prefixos dos arquivos. O arquivo de retorno no processo síncrono deve acontecer somente depois de finalizado o processo da nota, ou gera problemas. Wandrey 11/06/2015
oInvocarObj.Invocar(wsProxy,
oRecepcao,
nOperacao,
oCabecMsg,
this,
Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML,
Propriedade.Extensao(Propriedade.TipoEnvio.PedRec).RetornoXML,
false,
securityProtocolType);
Protocolo(vStrXmlRetorno);
}
else
{
oInvocarObj.Invocar(wsProxy,
oRecepcao,
nOperacao,
oCabecMsg,
this,
Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML,
Propriedade.ExtRetorno.Rec,
true,
securityProtocolType);
Recibo(vStrXmlRetorno);
}
if (dadosRec.cStat == "104") //Lote processado - Processo da NFe Síncrono - Wandrey 13/03/2014
{
FinalizarNFeSincrono(vStrXmlRetorno, emp);
oGerarXML.XmlRetorno(Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML, Propriedade.Extensao(Propriedade.TipoEnvio.PedRec).RetornoXML, vStrXmlRetorno);
}
else if (dadosRec.cStat == "103") //Lote recebido com sucesso - Processo da NFe Assíncrono
{
//Atualizar o número do recibo no XML de controle do fluxo de notas enviadas
oFluxoNfe.AtualizarTag(oLer.oDadosNfe.chavenfe, FluxoNfe.ElementoEditavel.tMed, dadosRec.tMed.ToString());
oFluxoNfe.AtualizarTagRec(idLote, dadosRec.nRec);
}
else if (Convert.ToInt32(dadosRec.cStat) > 200 ||
Convert.ToInt32(dadosRec.cStat) == 108 || //Verifica se o servidor de processamento está paralisado momentaneamente. Wandrey 13/04/2012
Convert.ToInt32(dadosRec.cStat) == 109) //Verifica se o servidor de processamento está paralisado sem previsão. Wandrey 13/04/2012
{
if (Empresas.Configuracoes[emp].IndSinc && oLer.oDadosNfe.versao != "2.00" && oLer.oDadosNfe.indSinc)
{
// OPS!!! Processo sincrono rejeição da SEFAZ, temos que gravar o XML para o ERP, pois no processo síncrono isso não pode ser feito dentro do método Invocar
oGerarXML.XmlRetorno(Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML, Propriedade.Extensao(Propriedade.TipoEnvio.PedRec).RetornoXML /*.ExtRetorno.ProRec_XML*/, vStrXmlRetorno);
}
//Se o status do retorno do lote for maior que 200 ou for igual a 108 ou 109,
//vamos ter que excluir a nota do fluxo, porque ela foi rejeitada pelo SEFAZ
//Primeiro vamos mover o xml da nota da pasta EmProcessamento para pasta de XML´s com erro e depois a tira do fluxo
//Wandrey 30/04/2009
oAux.MoveArqErro(Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + oFluxoNfe.LerTag(oLer.oDadosNfe.chavenfe, FluxoNfe.ElementoFixo.ArqNFe));
oFluxoNfe.ExcluirNfeFluxo(oLer.oDadosNfe.chavenfe);
}
//Deleta o arquivo de lote
Functions.DeletarArquivo(NomeArquivoXML);
// Envio de NFe Compactada - Renan 29/04/2014
if (Servico == Servicos.NFeEnviarLoteZip2)
{
Functions.DeletarArquivo(NomeArquivoXML + ".gz");
}
}
catch (ExceptionEnvioXML ex)
{
TrataException(emp, ex);
}
catch (ExceptionSemInternet ex)
{
TrataException(emp, ex);
}
catch (Exception ex)
{
TrataException(emp, ex);
}
}
/// <summary>
/// Efetua a leitura do XML de retorno do processamento do lote de notas fiscais e
/// atualiza o arquivo de fluxo e envio de notas
/// </summary>
/// <by>Wandrey Mundin Ferreira</by>
/// <date>20/04/2009</date>
private void LerRetornoLoteMDFe(int emp)
{
var oLerXml = new LerXML();
var fluxoNFe = new FluxoNfe();
var doc = new XmlDocument();
doc.Load(Functions.StringXmlToStreamUTF8(vStrXmlRetorno));
var retConsReciNFeList = doc.GetElementsByTagName("retConsReciMDFe");
foreach (XmlNode retConsReciNFeNode in retConsReciNFeList)
{
var retConsReciNFeElemento = (XmlElement)retConsReciNFeNode;
//Pegar o número do recibo do lote enviado
var nRec = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName(TpcnResources.nRec.ToString())[0] != null)
{
nRec = retConsReciNFeElemento.GetElementsByTagName(TpcnResources.nRec.ToString())[0].InnerText;
}
//Pegar o status de retorno do lote enviado
var cStatLote = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0] != null)
{
cStatLote = retConsReciNFeElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0].InnerText;
}
switch (cStatLote)
{
#region Rejeições do XML de consulta do recibo (Não é o lote que foi rejeitado e sim o XML de consulta do recibo)
#region Validação do certificado de transmissão
case "280":
case "281":
case "282":
case "283":
case "284":
case "285":
case "286":
#endregion Validação do certificado de transmissão
#region Validação inicial da mensagem no webservice
case "214":
case "243":
case "108":
case "109":
#endregion Validação inicial da mensagem no webservice
#region Validação das informações de controle da chamada ao webservice
case "242":
case "409":
case "410":
case "411":
case "238":
case "239":
#endregion Validação das informações de controle da chamada ao webservice
#region Validação da forma da área de dados
case "215":
case "598":
case "599":
case "404":
case "402":
#endregion Validação da forma da área de dados
#region Validação das regras de negócio da consulta recibo
case "252":
case "226":
case "247":
case "494":
case "227":
case "253":
#endregion Validação das regras de negócio da consulta recibo
break;
#region Lote não foi localizado pelo recibo que está sendo consultado
case "106": //E-Verifica se o lote não está na fila de saída, nem na fila de entrada (Lote não encontrado)
//No caso do lote não encontrado através do recibo, o ERP vai ter que consultar a situação da NFe para encerrar ela
//Vou somente excluir ela do fluxo para não ficar consultando o recibo que não existe
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
break;
#endregion Lote não foi localizado pelo recibo que está sendo consultado
#endregion Rejeições do XML de consulta do recibo (Não é o lote que foi rejeitado e sim o XML de consulta do recibo)
#region Lote foi processado, agora tenho que tratar as notas fiscais dele
case "104": //Lote processado
var protNFeList = retConsReciNFeElemento.GetElementsByTagName("protMDFe");
foreach (XmlNode protNFeNode in protNFeList)
{
var protNFeElemento = (XmlElement)protNFeNode;
var strProtNfe = protNFeElemento.OuterXml;
var infProtList = protNFeElemento.GetElementsByTagName("infProt");
foreach (XmlNode infProtNode in infProtList)
{
bool tirarFluxo = true;
var infProtElemento = (XmlElement)infProtNode;
var strChaveNFe = string.Empty;
var strStat = string.Empty;
if (infProtElemento.GetElementsByTagName(TpcnResources.chMDFe.ToString())[0] != null)
{
strChaveNFe = "MDFe" + infProtElemento.GetElementsByTagName(TpcnResources.chMDFe.ToString())[0].InnerText;
}
if (infProtElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0] != null)
{
strStat = infProtElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0].InnerText;
}
//Definir o nome do arquivo da NFe e seu caminho
var strNomeArqNfe = fluxoNFe.LerTag(strChaveNFe, FluxoNfe.ElementoFixo.ArqNFe);
// se por algum motivo o XML não existir no "Fluxo", então o arquivo tem que existir
// na pasta "EmProcessamento" assinada.
if (string.IsNullOrEmpty(strNomeArqNfe))
{
if (string.IsNullOrEmpty(strChaveNFe))
{
throw new Exception("LerRetornoLoteMDFe(): Não pode obter o nome do arquivo");
}
strNomeArqNfe = strChaveNFe.Substring(4) + Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML;
}
var strArquivoNFe = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + strNomeArqNfe;
//Atualizar a Tag de status da NFe no fluxo para que se ocorrer alguma falha na exclusão eu tenha esta campo para ter uma referencia em futuras consultas
fluxoNFe.AtualizarTag(strChaveNFe, FluxoNfe.ElementoEditavel.cStat, strStat);
//Atualizar a tag da data e hora da ultima consulta do recibo
fluxoNFe.AtualizarDPedRec(nRec, DateTime.Now);
switch (strStat)
{
case "100": //MDFe Autorizado
if (File.Exists(strArquivoNFe))
{
//Juntar o protocolo com a NFE já copiando para a pasta de autorizadas
var strArquivoNFeProc = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
Functions.ExtrairNomeArq(strNomeArqNfe, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML) + Propriedade.ExtRetorno.ProcMDFe;
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
XmlDocument conteudoXMLMDFe = new XmlDocument();
conteudoXMLMDFe.Load(strArquivoNFe);
oLerXml.Mdfe(conteudoXMLMDFe);
//Verificar se a -nfe.xml existe na pasta de autorizados
bool NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML);
//Verificar se o -procNfe.xml existe na past de autorizados
bool procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML, Propriedade.ExtRetorno.ProcMDFe);
//Se o XML de distribuição não estiver na pasta de autorizados
if (!procNFeJaNaAutorizada)
{
if (!File.Exists(strArquivoNFeProc))
{
oGerarXML.XmlDistMDFe(strArquivoNFe, strProtNfe, Propriedade.ExtRetorno.ProcMDFe, oLerXml.oDadosNfe.versao);
}
}
if (!(procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML, Propriedade.ExtRetorno.ProcMDFe)))
{
//Mover a nfePRoc da pasta de NFE em processamento para a NFe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário,
//assim sendo não inverta as posições. Wandrey 08/10/2009
TFunctions.MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
//Atualizar a situação para que eu só mova o arquivo com final -NFe.xml para a pasta autorizado se
//a procnfe já estiver lá, ou vai ficar na pasta emProcessamento para tentar gerar novamente.
//Isso vai dar uma maior segurança para não deixar sem gerar o -procnfe.xml. Wandrey 13/12/2012
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML, Propriedade.ExtRetorno.ProcMDFe);
}
if (!NFeJaNaAutorizada && procNFeJaNaAutorizada)
{
//Mover a NFE da pasta de NFE em processamento para NFe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário.
//assim sendo não inverta as posições. Wandrey 08/10/2009
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
//Disparar a geração/impressao do UniDanfe. 03/02/2010 - Wandrey
if (procNFeJaNaAutorizada)
{
try
{
var strArquivoDist = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.Autorizados.ToString() + "\\" +
Empresas.Configuracoes[emp].DiretorioSalvarComo.ToString(oLerXml.oDadosNfe.dEmi) +
Path.GetFileName(strArquivoNFeProc);
TFunctions.ExecutaUniDanfe(strArquivoDist, oLerXml.oDadosNfe.dEmi, Empresas.Configuracoes[emp]);
}
catch (Exception ex)
{
Auxiliar.WriteLog("TaskMDFeRetRecepcao: " + ex.Message, false);
}
}
//Vou verificar se estão os dois arquivos na pasta Autorizados, se tiver eu tiro do fluxo caso contrário não. Wandrey 13/02/2012
NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML);
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML, Propriedade.ExtRetorno.ProcMDFe);
if (!procNFeJaNaAutorizada || !NFeJaNaAutorizada)
{
tirarFluxo = false;
}
}
break;
default: //NFe foi rejeitada
//O Status da NFe tem que ser maior que 1 ou deu algum erro na hora de ler o XML de retorno da consulta do recibo, sendo assim, vou mantar a nota no fluxo para consultar novamente.
if (Convert.ToInt32(strStat) >= 1)
{
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoNFe);
}
else
{
tirarFluxo = false;
}
break;
}
//Deletar a NFE do arquivo de controle de fluxo
if (tirarFluxo)
{
fluxoNFe.ExcluirNfeFluxo(strChaveNFe);
}
break;
}
}
break;
#endregion Lote foi processado, agora tenho que tratar as notas fiscais dele
#region Qualquer outro tipo de status que não for os acima relacionados, vai tirar a nota fiscal do fluxo.
default:
//Qualquer outro tipo de rejeião vou tirar todas as notas do lote do fluxo, pois se o lote foi rejeitado, todas as notas fiscais também foram
//De acordo com o manual de integração se o status do lote não for 104, tudo foi rejeitado. Wandrey 20/07/2010
if (Convert.ToInt32(cStatLote) >= 1)
{
//Vou retirar as notas do fluxo pelo recibo
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
}
break;
#endregion Qualquer outro tipo de status que não for os acima relacionados, vai tirar a nota fiscal do fluxo.
}
}
}
public override void Execute()
{
int emp = Empresas.FindEmpresaByThread();
try
{
dadosRec = new DadosRecClass();
FluxoNfe fluxoNfe = new FluxoNfe();
LerXML lerXml = new LerXML();
#region Parte que envia o lote
//Ler o XML de Lote para pegar o número do lote que está sendo enviado
lerXml.Cte(NomeArquivoXML);
string idLote = lerXml.oDadosNfe.idLote;
//Definir o objeto do WebService
WebServiceProxy wsProxy = ConfiguracaoApp.DefinirWS(Servico, emp, Convert.ToInt32(lerXml.oDadosNfe.cUF), Convert.ToInt32(lerXml.oDadosNfe.tpAmb), Convert.ToInt32(lerXml.oDadosNfe.tpEmis));
//Criar objetos das classes dos serviços dos webservices do SEFAZ
object oRecepcao = wsProxy.CriarObjeto(wsProxy.NomeClasseWS);//(Servico, Convert.ToInt32(lerXml.oDadosNfe.cUF)));
var oCabecMsg = wsProxy.CriarObjeto(NomeClasseCabecWS(Convert.ToInt32(lerXml.oDadosNfe.cUF), Servico));
//Atribuir conteúdo para duas propriedades da classe nfeCabecMsg
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.cUF.ToString(), lerXml.oDadosNfe.cUF);
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.versaoDados.ToString(), NFe.ConvertTxt.versoes.VersaoXMLCTe);
//
//XML neste ponto a NFe já está assinada, pois foi assinada, validada e montado o lote para envio por outro serviço.
//Fica aqui somente este lembrete. Wandrey 16/03/2010
//
//Invocar o método que envia o XML para o SEFAZ
oInvocarObj.Invocar(wsProxy,
oRecepcao,
wsProxy.NomeMetodoWS[0],//NomeMetodoWS(Servico, Convert.ToInt32(lerXml.oDadosNfe.cUF)),
oCabecMsg, this, "-env-lot", "-rec");
#endregion
#region Parte que trata o retorno do lote, ou seja, o número do recibo
Recibo(vStrXmlRetorno);
if (dadosRec.cStat == "103") //Lote recebido com sucesso
{
//Atualizar o número do recibo no XML de controle do fluxo de notas enviadas
fluxoNfe.AtualizarTag(lerXml.oDadosNfe.chavenfe, FluxoNfe.ElementoEditavel.tMed, dadosRec.tMed.ToString());
fluxoNfe.AtualizarTagRec(idLote, dadosRec.nRec);
}
else if (Convert.ToInt32(dadosRec.cStat) > 200 ||
Convert.ToInt32(dadosRec.cStat) == 108 || //Verifica se o servidor de processamento está paralisado momentaneamente. Wandrey 13/04/2012
Convert.ToInt32(dadosRec.cStat) == 109) //Verifica se o servidor de processamento está paralisado sem previsão. Wandrey 13/04/2012
{
//Se o status do retorno do lote for maior que 200 ou for igual a 108 ou 109,
//vamos ter que excluir a nota do fluxo, porque ela foi rejeitada pelo SEFAZ
//Primeiro vamos mover o xml da nota da pasta EmProcessamento para pasta de XML´s com erro e depois tira ela do fluxo
//Wandrey 30/04/2009
oAux.MoveArqErro(Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + fluxoNfe.LerTag(lerXml.oDadosNfe.chavenfe, FluxoNfe.ElementoFixo.ArqNFe));
fluxoNfe.ExcluirNfeFluxo(lerXml.oDadosNfe.chavenfe);
}
//Deleta o arquivo de lote
Functions.DeletarArquivo(NomeArquivoXML);
#endregion
}
catch (ExceptionEnvioXML ex)
{
//Ocorreu algum erro no exato momento em que tentou enviar o XML para o SEFAZ, vou ter que tratar
//para ver se o XML chegou lá ou não, se eu consegui pegar o número do recibo de volta ou não, etc.
//E ver se vamos tirar o XML do Fluxo ou finalizar ele com a consulta situação da NFe
//TODO: V3.0 - Tratar o problema de não conseguir pegar o recibo exatamente neste ponto
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (ExceptionSemInternet ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex, false);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (Exception ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
}
public override void Execute()
{
int emp = Empresas.FindEmpresaByThread();
try
{
dadosRec = new DadosRecClass();
FluxoNfe fluxoNfe = new FluxoNfe();
LerXML lerXml = new LerXML();
//Ler o XML de Lote para pegar o número do lote que está sendo enviado
lerXml.Mdfe(ConteudoXML);
var idLote = lerXml.oDadosNfe.idLote;
//Definir o objeto do WebService
WebServiceProxy wsProxy = ConfiguracaoApp.DefinirWS(Servico, emp, Convert.ToInt32(lerXml.oDadosNfe.cUF), Convert.ToInt32(lerXml.oDadosNfe.tpAmb), Convert.ToInt32(lerXml.oDadosNfe.tpEmis), 0);
System.Net.SecurityProtocolType securityProtocolType = WebServiceProxy.DefinirProtocoloSeguranca(Convert.ToInt32(lerXml.oDadosNfe.cUF), Convert.ToInt32(lerXml.oDadosNfe.tpAmb), Convert.ToInt32(lerXml.oDadosNfe.tpEmis), Servico);
//Criar objetos das classes dos serviços dos webservices do SEFAZ
object oRecepcao = wsProxy.CriarObjeto(wsProxy.NomeClasseWS);
var oCabecMsg = wsProxy.CriarObjeto(NomeClasseCabecWS(Convert.ToInt32(lerXml.oDadosNfe.cUF), Servico));
//Atribuir conteúdo para duas propriedades da classe nfeCabecMsg
wsProxy.SetProp(oCabecMsg, TpcnResources.cUF.ToString(), lerXml.oDadosNfe.cUF);
wsProxy.SetProp(oCabecMsg, TpcnResources.versaoDados.ToString(), lerXml.oDadosNfe.versao);
//
//XML neste ponto o MDFe já está assinado, pois foi assinado, validado e montado o lote para envio por outro serviço.
//Fica aqui somente este lembrete. Wandrey 16/03/2010
//
//Invocar o método que envia o XML para o SEFAZ
oInvocarObj.Invocar(wsProxy,
oRecepcao,
wsProxy.NomeMetodoWS[0],
oCabecMsg, this,
Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML,
Propriedade.ExtRetorno.Rec,
true,
securityProtocolType);
#region Parte que trata o retorno do lote, ou seja, o número do recibo
Recibo(vStrXmlRetorno, emp);
if (dadosRec.cStat == "103") //Lote recebido com sucesso
{
if (dadosRec.tMed > 0)
{
Thread.Sleep(dadosRec.tMed * 1000);
}
//Atualizar o número do recibo no XML de controle do fluxo de notas enviadas
fluxoNfe.AtualizarTag(lerXml.oDadosNfe.chavenfe, FluxoNfe.ElementoEditavel.tMed, (dadosRec.tMed + 2).ToString());
fluxoNfe.AtualizarTagRec(idLote, dadosRec.nRec);
XmlDocument xmlPedRec = oGerarXML.XmlPedRecMDFe(dadosRec.nRec, dadosRec.versao, emp);
TaskMDFeRetRecepcao mdfeRetRecepcao = new TaskMDFeRetRecepcao(xmlPedRec);
mdfeRetRecepcao.Execute();
}
else if (Convert.ToInt32(dadosRec.cStat) > 200 ||
Convert.ToInt32(dadosRec.cStat) == 108 || //Verifica se o servidor de processamento está paralisado momentaneamente. Wandrey 13/04/2012
Convert.ToInt32(dadosRec.cStat) == 109) //Verifica se o servidor de processamento está paralisado sem previsão. Wandrey 13/04/2012
{
//Se o status do retorno do lote for maior que 200 ou for igual a 108 ou 109,
//vamos ter que excluir a nota do fluxo, porque ela foi rejeitada pelo SEFAZ
//Primeiro vamos mover o xml da nota da pasta EmProcessamento para pasta de XML´s com erro e depois tira ela do fluxo
//Wandrey 30/04/2009
oAux.MoveArqErro(Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + fluxoNfe.LerTag(lerXml.oDadosNfe.chavenfe, FluxoNfe.ElementoFixo.ArqNFe));
fluxoNfe.ExcluirNfeFluxo(lerXml.oDadosNfe.chavenfe);
}
//Deleta o arquivo de lote
Functions.DeletarArquivo(NomeArquivoXML);
#endregion Parte que trata o retorno do lote, ou seja, o número do recibo
}
catch (ExceptionEnvioXML ex)
{
//Ocorreu algum erro no exato momento em que tentou enviar o XML para o SEFAZ, vou ter que tratar
//para ver se o XML chegou lá ou não, se eu consegui pegar o número do recibo de volta ou não, etc.
//E ver se vamos tirar o XML do Fluxo ou finalizar ele com a consulta situação da NFe
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (ExceptionSemInternet ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML, Propriedade.ExtRetorno.Rec_ERR, ex, false);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (Exception ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.Extensao(Propriedade.TipoEnvio.EnvLot).EnvioXML, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
}
/// <summary>
/// Finalizar o envio da NFe
/// </summary>
public void FinalizarNFe(XmlNodeList protNFeList, FluxoNfe fluxoNFe, int emp)
{
var oLerXml = new LerXML();
foreach (XmlNode protNFeNode in protNFeList)
{
var protNFeElemento = (XmlElement)protNFeNode;
string versao = protNFeElemento.GetAttribute(NFe.Components.TpcnResources.versao.ToString());
var strProtNfe = protNFeElemento.OuterXml;
var infProtList = protNFeElemento.GetElementsByTagName("infProt");
foreach (XmlNode infProtNode in infProtList)
{
bool tirarFluxo = true;
var infProtElemento = (XmlElement)infProtNode;
var strChaveNFe = string.Empty;
var strStat = string.Empty;
if (infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.chNFe.ToString())[0] != null)
{
strChaveNFe = "NFe" + infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.chNFe.ToString())[0].InnerText;
}
if (infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.cStat.ToString())[0] != null)
{
strStat = infProtElemento.GetElementsByTagName(NFe.Components.TpcnResources.cStat.ToString())[0].InnerText;
}
//Definir o nome do arquivo da NFe e seu caminho
var strNomeArqNfe = fluxoNFe.LerTag(strChaveNFe, FluxoNfe.ElementoFixo.ArqNFe);
// danasa 8-2009
// se por algum motivo o XML não existir no "Fluxo", então o arquivo tem que existir
// na pasta "EmProcessamento" assinada.
if (string.IsNullOrEmpty(strNomeArqNfe))
{
if (string.IsNullOrEmpty(strChaveNFe))
{
throw new Exception("LerRetornoLoteNFe(): Não pode obter o nome do arquivo");
}
strNomeArqNfe = strChaveNFe.Substring(3) + Propriedade.ExtEnvio.Nfe;
}
var strArquivoNFe = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
strNomeArqNfe;
//Atualizar a Tag de status da NFe no fluxo para que se ocorrer alguma falha na exclusão eu tenha esta campo para ter uma referencia em futuras consultas
fluxoNFe.AtualizarTag(strChaveNFe, FluxoNfe.ElementoEditavel.cStat, strStat);
switch (strStat)
{
case "100": //NFe Autorizada
case "150": //NFe Autorizada fora do prazo
if (File.Exists(strArquivoNFe))
{
//Juntar o protocolo com a NFE já copiando para a pasta de autorizadas
var strArquivoNFeProc = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
Functions.ExtrairNomeArq(strNomeArqNfe, Propriedade.ExtEnvio.Nfe) +
Propriedade.ExtRetorno.ProcNFe;
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
oLerXml.Nfe(strArquivoNFe);
//Verificar se a -nfe.xml existe na pasta de autorizados
bool NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtEnvio.Nfe);
//Verificar se o -procNfe.xml existe na pasta de autorizados
bool procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe);
//Se o XML de distribuição não estiver na pasta de autorizados
if (!procNFeJaNaAutorizada)
{
if (!File.Exists(strArquivoNFeProc))
{
Auxiliar.WriteLog("TaskNFeRetRecepcao: Gerou o arquivo de distribuição através da consulta recibo.", false);
oGerarXML.XmlDistNFe(strArquivoNFe, strProtNfe, Propriedade.ExtRetorno.ProcNFe, versao);
}
}
if (!(procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe)))
{
//Mover a nfePRoc da pasta de NFE em processamento para a NFe Autorizada
//Para enviar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário,
//assim sendo não inverta as posições. Wandrey 08/10/2009
TFunctions.MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
//Atualizar a situação para que eu só mova o arquivo com final -NFe.xml para a pasta autorizado se
//a procnfe já estiver lá, ou vai ficar na pasta emProcessamento para tentar gerar novamente.
//Isso vai dar uma maior segurança para não deixar sem gerar o -procnfe.xml. Wandrey 13/12/2012
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe);
}
if (!NFeJaNaAutorizada && procNFeJaNaAutorizada)
{
//Mover a NFE da pasta de NFE em processamento para NFe Autorizada
//Para enviar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário.
//assim sendo não inverta as posições. Wandrey 08/10/2009
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
//Disparar a geração/impressão do UniDanfe. 03/02/2010 - Wandrey
if (procNFeJaNaAutorizada)
{
///
/// tem que passar o arquivo de distribuicao da nfe
///
string strArquivoDist = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.Autorizados.ToString() + "\\" +
Empresas.Configuracoes[emp].DiretorioSalvarComo.ToString(oLerXml.oDadosNfe.dEmi) +
Path.GetFileName(strArquivoNFeProc);
try
{
TFunctions.ExecutaUniDanfe(strArquivoDist, oLerXml.oDadosNfe.dEmi, Empresas.Configuracoes[emp]);
}
catch (Exception ex)
{
Auxiliar.WriteLog("TaskRecepcao: (Falha na execução do UniDANFe) " + ex.Message, false);
}
}
//Vou verificar se estão os dois arquivos na pasta Autorizados, se tiver eu tiro do fluxo caso contrário não. Wandrey 13/02/2012
NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtEnvio.Nfe);
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe, Propriedade.ExtRetorno.ProcNFe);
if (!procNFeJaNaAutorizada || !NFeJaNaAutorizada)
{
tirarFluxo = false;
}
///
/// se o -nfe.xml já existe na pasta de autorizados e ele está na pasta em processamento,
/// o exclui da pasta em processamento
if (NFeJaNaAutorizada && File.Exists(strArquivoNFe))
{
File.Delete(strArquivoNFe);
}
}
else
{
Auxiliar.WriteLog("TaskRetRecepcao: (Foi efetuada uma consulta recibo e não foi localizado o arquivo da NFe ( " + strNomeArqNfe + ") na pasta EmProcessamento) ", false);
}
break;
case "110":
case "205":
case "301":
case "302":
case "303":
ProcessaNFeDenegada(emp, oLerXml, strArquivoNFe, protNFeElemento.OuterXml, versao);
break;
default: //NFe foi rejeitada
//O Status da NFe tem que ser maior que 1 ou deu algum erro na hora de ler o XML de retorno da consulta do recibo, sendo assim, vou mantar a nota no fluxo para consultar novamente.
if (Convert.ToInt32(strStat) >= 1)
{
Auxiliar.WriteLog("Arquivo: " + strNomeArqNfe + " codigo de retorno: " + strStat, false);
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoNFe);
}
else
{
tirarFluxo = false;
}
break;
}
//Deletar a NFE do arquivo de controle de fluxo
if (tirarFluxo)
{
fluxoNFe.ExcluirNfeFluxo(strChaveNFe);
}
break;
}
}
}
/// <summary>
/// Efetua a leitura do XML de retorno do processamento do lote de notas fiscais e
/// atualiza o arquivo de fluxo e envio de notas
/// </summary>
/// <by>Wandrey Mundin Ferreira</by>
/// <date>20/04/2009</date>
///
#if notused
protected override void LerRetornoLoteNFe()
{
int emp = new FindEmpresaThread(Thread.CurrentThread).Index;
var oLerXml = new LerXML();
var msXml = Functions.StringXmlToStream(vStrXmlRetorno);
var fluxoNFe = new FluxoNfe();
try
{
var doc = new XmlDocument();
doc.Load(msXml);
var retConsReciNFeList = doc.GetElementsByTagName("retConsReciNFe");
foreach (XmlNode retConsReciNFeNode in retConsReciNFeList)
{
var retConsReciNFeElemento = (XmlElement)retConsReciNFeNode;
//Pegar o número do recibo do lote enviado
var nRec = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName("nRec")[0] != null)
{
nRec = retConsReciNFeElemento.GetElementsByTagName("nRec")[0].InnerText;
}
//Pegar o status de retorno do lote enviado
var cStatLote = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName("cStat")[0] != null)
{
cStatLote = retConsReciNFeElemento.GetElementsByTagName("cStat")[0].InnerText;
}
switch (cStatLote)
{
#region Rejeições do XML de consulta do recibo (Não é o lote que foi rejeitado e sim o XML de consulta do recibo)
#region Validação do certificado de transmissão
case "280":
case "281":
case "282":
case "283":
case "284":
case "285":
case "286":
#endregion
#region Validação inicial da mensagem no webservice
case "214":
case "243":
case "108":
case "109":
#endregion
#region Validação das informações de controle da chamada ao webservice
case "242":
case "409":
case "410":
case "411":
case "238":
case "239":
#endregion
#region Validação da forma da área de dados
case "215":
case "516":
case "517":
case "545":
case "587":
case "588":
case "404":
case "402":
#endregion
#region Validação das regras de negócio da consulta recibo
case "252":
case "248":
case "553":
case "105":
case "223":
#endregion
break;
#region Lote não foi localizado pelo recibo que está sendo consultado
case "106": //E-Verifica se o lote não está na fila de saída, nem na fila de entrada (Lote não encontrado)
//No caso do lote não encontrado através do recibo, o ERP vai ter que consultar a situação da NFe para encerrar ela
//Vou somente excluir ela do fluxo para não ficar consultando o recibo que não existe
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
break;
#endregion
#endregion
#region Lote foi processado, agora tenho que tratar as notas fiscais dele
case "104": //Lote processado
var protNFeList = retConsReciNFeElemento.GetElementsByTagName("protNFe");
foreach (XmlNode protNFeNode in protNFeList)
{
var protNFeElemento = (XmlElement)protNFeNode;
var strProtNfe = protNFeElemento.OuterXml;
var infProtList = protNFeElemento.GetElementsByTagName("infProt");
foreach (XmlNode infProtNode in infProtList)
{
bool tirarFluxo = true;
var infProtElemento = (XmlElement)infProtNode;
var strChaveNFe = string.Empty;
var strStat = string.Empty;
if (infProtElemento.GetElementsByTagName("chNFe")[0] != null)
{
strChaveNFe = "NFe" + infProtElemento.GetElementsByTagName("chNFe")[0].InnerText;
}
if (infProtElemento.GetElementsByTagName("cStat")[0] != null)
{
strStat = infProtElemento.GetElementsByTagName("cStat")[0].InnerText;
}
//Definir o nome do arquivo da NFe e seu caminho
var strNomeArqNfe = fluxoNFe.LerTag(strChaveNFe, FluxoNfe.ElementoFixo.ArqNFe);
// danasa 8-2009
// se por algum motivo o XML não existir no "Fluxo", então o arquivo tem que existir
// na pasta "EmProcessamento" assinada.
if (string.IsNullOrEmpty(strNomeArqNfe))
{
if (string.IsNullOrEmpty(strChaveNFe))
throw new Exception("LerRetornoLoteNFe(): Não pode obter o nome do arquivo");
strNomeArqNfe = strChaveNFe.Substring(3) + Propriedade.ExtEnvio.Nfe;
}
var strArquivoNFe = Empresa.Configuracoes[emp].PastaEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + strNomeArqNfe;
//Atualizar a Tag de status da NFe no fluxo para que se ocorrer alguma falha na exclusão eu tenha esta campo para ter uma referencia em futuras consultas
fluxoNFe.AtualizarTag(strChaveNFe, FluxoNfe.ElementoEditavel.cStat, strStat);
//Atualizar a tag da data e hora da ultima consulta do recibo
fluxoNFe.AtualizarDPedRec(nRec, DateTime.Now);
switch (strStat)
{
case "100": //NFe Autorizada
if (File.Exists(strArquivoNFe))
{
//Juntar o protocolo com a NFE já copiando para a pasta de autorizadas
var strArquivoNFeProc = Empresa.Configuracoes[emp].PastaEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
Functions.ExtrairNomeArq(strNomeArqNfe, Propriedade.ExtEnvio.Nfe) + Propriedade.ExtRetorno.ProcNFe;
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
oLerXml.Nfe(strArquivoNFe);
//Verificar se a -nfe.xml existe na pasta de autorizados
bool NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe);
//Verificar se o -procNfe.xml existe na past de autorizados
bool procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtRetorno.ProcNFe);
//Se o XML de distribuição não estiver na pasta de autorizados
if (!procNFeJaNaAutorizada)
{
if (!File.Exists(strArquivoNFeProc))
{
oGerarXML.XmlDistNFe(strArquivoNFe, strProtNfe, Propriedade.ExtRetorno.ProcNFe);
}
}
if (!procNFeJaNaAutorizada)
{
//Mover a nfePRoc da pasta de NFE em processamento para a NFe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário,
//assim sendo não inverta as posições. Wandrey 08/10/2009
MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
//Atualizar a situação para que eu só mova o arquivo com final -NFe.xml para a pasta autorizado se
//a procnfe já estiver lá, ou vai ficar na pasta emProcessamento para tentar gerar novamente.
//Isso vai dar uma maior segurança para não deixar sem gerar o -procnfe.xml. Wandrey 13/12/2012
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtRetorno.ProcNFe);
}
if (!NFeJaNaAutorizada && procNFeJaNaAutorizada)
{
//Mover a NFE da pasta de NFE em processamento para NFe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário.
//assim sendo não inverta as posições. Wandrey 08/10/2009
MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
//Disparar a geração/impressçao do UniDanfe. 03/02/2010 - Wandrey
if (procNFeJaNaAutorizada)
ExecutaUniDanfe(strNomeArqNfe, oLerXml.oDadosNfe.dEmi);
//Vou verificar se estão os dois arquivos na pasta Autorizados, se tiver eu tiro do fluxo caso contrário não. Wandrey 13/02/2012
NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Nfe);
procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoNFe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtRetorno.ProcNFe);
if (!procNFeJaNaAutorizada || !NFeJaNaAutorizada)
{
tirarFluxo = false;
}
}
break;
case "110":
case "205":
case "301":
case "302":
ProcessaNotaDenegada(emp, oLerXml, strArquivoNFe, infProtElemento);
/*
if (File.Exists(strArquivoNFe))
{
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s Denegados
oLerXml.Nfe(strArquivoNFe);
//Mover a NFE da pasta de NFE em processamento para NFe Denegadas
oAux.MoverArquivo(strArquivoNFe, PastaEnviados.Denegados, oLerXml.oDadosNfe.dEmi);
}*/
break;
//case "302": //NFe Denegada - Problemas com o destinatário
// goto case "301";
//case "110": //NFe Denegada - Não sei quando ocorre este, mas descobrir ele no manual então estou incluindo. Wandrey 20/10/2009
// goto case "301";
default: //NFe foi rejeitada
//O Status da NFe tem que ser maior que 1 ou deu algum erro na hora de ler o XML de retorno da consulta do recibo, sendo assim, vou mantar a nota no fluxo para consultar novamente.
if (Convert.ToInt32(strStat) >= 1)
{
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoNFe);
}
else
tirarFluxo = false;
break;
}
//Deletar a NFE do arquivo de controle de fluxo
if (tirarFluxo)
fluxoNFe.ExcluirNfeFluxo(strChaveNFe);
break;
}
}
break;
#endregion
#region Qualquer outro tipo de status que não for os acima relacionados, vai tirar a nota fiscal do fluxo.
default:
//Qualquer outro tipo de rejeião vou tirar todas as notas do lote do fluxo, pois se o lote foi rejeitado, todas as notas fiscais também foram
//De acordo com o manual de integração se o status do lote não for 104, tudo foi rejeitado. Wandrey 20/07/2010
if (Convert.ToInt32(cStatLote) >= 1)
{
//Vou retirar as notas do fluxo pelo recibo
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
}
break;
#endregion
}
}
}
catch (Exception ex)
{
throw (ex);
}
}
/// <summary>
/// Efetua a leitura do XML de retorno do processamento do lote de notas fiscais e
/// atualiza o arquivo de fluxo e envio de notas
/// </summary>
/// <by>Wandrey Mundin Ferreira</by>
/// <date>20/04/2009</date>
///
#if notused
protected override void LerRetornoLoteCTe()
{
int emp = new FindEmpresaThread(Thread.CurrentThread).Index;
var oLerXml = new LerXML();
var msXml = Functions.StringXmlToStream(vStrXmlRetorno);
var fluxoNFe = new FluxoNfe();
try
{
var doc = new XmlDocument();
doc.Load(msXml);
var retConsReciNFeList = doc.GetElementsByTagName("retConsReciCTe");
foreach (XmlNode retConsReciNFeNode in retConsReciNFeList)
{
var retConsReciNFeElemento = (XmlElement)retConsReciNFeNode;
//Pegar o número do recibo do lote enviado
var nRec = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName("nRec")[0] != null)
{
nRec = retConsReciNFeElemento.GetElementsByTagName("nRec")[0].InnerText;
}
//Pegar o status de retorno do lote enviado
var cStatLote = string.Empty;
if (retConsReciNFeElemento.GetElementsByTagName("cStat")[0] != null)
{
cStatLote = retConsReciNFeElemento.GetElementsByTagName("cStat")[0].InnerText;
}
switch (cStatLote)
{
#region Rejeições do XML de consulta do recibo (Não é o lote que foi rejeitado e sim o XML de consulta do recibo)
case "280": //A-Certificado transmissor inválido
case "281": //A-Validade do certificado
case "283": //A-Verifica a cadeia de Certificação
case "286": //A-LCR do certificado de Transmissor
case "284": //A-Certificado do Transmissor revogado
case "285": //A-Certificado Raiz difere da "IPC-Brasil"
case "282": //A-Falta a extensão de CNPJ no Certificado
case "214": //B-Tamanho do XML de dados superior a 500 Kbytes
case "243": //B-XML de dados mal formatado
case "108": //B-Verifica se o Serviço está paralisado momentaneamente
case "109": //B-Verifica se o serviço está paralisado sem previsão
case "242": //C-Elemento nfeCabecMsg inexistente no SOAP Header
case "409": //C-Campo cUF inexistente no elemento nfeCabecMsg do SOAP Header
case "410": //C-Campo versaoDados inexistente no elemento nfeCabecMsg do SOAP
case "411": //C-Campo versaoDados inexistente no elemento nfeCabecMsg do SOAP
case "238": //C-Versão dos Dados informada é superior à versão vigente
case "239": //C-Versão dos Dados não suportada
case "215": //D-Verifica schema XML da área de dados
case "404": //D-Verifica o uso de prefixo no namespace
case "402": //D-XML utiliza codificação diferente de UTF-8
case "252": //E-Tipo do ambiente da NF-e difere do ambiente do web service
case "226": //E-UF da Chave de Acesso difere da UF do Web Service
case "236": //E-Valida DV da Chave de Acesso
case "217": //E-Acesso BD CTE
case "216": //E-Verificar se campo "Codigo Numerico"
break;
#endregion
#region Lote ainda está sendo processado
case "105": //E-Verifica se o lote não está na fila de resposta, mas está na fila de entrada (Lote em processamento)
//Ok vou aguardar o ERP gerar uma nova consulta para encerrar o fluxo da nota
break;
#endregion
#region Lote não foi localizado pelo recibo que está sendo consultado
case "106": //E-Verifica se o lote não está na fila de saída, nem na fila de entrada (Lote não encontrado)
//No caso do lote não encontrado através do recibo, o ERP vai ter que consultar a situação da NFe para encerrar ela
//Vou somente excluir ela do fluxo para não ficar consultando o recibo que não existe
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
break;
#endregion
#region Lote foi processado, agora tenho que tratar as notas fiscais dele
case "104": //Lote processado
var protNFeList = retConsReciNFeElemento.GetElementsByTagName("protCTe");
foreach (XmlNode protNFeNode in protNFeList)
{
var protNFeElemento = (XmlElement)protNFeNode;
var strProtNfe = protNFeElemento.OuterXml;
var infProtList = protNFeElemento.GetElementsByTagName("infProt");
foreach (XmlNode infProtNode in infProtList)
{
var infProtElemento = (XmlElement)infProtNode;
var strChaveNFe = string.Empty;
var strStat = string.Empty;
if (infProtElemento.GetElementsByTagName("chCTe")[0] != null)
{
strChaveNFe = "CTe" + infProtElemento.GetElementsByTagName("chCTe")[0].InnerText;
}
if (infProtElemento.GetElementsByTagName("cStat")[0] != null)
{
strStat = infProtElemento.GetElementsByTagName("cStat")[0].InnerText;
}
//Definir o nome do arquivo da NFe e seu caminho
var strNomeArqNfe = fluxoNFe.LerTag(strChaveNFe, FluxoNfe.ElementoFixo.ArqNFe);
// danasa 8-2009
// se por algum motivo o XML não existir no "Fluxo", então o arquivo tem que existir
// na pasta "EmProcessamento" assinada.
if (string.IsNullOrEmpty(strNomeArqNfe))
{
if (string.IsNullOrEmpty(strChaveNFe))
throw new Exception("LerRetornoLoteCTe(): Não pode obter o nome do arquivo");
strNomeArqNfe = strChaveNFe.Substring(3) + Propriedade.ExtEnvio.Nfe;
}
var strArquivoNFe = Empresa.Configuracoes[emp].PastaEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + strNomeArqNfe;
//Atualizar a Tag de status da NFe no fluxo para que se ocorrer alguma falha na exclusão eu tenha esta campo para ter uma referencia em futuras consultas
fluxoNFe.AtualizarTag(strChaveNFe, FluxoNfe.ElementoEditavel.cStat, strStat);
//Atualizar a tag da data e hora da ultima consulta do recibo
fluxoNFe.AtualizarDPedRec(nRec, DateTime.Now);
switch (strStat)
{
case "100": //NFe Autorizada
if (File.Exists(strArquivoNFe))
{
//Juntar o protocolo com a NFE já copiando para a pasta de autorizadas
oGerarXML.XmlDistNFe(strArquivoNFe, strProtNfe, Propriedade.ExtRetorno.ProcNFe);
var strArquivoNFeProc = Empresa.Configuracoes[emp].PastaEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
Functions/*oAux*/.ExtrairNomeArq(strNomeArqNfe, Propriedade.ExtEnvio.Nfe) + Propriedade.ExtRetorno.ProcNFe;
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
oLerXml.Nfe(strArquivoNFe);
//Mover a nfePRoc da pasta de NFE em processamento para a NFe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário,
//assim sendo não inverta as posições. Wandrey 08/10/2009
MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
//Mover a NFE da pasta de NFE em processamento para NFe Autorizada
//Para envitar falhar, tenho que mover primeiro o XML de distribuição (-procnfe.xml) para
//depois mover o da nfe (-nfe.xml), pois se ocorrer algum erro, tenho como reconstruir o senário.
//assim sendo não inverta as posições. Wandrey 08/10/2009
MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
//Disparar a geração/impressçao do UniDanfe. 03/02/2010 - Wandrey
//ExecutaUniDanfe(strNomeArqNfe, oLerXml.oDadosNfe.dEmi);
}
break;
case "301": //NFe Denegada - Irregularidade fiscal do emitente
if (File.Exists(strArquivoNFe))
{
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s Denegados
oLerXml.Nfe(strArquivoNFe);
//Mover a NFE da pasta de NFE em processamento para NFe Denegadas
MoverArquivo(strArquivoNFe, PastaEnviados.Denegados, oLerXml.oDadosNfe.dEmi);
}
break;
case "302": //NFe Denegada - Irregularidade fiscal do remetente
goto case "301";
case "303": //NFe Denegada - Irregularidade fiscal do destinatário
goto case "301";
case "304": //NFe Denegada - Irregularidade fiscal do expedidor
goto case "301";
case "305": //NFe Denegada - Irregularidade fiscal do recebedor
goto case "301";
case "306": //NFe Denegada - Irregularidade fiscal do tomador
goto case "301";
case "110": //NFe Denegada - Não sei quando ocorre este, mas descobrir ele no manual então estou incluindo. Wandrey 20/10/2009
goto case "301";
default: //NFe foi rejeitada
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoNFe);
break;
}
//Deletar a NFE do arquivo de controle de fluxo
fluxoNFe.ExcluirNfeFluxo(strChaveNFe);
break;
}
}
break;
#endregion
#region Qualquer outro tipo de status que não for os acima relacionados, vai tirar a nota fiscal do fluxo.
default:
//Qualquer outro tipo de rejeião vou tirar todas as notas do lote do fluxo, pois se o lote foi rejeitado, todas as notas fiscais também foram
//De acordo com o manual de integração se o status do lote não for 104, tudo foi rejeitado. Wandrey 20/07/2010
//Vou retirar as notas do fluxo pelo recibo
if (nRec != string.Empty)
{
fluxoNFe.ExcluirNfeFluxoRec(nRec.Trim());
}
break;
#endregion
}
}
}
catch (Exception ex)
{
throw (ex);
}
}
public override void Execute()
{
int emp = Empresas.FindEmpresaByThread();
try
{
dadosRec = new DadosRecClass();
FluxoNfe oFluxoNfe = new FluxoNfe();
LerXML oLer = new LerXML();
//Ler o XML de Lote para pegar o número do lote que está sendo enviado
oLer.Nfe(NomeArquivoXML);
if (oLer.oDadosNfe.versao != "2.00")
{
Servico = Servicos.NFeEnviarLote2;
}
var idLote = oLer.oDadosNfe.idLote;
//Definir o objeto do WebService
WebServiceProxy wsProxy = ConfiguracaoApp.DefinirWS(Servico, emp,
Convert.ToInt32(oLer.oDadosNfe.cUF),
Convert.ToInt32(oLer.oDadosNfe.tpAmb),
Convert.ToInt32(oLer.oDadosNfe.tpEmis),
oLer.oDadosNfe.versao,
oLer.oDadosNfe.mod);
if (Empresas.Configuracoes[emp].CompactarNfe && oLer.oDadosNfe.versao != "2.00" && wsProxy.NomeMetodoWS.Length == 2)
Servico = Servicos.NFeEnviarLoteZip2;
//Criar objetos das classes dos serviços dos webservices do SEFAZ
object oRecepcao = wsProxy.CriarObjeto(wsProxy.NomeClasseWS);
var oCabecMsg = wsProxy.CriarObjeto(NomeClasseCabecWS(Convert.ToInt32(oLer.oDadosNfe.cUF), Servico));
//Atribuir conteúdo para duas propriedades da classe nfeCabecMsg
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.cUF.ToString(), oLer.oDadosNfe.cUF);
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.versaoDados.ToString(), oLer.oDadosNfe.versao);
//XML neste ponto a NFe já está assinada, pois foi assinada, validada e montado o lote para envio por outro serviço.
//Fica aqui somente este lembrete. Wandrey 16/03/2010
// Envio de NFe Compactada - Renan 29/04/2014
if (Servico == Servicos.NFeEnviarLoteZip2)
{
FileInfo dadosArquivo = new FileInfo(NomeArquivoXML);
TFunctions.CompressXML(dadosArquivo);
}
string nOperacao = wsProxy.NomeMetodoWS[(Servico == Servicos.NFeEnviarLoteZip2) ? 1 : 0];
//Invocar o método que envia o XML para o SEFAZ
if (Empresas.Configuracoes[emp].IndSinc && oLer.oDadosNfe.versao != "2.00")
{
//Não posso gerar o arquivo na pasta de retorno através do método Invocar, por isso não estou colocando os dois ultimos parâmetros com a definição dos prefixos dos arquivos. O arquivo de retorno no processo síncrono deve acontecer somente depois de finalizado o processo da nota, ou gera problemas. Wandrey 11/06/2015
oInvocarObj.Invocar(wsProxy,
oRecepcao,
nOperacao,
oCabecMsg,
this);
Protocolo(vStrXmlRetorno);
}
else
{
oInvocarObj.Invocar(wsProxy,
oRecepcao,
nOperacao,
oCabecMsg,
this,
"-env-lot",
"-rec");
Recibo(vStrXmlRetorno);
}
if (dadosRec.cStat == "104") //Lote processado - Processo da NFe Síncrono - Wandrey 13/03/2014
{
FinalizarNFeSincrono(vStrXmlRetorno, emp);
oGerarXML.XmlRetorno(Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.ProRec_XML, vStrXmlRetorno);
}
else if (dadosRec.cStat == "103") //Lote recebido com sucesso - Processo da NFe Assíncrono
{
//Atualizar o número do recibo no XML de controle do fluxo de notas enviadas
oFluxoNfe.AtualizarTag(oLer.oDadosNfe.chavenfe, FluxoNfe.ElementoEditavel.tMed, dadosRec.tMed.ToString());
oFluxoNfe.AtualizarTagRec(idLote, dadosRec.nRec);
}
else if (Convert.ToInt32(dadosRec.cStat) > 200 ||
Convert.ToInt32(dadosRec.cStat) == 108 || //Verifica se o servidor de processamento está paralisado momentaneamente. Wandrey 13/04/2012
Convert.ToInt32(dadosRec.cStat) == 109) //Verifica se o servidor de processamento está paralisado sem previsão. Wandrey 13/04/2012
{
if (Empresas.Configuracoes[emp].IndSinc && oLer.oDadosNfe.versao != "2.00")
{
// OPS!!! Processo sincrono rejeição da SEFAZ, temos que gravar o XML para o ERP, pois no processo síncrono isso não pode ser feito dentro do método Invocar
oGerarXML.XmlRetorno(Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.ProRec_XML, vStrXmlRetorno);
}
//Se o status do retorno do lote for maior que 200 ou for igual a 108 ou 109,
//vamos ter que excluir a nota do fluxo, porque ela foi rejeitada pelo SEFAZ
//Primeiro vamos mover o xml da nota da pasta EmProcessamento para pasta de XML´s com erro e depois a tira do fluxo
//Wandrey 30/04/2009
oAux.MoveArqErro(Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + oFluxoNfe.LerTag(oLer.oDadosNfe.chavenfe, FluxoNfe.ElementoFixo.ArqNFe));
oFluxoNfe.ExcluirNfeFluxo(oLer.oDadosNfe.chavenfe);
}
//Deleta o arquivo de lote
Functions.DeletarArquivo(NomeArquivoXML);
// Envio de NFe Compactada - Renan 29/04/2014
if (Servico == Servicos.NFeEnviarLoteZip2)
Functions.DeletarArquivo(NomeArquivoXML + ".gz");
}
catch (ExceptionEnvioXML ex)
{
//Ocorreu algum erro no exato momento em que tentou enviar o XML para o SEFAZ, vou ter que tratar
//para ver se o XML chegou lá ou não, se eu consegui pegar o número do recibo de volta ou não, etc.
//E ver se vamos tirar o XML do Fluxo ou finalizar ele com a consulta situação da NFe
//TODO: V3.0 - Tratar o problema de não conseguir pegar o recibo exatamente neste ponto
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (ExceptionSemInternet ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex, false);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (Exception ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
}
public override void Execute()
{
int emp = Empresas.FindEmpresaByThread();
try
{
dadosRec = new DadosRecClass();
FluxoNfe oFluxoNfe = new FluxoNfe();
LerXML oLer = new LerXML();
//Ler o XML de Lote para pegar o número do lote que está sendo enviado
oLer.Nfe(NomeArquivoXML);
if (oLer.oDadosNfe.versao != "2.00")
{
Servico = Servicos.NFeEnviarLote2;
}
var idLote = oLer.oDadosNfe.idLote;
//Definir o objeto do WebService
WebServiceProxy wsProxy = ConfiguracaoApp.DefinirWS(Servico, emp,
Convert.ToInt32(oLer.oDadosNfe.cUF),
Convert.ToInt32(oLer.oDadosNfe.tpAmb),
Convert.ToInt32(oLer.oDadosNfe.tpEmis),
oLer.oDadosNfe.versao,
oLer.oDadosNfe.mod);
if (Empresas.Configuracoes[emp].CompactarNfe && oLer.oDadosNfe.versao != "2.00" && wsProxy.NomeMetodoWS.Length == 2)
{
Servico = Servicos.NFeEnviarLoteZip2;
}
//Criar objetos das classes dos serviços dos webservices do SEFAZ
object oRecepcao = wsProxy.CriarObjeto(wsProxy.NomeClasseWS);// NomeClasseWS(Servico, Convert.ToInt32(oLer.oDadosNfe.cUF)));
var oCabecMsg = wsProxy.CriarObjeto(NomeClasseCabecWS(Convert.ToInt32(oLer.oDadosNfe.cUF), Servico));
//Atribuir conteúdo para duas propriedades da classe nfeCabecMsg
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.cUF.ToString(), oLer.oDadosNfe.cUF);
wsProxy.SetProp(oCabecMsg, NFe.Components.TpcnResources.versaoDados.ToString(), oLer.oDadosNfe.versao);
//XML neste ponto a NFe já está assinada, pois foi assinada, validada e montado o lote para envio por outro serviço.
//Fica aqui somente este lembrete. Wandrey 16/03/2010
// Envio de NFe Compactada - Renan 29/04/2014
if (Servico == Servicos.NFeEnviarLoteZip2)//Empresas.Configuracoes[emp].CompactarNfe && oLer.oDadosNfe.versao != "2.00")
{
FileInfo dadosArquivo = new FileInfo(NomeArquivoXML);
TFunctions.CompressXML(dadosArquivo);
}
string nOperacao = wsProxy.NomeMetodoWS[(Servico == Servicos.NFeEnviarLoteZip2) ? 1 : 0];
//Invocar o método que envia o XML para o SEFAZ
if (Empresas.Configuracoes[emp].IndSinc && oLer.oDadosNfe.versao != "2.00")
{
oInvocarObj.Invocar(wsProxy,
oRecepcao,
nOperacao,//NomeMetodoWS(Servico, Convert.ToInt32(oLer.oDadosNfe.cUF), oLer.oDadosNfe.versao),
oCabecMsg, this);
Protocolo(vStrXmlRetorno);
}
else
{
oInvocarObj.Invocar(wsProxy,
oRecepcao,
nOperacao,//NomeMetodoWS(Servico, Convert.ToInt32(oLer.oDadosNfe.cUF), oLer.oDadosNfe.versao),
oCabecMsg, this, "-env-lot", "-rec");
Recibo(vStrXmlRetorno);
}
if (dadosRec.cStat == "104") //Lote processado - Processo da NFe Síncrono - Wandrey 13/03/2014
{
FinalizarNFeSincrono(vStrXmlRetorno, emp);
oGerarXML.XmlRetorno(Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.ProRec_XML, vStrXmlRetorno);
}
else if (dadosRec.cStat == "103") //Lote recebido com sucesso - Processo da NFe Assíncrono
{
//Atualizar o número do recibo no XML de controle do fluxo de notas enviadas
oFluxoNfe.AtualizarTag(oLer.oDadosNfe.chavenfe, FluxoNfe.ElementoEditavel.tMed, /*oLerRecibo.*/ dadosRec.tMed.ToString());
oFluxoNfe.AtualizarTagRec(idLote, /*oLerRecibo.*/ dadosRec.nRec);
}
else if (Convert.ToInt32(dadosRec.cStat) > 200 ||
Convert.ToInt32(dadosRec.cStat) == 108 || //Verifica se o servidor de processamento está paralisado momentaneamente. Wandrey 13/04/2012
Convert.ToInt32(dadosRec.cStat) == 109) //Verifica se o servidor de processamento está paralisado sem previsão. Wandrey 13/04/2012
{
//Se o status do retorno do lote for maior que 200 ou for igual a 108 ou 109,
//vamos ter que excluir a nota do fluxo, porque ela foi rejeitada pelo SEFAZ
//Primeiro vamos mover o xml da nota da pasta EmProcessamento para pasta de XML´s com erro e depois tira ela do fluxo
//Wandrey 30/04/2009
oAux.MoveArqErro(Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + oFluxoNfe.LerTag(oLer.oDadosNfe.chavenfe, FluxoNfe.ElementoFixo.ArqNFe));
oFluxoNfe.ExcluirNfeFluxo(oLer.oDadosNfe.chavenfe);
}
//Deleta o arquivo de lote
Functions.DeletarArquivo(NomeArquivoXML);
// Envio de NFe Compactada - Renan 29/04/2014
if (Servico == Servicos.NFeEnviarLoteZip2)//Empresas.Configuracoes[emp].CompactarNfe && oLer.oDadosNfe.versao != "2.00")
{
Functions.DeletarArquivo(NomeArquivoXML + ".gz");
}
}
catch (ExceptionEnvioXML ex)
{
//Ocorreu algum erro no exato momento em que tentou enviar o XML para o SEFAZ, vou ter que tratar
//para ver se o XML chegou lá ou não, se eu consegui pegar o número do recibo de volta ou não, etc.
//E ver se vamos tirar o XML do Fluxo ou finalizar ele com a consulta situação da NFe
//TODO: V3.0 - Tratar o problema de não conseguir pegar o recibo exatamente neste ponto
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (ExceptionSemInternet ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex, false);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
catch (Exception ex)
{
try
{
//Gravar o arquivo de erro de retorno para o ERP, caso ocorra
TFunctions.GravarArqErroServico(NomeArquivoXML, Propriedade.ExtEnvio.EnvLot, Propriedade.ExtRetorno.Rec_ERR, ex);
}
catch
{
//Se falhou algo na hora de gravar o retorno .ERR (de erro) para o ERP, infelizmente não posso fazer mais nada.
//Wandrey 16/03/2010
}
}
}
