| public Cte ( string arquivoXML ) : void | ||
| arquivoXML | string | Caminho e nome do arquivo XML da NFe a ser lido |
| return | void | |
/// <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.
}
}
}
/// <summary>
/// Ler o retorno da consulta situação da nota fiscal e de acordo com o status ele trata as notas enviadas se ainda não foram tratadas
/// </summary>
/// <param name="ChaveCTe">Chave da NFe que está sendo consultada</param>
/// <remarks>
/// Autor: Wandrey Mundin Ferreira
/// Data: 16/06/2010
/// </remarks>
private void LerRetornoSitCTe(string ChaveCTe)
{
int emp = Empresas.FindEmpresaByThread();
oGerarXML.XmlDistEventoCTe(emp, vStrXmlRetorno);
LerXML oLerXml = new LerXML();
FluxoNfe oFluxoNfe = new FluxoNfe();
XmlDocument doc = new XmlDocument();
doc.Load(Functions.StringXmlToStreamUTF8(vStrXmlRetorno));
XmlNodeList retConsSitList = doc.GetElementsByTagName("retConsSitCTe");
foreach (XmlNode retConsSitNode in retConsSitList)
{
XmlElement retConsSitElemento = (XmlElement)retConsSitNode;
//Definir a chave da NFe a ser pesquisada
string strChaveCTe = "CTe" + ChaveCTe;
//Definir o nome do arquivo da NFe e seu caminho
string strNomeArqCTe = oFluxoNfe.LerTag(strChaveCTe, FluxoNfe.ElementoFixo.ArqNFe);
if (string.IsNullOrEmpty(strNomeArqCTe))
{
strNomeArqCTe = strChaveCTe.Substring(3) + Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML;
}
string strArquivoCTe = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + strNomeArqCTe;
#region CNPJ da chave não é de uma empresa Uninfe
bool notDaEmpresa = (ChaveCTe.Substring(6, 14) != Empresas.Configuracoes[emp].CNPJ ||
ChaveCTe.Substring(0, 2) != Empresas.Configuracoes[emp].UnidadeFederativaCodigo.ToString());
if (!File.Exists(strArquivoCTe))
{
if (notDaEmpresa)
{
return;
}
}
#endregion CNPJ da chave não é de uma empresa Uninfe
//Pegar o status de retorno da NFe que está sendo consultada a situação
var cStatCons = string.Empty;
if (retConsSitElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0] != null)
{
cStatCons = retConsSitElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0].InnerText;
}
switch (cStatCons)
{
#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 "216": //E-Verificar se campo "Codigo Numerico"
break;
#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 Nota fiscal rejeitada
case "217": //J-NFe não existe na base de dados do SEFAZ
goto case "TirarFluxo";
#endregion Nota fiscal rejeitada
#region Nota fiscal autorizada
case "100": //Autorizado o uso da NFe
case "150":
XmlNodeList infConsSitList = retConsSitElemento.GetElementsByTagName("infProt");
if (infConsSitList != null)
{
foreach (XmlNode infConsSitNode in infConsSitList)
{
XmlElement infConsSitElemento = (XmlElement)infConsSitNode;
//Pegar o Status do Retorno da consulta situação
string strStat = Functions.LerTag(infConsSitElemento, TpcnResources.cStat.ToString()).Replace(";", "");
switch (strStat)
{
case "100":
case "150":
var strProtNfe = retConsSitElemento.GetElementsByTagName("protCTe")[0].OuterXml;
//Definir o nome do arquivo -procNfe.xml
string strArquivoNFeProc = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
Functions.ExtrairNomeArq(strArquivoCTe, Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML) +
Propriedade.ExtRetorno.ProcCTe;
//Se existir o strArquivoNfe, tem como eu fazer alguma coisa, se ele não existir
//Não tenho como fazer mais nada. Wandrey 08/10/2009
if (File.Exists(strArquivoCTe))
{
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
XmlDocument conteudoXML = new XmlDocument();
conteudoXML.Load(strArquivoCTe);
oLerXml.Cte(conteudoXML);
//Verificar se a -nfe.xml existe na pasta de autorizados
bool NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi,
Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML,
Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML);
//Verificar se o -procNfe.xml existe na past de autorizados
bool procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi,
Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML,
Propriedade.ExtRetorno.ProcCTe);
//Se o XML de distribuição não estiver na pasta em processamento
if (!procNFeJaNaAutorizada && !File.Exists(strArquivoNFeProc))
{
oGerarXML.XmlDistCTe(strArquivoCTe, strProtNfe, oLerXml.oDadosNfe.versao);
}
//Se o XML de distribuição não estiver ainda na pasta de autorizados
if (!(procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML, Propriedade.ExtRetorno.ProcCTe)))
{
//Move a nfeProc da pasta de NFE em processamento para a NFe Autorizada
TFunctions.MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
//Se a NFe não existir ainda na pasta de autorizados
if (!(NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML, Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML)))
{
//Mover a NFE da pasta de NFE em processamento para NFe Autorizada
TFunctions.MoverArquivo(strArquivoCTe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
else
{
//Se já estiver na pasta de autorizados, vou somente excluir ela da pasta de XML´s em processamento
Functions.DeletarArquivo(strArquivoCTe);
}
//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("TaskCTeConsultaSituacao: " + ex.Message, false);
}
}
}
if (File.Exists(strArquivoNFeProc))
{
//Se já estiver na pasta de autorizados, vou somente excluir ela da pasta de XML´s em processamento
Functions.DeletarArquivo(strArquivoNFeProc);
}
break;
case "301":
//Ler o XML para pegar a data de emissão para criar a psta dos XML´s Denegados
if (File.Exists(strArquivoCTe))
{
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
XmlDocument conteudoXML = new XmlDocument();
conteudoXML.Load(strArquivoCTe);
oLerXml.Cte(conteudoXML);
//Move a NFE da pasta de NFE em processamento para NFe Denegadas
if (!oAux.EstaDenegada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML, Propriedade.ExtRetorno.Den))
{
TFunctions.MoverArquivo(strArquivoCTe, 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(strArquivoCTe, Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML) + Propriedade.ExtRetorno.Den;
TFunctions.ExecutaUniDanfe(strArquivoDist, oLerXml.oDadosNfe.dEmi, Empresas.Configuracoes[emp]);
}
catch (Exception ex)
{
Auxiliar.WriteLog("TaskCTeConsultaSituacao: " + ex.Message, false);
}
}
}
break;
case "302":
goto case "301";
case "303":
goto case "301";
case "304":
goto case "301";
case "305":
goto case "301";
case "306":
goto case "301";
case "110": //Uso Denegado
goto case "301";
default:
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoCTe);
break;
}
//Deletar a NFE do arquivo de controle de fluxo
oFluxoNfe.ExcluirNfeFluxo(strChaveCTe);
}
}
break;
#endregion Nota fiscal autorizada
#region Nota fiscal cancelada
case "101": //Cancelamento Homologado ou Nfe Cancelada
goto case "100";
#endregion Nota fiscal cancelada
#region Nota fiscal Denegada
case "110": //NFe Denegada
goto case "100";
case "301": //NFe Denegada
goto case "100";
case "302": //NFe Denegada
goto case "100";
case "303": //NFe Denegada
goto case "100";
case "304": //NFe Denegada
goto case "100";
case "305": //NFe Denegada
goto case "100";
case "306": //NFe Denegada
goto case "100";
#endregion Nota fiscal Denegada
#region Conteúdo para retirar a nota fiscal do fluxo
case "TirarFluxo":
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoCTe);
//Deletar a NFE do arquivo de controle de fluxo
oFluxoNfe.ExcluirNfeFluxo(strChaveCTe);
break;
#endregion Conteúdo para retirar a nota fiscal do fluxo
default:
break;
}
}
}
private const int _Minutos = 12; //12 minutos para atender o consumo indevido da SEFAZ
public void Analisar(int emp)
{
oAux = new Auxiliar();
try
{
if (string.IsNullOrEmpty(Empresas.Configuracoes[emp].PastaXmlEnviado) || !Directory.Exists(Empresas.Configuracoes[emp].PastaXmlEnviado))
{
return;
}
// le todos os arquivos que estão na pasta em processamento
string[] files = Directory.GetFiles(Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString()).Where(w => w.EndsWith(Propriedade.Extensao(Propriedade.TipoEnvio.NFe).EnvioXML, StringComparison.InvariantCultureIgnoreCase) ||
w.EndsWith(Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML, StringComparison.InvariantCultureIgnoreCase) ||
w.EndsWith(Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML, StringComparison.InvariantCultureIgnoreCase)).ToArray <string>();
// considera os arquivos em que a data do ultimo acesso é superior a 5 minutos
DateTime UltimaData = DateTime.Now.AddMinutes(-_Minutos);
foreach (string file in files)
{
if (!Functions.FileInUse(file))
{
FileInfo fi = new FileInfo(file);
//usar a última data de acesso, e não a data de criação
if (fi.LastWriteTime <= UltimaData)
{
if (oLerXml == null)
{
oLerXml = new LerXML();
oGerarXml = new GerarXML(emp);
fluxo = new FluxoNfe(emp);
}
try
{
XmlDocument doc = new XmlDocument();
doc.Load(file);
TipoAplicativo tipoArquivo = TipoAplicativo.Nfe;
string extNFe = Propriedade.Extensao(Propriedade.TipoEnvio.NFe).EnvioXML;
string extProcNFe = Propriedade.ExtRetorno.ProcNFe;
string arquivoSit = string.Empty;
string chNFe = string.Empty;
switch (doc.DocumentElement.Name)
{
case "MDFe":
tipoArquivo = TipoAplicativo.MDFe;
extNFe = Propriedade.Extensao(Propriedade.TipoEnvio.MDFe).EnvioXML;
extProcNFe = Propriedade.ExtRetorno.ProcMDFe;
oLerXml.Mdfe(doc);
arquivoSit = oLerXml.oDadosNfe.chavenfe.Substring(4);
chNFe = oLerXml.oDadosNfe.chavenfe.Substring(4);
break;
case "NFe":
tipoArquivo = TipoAplicativo.Nfe;
extNFe = Propriedade.Extensao(Propriedade.TipoEnvio.NFe).EnvioXML;
extProcNFe = Propriedade.ExtRetorno.ProcNFe;
oLerXml.Nfe(doc);
arquivoSit = oLerXml.oDadosNfe.chavenfe.Substring(3);
chNFe = oLerXml.oDadosNfe.chavenfe.Substring(3);
break;
case "CTe":
tipoArquivo = TipoAplicativo.Cte;
extNFe = Propriedade.Extensao(Propriedade.TipoEnvio.CTe).EnvioXML;
extProcNFe = Propriedade.ExtRetorno.ProcCTe;
oLerXml.Cte(doc);
arquivoSit = oLerXml.oDadosNfe.chavenfe.Substring(3);
chNFe = oLerXml.oDadosNfe.chavenfe.Substring(3);
break;
}
//Ler a NFe
//Verificar se o -nfe.xml existe na pasta de autorizados
bool NFeJaNaAutorizada = oAux.EstaAutorizada(file, oLerXml.oDadosNfe.dEmi, extNFe, extNFe);
//Verificar se o -procNfe.xml existe na past de autorizados
bool procNFeJaNaAutorizada = oAux.EstaAutorizada(file, oLerXml.oDadosNfe.dEmi, extNFe, extProcNFe);
//Se um dos XML´s não estiver na pasta de autorizadas ele força finalizar o processo da NFe.
if (!NFeJaNaAutorizada || !procNFeJaNaAutorizada)
{
//Verificar se a NFe está no fluxo, se não estiver vamos incluir ela para que funcione
//a rotina de gerar o -procNFe.xml corretamente. Wandrey 21/10/2009
if (!fluxo.NfeExiste(oLerXml.oDadosNfe.chavenfe))
{
fluxo.InserirNfeFluxo(oLerXml.oDadosNfe.chavenfe, oLerXml.oDadosNfe.mod, file);
}
//gera um -ped-sit.xml mesmo sendo autorizada ou denegada, pois assim sendo, o ERP precisaria dele
oGerarXml.Consulta(tipoArquivo, arquivoSit + Propriedade.Extensao(Propriedade.TipoEnvio.PedSit).EnvioXML,
Convert.ToInt32(oLerXml.oDadosNfe.tpAmb),
Convert.ToInt32(oLerXml.oDadosNfe.tpEmis),
chNFe,
oLerXml.oDadosNfe.versao);
}
else
{
//Move o XML da pasta em processamento para a pasta de XML´s com erro (-nfe.xml)
oAux.MoveArqErro(file);
//Move o XML da pasta em processamento para a pasta de XML´s com erro (-procNFe.xml)
oAux.MoveArqErro(Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + Functions.ExtrairNomeArq(file, extNFe) + extProcNFe);
//Tirar a nota fiscal do fluxo
fluxo.ExcluirNfeFluxo(oLerXml.oDadosNfe.chavenfe);
}
}
catch (Exception ex)
{
try
{
// grava o arquivo com extensao .ERR
oAux.GravarArqErroERP(Path.GetFileNameWithoutExtension(file) + ".err", ex.Message);
}
catch
{
//Se deu erro na hora de gravar o erro para o ERP, infelizmente não posso fazer mais nada. Wandrey 28/04/2011
}
}
}
}
}
}
catch (Exception ex)
{
try
{
// grava o arquivo generico
oAux.GravarArqErroERP(string.Format(Propriedade.NomeArqERRUniNFe, DateTime.Now.ToString("yyyyMMddTHHmmss")), ex.Message);
}
catch
{
//Se deu erro na hora de gravar o erro para o ERP, infelizmente não posso fazer mais nada. Wandrey 28/04/2011
}
}
}
/// <summary>
/// Le o conteúdo do XML da NFe
/// </summary>
/// <param name="arquivo">Arquivo XML da NFe</param>
/// <returns>Retorna o conteúdo do XML da NFe</returns>
public DadosNFeClass LerXMLNFe(string arquivo)
{
LerXML oLerXML = new LerXML();
switch (Servico)
{
case Servicos.MDFeAssinarValidarEnvioEmLote:
case Servicos.MDFeMontarLoteVarios:
case Servicos.MDFeMontarLoteUm:
oLerXML.Mdfe(arquivo);
break;
case Servicos.CTeAssinarValidarEnvioEmLote:
case Servicos.CTeMontarLoteVarios:
case Servicos.CTeMontarLoteUm:
oLerXML.Cte(arquivo);
break;
default:
oLerXML.Nfe(arquivo);
break;
}
return oLerXML.oDadosNfe;
}
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();
#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
}
}
}
/// <summary>
/// Faz a leitura do XML de pedido de consulta da situação da NFe
/// </summary>
/// <param name="arquivoXML">Nome do XML a ser lido</param>
/// <param name="emp">Código da empresa</param>
/*private void PedSit(int emp, string arquivoXML)
{
this.dadosPedSit.tpAmb = Empresas.Configuracoes[emp].AmbienteCodigo;
this.dadosPedSit.chNFe = string.Empty;
XmlDocument doc = new XmlDocument();
doc.Load(arquivoXML);
XmlNodeList consSitNFeList = doc.GetElementsByTagName("consSitCTe");
foreach (XmlNode consSitNFeNode in consSitNFeList)
{
XmlElement consSitNFeElemento = (XmlElement)consSitNFeNode;
dadosPedSit.tpAmb = Convert.ToInt32("0" + consSitNFeElemento.GetElementsByTagName(TpcnResources.tpAmb.ToString())[0].InnerText);
dadosPedSit.chNFe = consSitNFeElemento.GetElementsByTagName(TpcnResources.chCTe.ToString())[0].InnerText;
if (consSitNFeElemento.GetElementsByTagName(TpcnResources.tpEmis.ToString()).Count != 0)
{
this.dadosPedSit.tpEmis = Convert.ToInt16(consSitNFeElemento.GetElementsByTagName(TpcnResources.tpEmis.ToString())[0].InnerText);
/// para que o validador não rejeite, excluo a tag <tpEmis>
doc.DocumentElement.RemoveChild(consSitNFeElemento.GetElementsByTagName(TpcnResources.tpEmis.ToString())[0]);
/// salvo o arquivo modificado
doc.Save(arquivoXML);
}
}
}*/
#endregion
#region LerRetornoSitCTe()
/// <summary>
/// Ler o retorno da consulta situação da nota fiscal e de acordo com o status ele trata as notas enviadas se ainda não foram tratadas
/// </summary>
/// <param name="ChaveCTe">Chave da NFe que está sendo consultada</param>
/// <remarks>
/// Autor: Wandrey Mundin Ferreira
/// Data: 16/06/2010
/// </remarks>
private void LerRetornoSitCTe(string ChaveCTe)
{
int emp = Empresas.FindEmpresaByThread();
oGerarXML.XmlDistEventoCTe(emp, this.vStrXmlRetorno); //<<<danasa 6-2011
LerXML oLerXml = new LerXML();
MemoryStream msXml = Functions.StringXmlToStream(vStrXmlRetorno);
FluxoNfe oFluxoNfe = new FluxoNfe();
XmlDocument doc = new XmlDocument();
doc.Load(msXml);
XmlNodeList retConsSitList = doc.GetElementsByTagName("retConsSitCTe");
foreach (XmlNode retConsSitNode in retConsSitList)
{
XmlElement retConsSitElemento = (XmlElement)retConsSitNode;
//Definir a chave da NFe a ser pesquisada
string strChaveCTe = "CTe" + ChaveCTe;
//Definir o nome do arquivo da NFe e seu caminho
string strNomeArqCTe = oFluxoNfe.LerTag(strChaveCTe, FluxoNfe.ElementoFixo.ArqNFe);
if (string.IsNullOrEmpty(strNomeArqCTe))
{
strNomeArqCTe = strChaveCTe.Substring(3) + Propriedade.ExtEnvio.Cte;
}
string strArquivoCTe = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + strNomeArqCTe;
#region CNPJ da chave não é de uma empresa Uninfe
bool notDaEmpresa = (ChaveCTe.Substring(6, 14) != Empresas.Configuracoes[emp].CNPJ ||
ChaveCTe.Substring(0, 2) != Empresas.Configuracoes[emp].UnidadeFederativaCodigo.ToString());
if (!File.Exists(strArquivoCTe) && notDaEmpresa)
return;
#endregion
//Pegar o status de retorno da NFe que está sendo consultada a situação
var cStatCons = string.Empty;
if (retConsSitElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0] != null)
{
cStatCons = retConsSitElemento.GetElementsByTagName(TpcnResources.cStat.ToString())[0].InnerText;
}
switch (cStatCons)
{
#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 "216": //E-Verificar se campo "Codigo Numerico"
break;
#endregion
#region Nota fiscal rejeitada
case "217": //J-NFe não existe na base de dados do SEFAZ
goto case "TirarFluxo";
#endregion
#region Nota fiscal autorizada
case "100": //Autorizado o uso da NFe
case "150":
XmlNodeList infConsSitList = retConsSitElemento.GetElementsByTagName("infProt");
if (infConsSitList != null)
{
foreach (XmlNode infConsSitNode in infConsSitList)
{
XmlElement infConsSitElemento = (XmlElement)infConsSitNode;
//Pegar o Status do Retorno da consulta situação
string strStat = Functions.LerTag(infConsSitElemento, TpcnResources.cStat.ToString()).Replace(";", "");
switch (strStat)
{
case "100":
case "150":
var strProtNfe = retConsSitElemento.GetElementsByTagName("protCTe")[0].OuterXml;
//Definir o nome do arquivo -procNfe.xml
string strArquivoNFeProc = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" +
PastaEnviados.EmProcessamento.ToString() + "\\" +
Functions.ExtrairNomeArq(strArquivoCTe, Propriedade.ExtEnvio.Cte) + Propriedade.ExtRetorno.ProcCTe;
//Se existir o strArquivoNfe, tem como eu fazer alguma coisa, se ele não existir
//Não tenho como fazer mais nada. Wandrey 08/10/2009
if (File.Exists(strArquivoCTe))
{
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
oLerXml.Cte(strArquivoCTe);
//Verificar se a -nfe.xml existe na pasta de autorizados
bool NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Cte, Propriedade.ExtEnvio.Cte);
//Verificar se o -procNfe.xml existe na past de autorizados
bool procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Cte, Propriedade.ExtRetorno.ProcCTe);
//Se o XML de distribuição não estiver na pasta em processamento
if (!procNFeJaNaAutorizada && !File.Exists(strArquivoNFeProc))
{
oGerarXML.XmlDistCTe(strArquivoCTe, strProtNfe);
}
//Se o XML de distribuição não estiver ainda na pasta de autorizados
if (!(procNFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Cte, Propriedade.ExtRetorno.ProcCTe)))
{
//Move a nfeProc da pasta de NFE em processamento para a NFe Autorizada
TFunctions.MoverArquivo(strArquivoNFeProc, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
//Se a NFe não existir ainda na pasta de autorizados
if (!(NFeJaNaAutorizada = oAux.EstaAutorizada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Cte, Propriedade.ExtEnvio.Cte)))
{
//Mover a NFE da pasta de NFE em processamento para NFe Autorizada
TFunctions.MoverArquivo(strArquivoCTe, PastaEnviados.Autorizados, oLerXml.oDadosNfe.dEmi);
}
else
{
//Se já estiver na pasta de autorizados, vou somente excluir ela da pasta de XML´s em processamento
Functions.DeletarArquivo(strArquivoCTe);
}
//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("TaskCTeConsultaSituacao: " + ex.Message, false);
}
}
if (File.Exists(strArquivoNFeProc))
{
//Se já estiver na pasta de autorizados, vou somente excluir ela da pasta de XML´s em processamento
Functions.DeletarArquivo(strArquivoNFeProc);
}
break;
case "301":
//Ler o XML para pegar a data de emissão para criar a psta dos XML´s Denegados
if (File.Exists(strArquivoCTe))
{
oLerXml.Cte(strArquivoCTe);
//Move a NFE da pasta de NFE em processamento para NFe Denegadas
if (!oAux.EstaDenegada(strArquivoCTe, oLerXml.oDadosNfe.dEmi, Propriedade.ExtEnvio.Cte, Propriedade.ExtRetorno.Den))
{
TFunctions.MoverArquivo(strArquivoCTe, 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(strArquivoCTe, Propriedade.ExtEnvio.Cte) + Propriedade.ExtRetorno.Den;
TFunctions.ExecutaUniDanfe(strArquivoDist, oLerXml.oDadosNfe.dEmi, Empresas.Configuracoes[emp]);
}
catch (Exception ex)
{
Auxiliar.WriteLog("TaskCTeConsultaSituacao: " + ex.Message, false);
}
}
}
break;
case "302":
goto case "301";
case "303":
goto case "301";
case "304":
goto case "301";
case "305":
goto case "301";
case "306":
goto case "301";
case "110": //Uso Denegado
goto case "301";
default:
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoCTe);
break;
}
//Deletar a NFE do arquivo de controle de fluxo
oFluxoNfe.ExcluirNfeFluxo(strChaveCTe);
}
}
break;
#endregion
#region Nota fiscal cancelada
case "101": //Cancelamento Homologado ou Nfe Cancelada
goto case "100";
#endregion
#region Nota fiscal Denegada
case "110": //NFe Denegada
goto case "100";
case "301": //NFe Denegada
goto case "100";
case "302": //NFe Denegada
goto case "100";
case "303": //NFe Denegada
goto case "100";
case "304": //NFe Denegada
goto case "100";
case "305": //NFe Denegada
goto case "100";
case "306": //NFe Denegada
goto case "100";
#endregion
#region Conteúdo para retirar a nota fiscal do fluxo
case "TirarFluxo":
//Mover o XML da NFE a pasta de XML´s com erro
oAux.MoveArqErro(strArquivoCTe);
//Deletar a NFE do arquivo de controle de fluxo
oFluxoNfe.ExcluirNfeFluxo(strChaveCTe);
break;
#endregion
default:
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 = Empresas.FindEmpresaByThread();
var oLerXml = new LerXML();
var msXml = Functions.StringXmlToStream(vStrXmlRetorno);
var fluxoNFe = new FluxoNfe();
var doc = new System.Xml.XmlDocument();
doc.Load(msXml);
var retConsReciNFeList = doc.GetElementsByTagName("retConsReciCTe");
foreach (System.Xml.XmlNode retConsReciNFeNode in retConsReciNFeList)
{
var retConsReciNFeElemento = (System.Xml.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 "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 (System.Xml.XmlNode protNFeNode in protNFeList)
{
var protNFeElemento = (System.Xml.XmlElement)protNFeNode;
var strProtNfe = protNFeElemento.OuterXml;
var infProtList = protNFeElemento.GetElementsByTagName("infProt");
foreach (System.Xml.XmlNode infProtNode in infProtList)
{
var infProtElemento = (System.Xml.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))
throw new Exception("LerRetornoLoteCTe(): Não pode obter o nome do arquivo");
strNomeArqNfe = strChaveNFe.Substring(3) + Propriedade.ExtEnvio.Cte;
}
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))
{
//Juntar o protocolo com a NFE já copiando para a pasta em processamento
var strArquivoNFeProc = oGerarXML.XmlDistCTe(strArquivoNFe, strProtNfe);
//Ler o XML para pegar a data de emissão para criar a pasta dos XML´s autorizados
oLerXml.Cte(strArquivoNFe);
//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
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, 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
oLerXml.Cte(strArquivoNFe);
//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.ExtEnvio.Cte) + 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
#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
}
}
}
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.Cte(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);
//Criar objeto da classe de assinatura digita
AssinaturaDigital oAD = new AssinaturaDigital();
//Assinar o XML
oAD.Assinar(ConteudoXML, emp, Convert.ToInt32(lerXml.oDadosNfe.cUF));
//Mover o arquivo para a pasta em processamento
Empresas.Configuracoes[emp].CriarSubPastaEnviado();
string arqEmProcessamento = Empresas.Configuracoes[emp].PastaXmlEnviado + "\\" + PastaEnviados.EmProcessamento.ToString() + "\\" + Path.GetFileName(NomeArquivoXML);
StreamWriter sw = File.CreateText(arqEmProcessamento);
sw.Write(ConteudoXML.OuterXml);
sw.Close();
if (File.Exists(arqEmProcessamento))
{
File.Delete(NomeArquivoXML);
NomeArquivoXML = arqEmProcessamento;
}
NumeroLote = oGerarXML.GerarLoteCTeOS(NomeArquivoXML);
//Invocar o método que envia o XML para o SEFAZ
oInvocarObj.Invocar(wsProxy,
oRecepcao,
wsProxy.NomeMetodoWS[0],
oCabecMsg, this,
Propriedade.Extensao(Propriedade.TipoEnvio.CTeOS).EnvioXML,
Propriedade.Extensao(Propriedade.TipoEnvio.PedRec).RetornoXML,
false,
securityProtocolType);
#region Parte que trata o retorno do lote, ou seja, o número do recibo
LerRetorno(emp);
//Gravar o XML retornado pelo WebService do SEFAZ na pasta de retorno para o ERP
//Tem que ser feito neste ponto, pois somente aqui terminamos todo o processo
oGerarXML.XmlRetorno(Propriedade.Extensao(Propriedade.TipoEnvio.CTeOS).EnvioXML,
Propriedade.Extensao(Propriedade.TipoEnvio.PedRec).RetornoXML,
vStrXmlRetorno,
Empresas.Configuracoes[emp].PastaXmlRetorno,
NumeroLote.ToString("000000000000000") + Propriedade.Extensao(Propriedade.TipoEnvio.CTeOS).EnvioXML);
#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.CTeOS).EnvioXML, Propriedade.ExtRetorno.ProRec_ERR, ex, NumeroLote.ToString("000000000000000") + Propriedade.Extensao(Propriedade.TipoEnvio.CTeOS).EnvioXML);
}
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.CTeOS).EnvioXML, Propriedade.ExtRetorno.ProRec_ERR, ex, NumeroLote.ToString("000000000000000") + Propriedade.Extensao(Propriedade.TipoEnvio.CTeOS).EnvioXML);
}
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.CTeOS).EnvioXML, Propriedade.ExtRetorno.ProRec_ERR, ex, NumeroLote.ToString("000000000000000") + Propriedade.Extensao(Propriedade.TipoEnvio.CTeOS).EnvioXML);
}
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
}
}
}
private void LerRetorno(int emp)
{
/*
* vStrXmlRetorno = "<?xml version=\"1.0\" encoding=\"utf-8\"?>" +
* "<retCTeOS versao=\"3.00\" xmlns=\"http://www.portalfiscal.inf.br/cte\"><tpAmb>2</tpAmb><cUF>35</cUF><verAplic>SP-CTe-23-06-2017</verAplic><cStat>100</cStat><xMotivo>Autorizado o uso do CT-e</xMotivo><protCTe versao=\"3.00\"><infProt><tpAmb>2</tpAmb><verAplic>SP-CTe-23-06-2017</verAplic><chCTe>35170746014122000138670000000000061860795141</chCTe><dhRecbto>2017-07-21T09:52:19-03:00</dhRecbto><nProt>135170008578938</nProt><digVal>iYpkun2Ovm+sp+eMkzDtX6gtkzI=</digVal><cStat>100</cStat><xMotivo>Autorizado o uso do CT-e</xMotivo></infProt></protCTe></retCTeOS>";
*/
/*
* vStrXmlRetorno = "<retCTeOS versao=\"3.00\" xmlns=\"http://www.portalfiscal.inf.br/cte\"><tpAmb>2</tpAmb><cUF>35</cUF><verAplic>SP-CTe-23-06-2017</verAplic><cStat>100</cStat><xMotivo>Autorizado o uso do CT-e</xMotivo><protCTe versao=\"3.00\"><infProt><tpAmb>2</tpAmb><verAplic>SP-CTe-23-06-2017</verAplic><chCTe>35170746014122000138670000000000261309301440</chCTe><dhRecbto>2017-07-26T11:47:48-03:00</dhRecbto><nProt>135170008595733</nProt><digVal>XTkEEwjNnoYasDYz/VJ7HuZVUEo=</digVal><cStat>100</cStat><xMotivo>Autorizado o uso do CT-e</xMotivo></infProt></protCTe></retCTeOS>";
*/
var oLerXml = new LerXML();
var doc = new XmlDocument();
doc.Load(Functions.StringXmlToStreamUTF8(vStrXmlRetorno));
var retConsReciNFeList = doc.GetElementsByTagName("retCTeOS");
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 "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 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 foi processado, agora tenho que tratar as notas fiscais dele
case "104": //Lote processado
case "100": //Processo sincrono já retorna como 100
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 strStat = string.Empty;
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 strArquivoNFe = NomeArquivoXML;
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.XmlDistCTeOS(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
TFunctions.MoverArquivo(strArquivoNFe, PastaEnviados.Autorizados, 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("TaskCTeRecepcaoOS: " + 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;
}
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
TFunctions.MoveArqErro(NomeArquivoXML);
break;
#endregion Qualquer outro tipo de status que não for os acima relacionados, vai tirar a nota fiscal do fluxo.
}
}
}
