GenerarXMLFactucert.cs

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Sage.ES.S50.Modelos.ModelosFiscalLibros;
using System.Windows.Forms;
using Sage.ES.S50.Modelos.Interficies;
using Sage.ES.S50.Modelos.Clases;
using Sage.ES.Batuz.Entities;
using Sage.ES.Batuz.Entities.ComModel._240.Annulation;
using Sage.ES.Batuz.Entities.ComModel._240.Common;
using Sage.ES.Batuz.Entities.ComModel._240.Invoice;
using Sage.ES.Batuz.Interfaces.Entities;
using sage.ew.functions;
using sage.ew.global;
using System.IO;
using sage.ew.db;
using Sage.ES.S50.Modelos.enumerados;
using Sage.ES.S50.Modelos;
using sage.ew.empresa;
using sage.ew.contabilidad;
using Sage.ES.S50.Modelos._140;
using sage.addons.factucert.Negocio.Enums;

namespace sage.addons.factucert.Negocio.ModelosFiscalLibros
{
    public class GenerarXMLFactucert : GenerarXMLBase
    {
        private Process _process = null;
        private IModeloFiscalLibros _ModeloFiscal;
        private ModeloEnum model;
        private bool generadoXML = true;
        private bool enviadoXML = true;
        private ILibro _Libro;
        private List<RespuestaFacturaBase> respuestas = new List<RespuestaFacturaBase>();
        private string processMsgError = "";
        private bool _lEsLibroBienes140 = false;

        protected string tag_Envio_Ticketbai = FUNCTIONS.LeerConfigIni("[ENVIO_TICKETBAI]");
        protected TipoEnvioModelos tipoEnvioModelos;
        protected SubcapituloBien subcapituloBien;

        public GenerarXMLFactucert(IModeloFiscalLibros modelo)
        {
            _ModeloFiscal = modelo;         
        }
        //  CreateProcess(object libro, bool isSend, ModeloEnum model)

        public override bool _GenerarXML(ILibro libro, bool isSend, Dictionary<string, object> parametros)
        {
            _Libro = (ILibro)libro;
            _lEsLibroBienes140 = _Libro._Libro == "BIENESINVERSION" && _Libro._ModeloFiscalLibros._Modelo == "140";

            switch (_ModeloFiscal._Modelo)
            {
                case "140":
                    model = ModeloEnum.Modelo_140;
                    break;
                case "240":
                    model = ModeloEnum.Modelo_240;
                    break;
            }

            if (parametros.Count < 1)
            {
                return false;
            }

            if (this._process == null)
            {
                this._process = new Process();
            }

            Entorno(_Libro);

            IConfig config = new Config();
            config.TraceAdditionalInfo = "{date} | pid:{pid} | t:{tid} | {assembly}";
            config.TraceConfigFile = "";
            config.TraceFile = _RutaLog + "\\" + (string.IsNullOrWhiteSpace(_Libro._Libro) ? "Libro" : _Libro._Libro.Trim());
            try
            {
                if (!Directory.Exists(config.TraceFile))
                {
                    Directory.CreateDirectory(config.TraceFile);
                }

            }
            catch (Exception e)
            {
                DB.Registrar_Error(e);
                config.TraceFile = "";
            }

            config.TraceHeaderSeparator = "";
            config.TraceMaxArchivedFiles = "7";
            config.TraceMode = "All";
            config.TracePatternDateTime = "{LOCAL}dd/MM/yyyy HH:mm:ss.fff";
            config.TraceRollSizeKB = "10000";

            config.Certificate = FACTUCERT._FactuCertConfig._ConfigFactuCertModelo._CNom;// "CERTIFICADO FISICA PRUEBAS - 99999910G";
            config.CertificateThumbprint = "";

            config.VersionXAd = Sage.ES.Batuz.Interfaces.Entities.VersionXAd.ver_EPES;
            config.CertificateStore = Sage.ES.Batuz.Interfaces.Entities.CertificateStore.cert_MY;
            _process.Config = config;

            foreach (KeyValuePair<string, object> item in parametros)
            {
                if (item.Key.Contains("Libro") && item.Value != null)
                {
                    string cDate = DateTime.Now.ToString("yyyyMMdd_hhmmss");
                    if (item.Value is List<object>)
                    {
                        List<object> lItemValue = (List<object>)item.Value;
                        respuestas.Clear();
                        for (int nInd = 0;  nInd < lItemValue.Count; nInd++)
                        {
                            tipoEnvioModelos = convertirTipoOperacionLibroEnTipoEnvioModelos((TipoOperacionLibro)(((dynamic)lItemValue[nInd]).Cabecera.Operacion));
                            if (_lEsLibroBienes140)
                                subcapituloBien = convertirSubcapituloEnSubcapituloBien(Convert.ToString((((dynamic)item.Value).Cabecera.Subcapitulo)));
                            string cContador = (nInd + 1).ToString("000");
                            string cIdentificador = cDate + (string.IsNullOrWhiteSpace(cContador) ? "" : "_" + cContador);
                            GenerarEnviarXML(isSend, config, lItemValue[nInd], tipoEnvioModelos.ToString(), cIdentificador);
                        }
                      
                    }
                    else
                    {
                        tipoEnvioModelos = convertirTipoOperacionLibroEnTipoEnvioModelos((TipoOperacionLibro)(((dynamic)item.Value).Cabecera.Operacion));
                        if (_lEsLibroBienes140)
                            subcapituloBien = convertirSubcapituloEnSubcapituloBien(Convert.ToString((((dynamic)item.Value).Cabecera.Subcapitulo)));
                        respuestas.Clear();
                        GenerarEnviarXML(isSend, config, item.Value, tipoEnvioModelos.ToString(), cDate);
                    }

                    try
                    {
                        if (this._process != null && isSend && _Resultado.Count == 0 && respuestas.Count == 0)
                        {
                            // Ya no llamamos a proceso enviar ya que lo hacemos a la misma vez que generamos
                            // ProcesoEnviar(config, libro, rutaFichero, tipoEnvioModelos.ToString(), cIdentificador); 
                        }

                        ProcesarResultados(isSend);
                    }
                    catch (Exception loEx)
                    {
                        string lcMensaje = loEx.Message;
                        //                MessageBox.Show(loEx.MensajeCompleto(), "error enviar general");
                    }
                }
            }
           
            return generadoXML;
        }

        private void Entorno(ILibro toLibro)
        {
            if (toLibro._Entorno == eEntornosModelos.EnvioPre)
                _cHost = "https://pruesarrerak.bizkaia.eus/N3B4000M/aurkezpena"; 
            else
                _cHost = "https://sarrerak.bizkaia.eus/N3B4000M/aurkezpena";
        }

        TipoEnvioModelos convertirTipoOperacionLibroEnTipoEnvioModelos(TipoOperacionLibro tipoOperacionLibro)
        {
            TipoEnvioModelos tipoEnvioModelos = new TipoEnvioModelos();

            switch (tipoOperacionLibro)
            {
                case TipoOperacionLibro.Alta:
                    tipoEnvioModelos = TipoEnvioModelos.Alta;
                    break;
                case TipoOperacionLibro.Alta_dev_regimen_viajeros:
                    tipoEnvioModelos = TipoEnvioModelos.Alta;
                    break;
                case TipoOperacionLibro.Modificacion:
                    tipoEnvioModelos = TipoEnvioModelos.Modificacion;
                    break;
                case TipoOperacionLibro.Modificacion_dev_regimen_viajeros:
                    tipoEnvioModelos = TipoEnvioModelos.Modificacion;
                    break;
                case TipoOperacionLibro.Anulacion:
                    tipoEnvioModelos = TipoEnvioModelos.Baja;
                    break;
            }

            return tipoEnvioModelos;
        }

        SubcapituloBien convertirSubcapituloEnSubcapituloBien(string tcSubcapituloBien140)
        {
            SubcapituloBien leSub = SubcapituloBien.Alta;
            string lcSub140 = tcSubcapituloBien140.ToLower().Trim();

            switch (lcSub140)
            {
                case "alta_bienes_afectos_o_inversion":
                    leSub = SubcapituloBien.Alta;
                    break;

                case "regularizacion_anual_bienes_inversion":
                    leSub = SubcapituloBien.Regularizacion;
                    break;

                case "baja_bienes_afectos_o_inversión":
                    leSub = SubcapituloBien.Baja;
                    break;
            }

            return leSub;
        }

        public override void _DescargarDatos()
        {
            _Resultado.Clear();
            respuestas.Clear();
        }

        private string _cHost = $"https://pruesarrerak.bizkaia.eus/N3B4000M/aurkezpen";

        private void GenerarEnviarXML(bool isSend, IConfig config, object libro, string key, string cIdentificador)
        {
            string rutaFichero = _RutaFicheroXML + "\\" + (string.IsNullOrWhiteSpace(_Libro._Libro) ? "Libro" : _Libro._Libro.Trim());
            try
            {
                if (!Directory.Exists(rutaFichero))
                {
                    Directory.CreateDirectory(rutaFichero);
                }

            }
            catch (Exception e)
            {
                DB.Registrar_Error(e);
                rutaFichero = "";
            }
            rutaFichero = rutaFichero + "\\" + cIdentificador + "_" + key.ToLower().Replace("libro", "").Trim() + ".xml";

            if (this._process != null)
            {
                ProcesoGenerar(config, libro, rutaFichero, isSend, key, cIdentificador);
            }
           
        }

        private void ParseError(ref string[] taErrorSplit)
        {
            if (taErrorSplit.Length < 2) // Validamos la longitud 
                return;

            int lnIndice = taErrorSplit.Length - 1;

            string lcError = taErrorSplit[lnIndice].ToUpper().Trim();

            if (lcError == "EMPTY")
            {
                string lcCodigo = taErrorSplit[lnIndice - 1].Trim();

                taErrorSplit[lnIndice] = $"Se ha detectado un problema al enviar información. Puede tratarse de una demora en la conexión o comportamiento inesperado de la solicitud." +
                                        (!string.IsNullOrWhiteSpace(lcCodigo) ? $" Código: {lcCodigo} ." : "");
            }
            else
            {
                if ((lcError.Contains("CONEXIÓN") && (lcError.Contains("SERVIDOR") || lcError.Contains("INESPERADA"))) ||
                   (lcError.Contains("EXCEDIÓ") && lcError.Contains("OPERACIÓN")) ||
                   (lcError.Contains("ANULADA") && lcError.Contains("SOLICITUD")))
                {
                    taErrorSplit[lnIndice] = ((ModeloFiscalLibrosBase)_ModeloFiscal)._MensajeTiempoEsperaExcedidoServicio;
                }
            }
        }

        private void ProcesoGenerar(IConfig config, object libro, string rutaFichero, bool isSend, string key, string cIdentificador)
        {
            this._process.Model = model;
            this._process.TypeBook = libro;
            this._process.OutputFileName = rutaFichero;
            config.SendFact = new SendFact();
            config.SendFact.XmlFact = rutaFichero;
            config.EnvioDiferido = !isSend; // Si es false al generar envía tambien.
            config.SendFact.Host = config.SendFact.Host = _cHost;

            generadoXML = this._process.GenerateCom();
            processMsgError = "";

            try
            {
                processMsgError = (_process != null && !string.IsNullOrWhiteSpace(_process.MsgError) ? _process.MsgError : "");

            }
            catch
            {
                // Pongo try-catch por cuando el proceso es correcto y no devuelve nada en  _process.MsgError da un error al hacer el !string.IsNullOrWhiteSpace(_process.MsgError) y así lo solvento
                processMsgError = "";
            }


            string listaFacturas = "";
            List<ILibroFila> lolstSel = _Libro._Filas.Where(f => f._Seleccion && (f._ProximoEnvio == tipoEnvioModelos || f._ProximoEnvio == TipoEnvioModelos.Nada)).ToList(); // Filtramos las seleccionadas
            foreach (ILibroFila fila in lolstSel)
            {
                listaFacturas += fila._Factura + ";";
            }

            string lcLog = string.Format("\r\nModelo --> {0} \r\nNombre del libro --> {1}_{3} \r\nRuta XML --> {5} \r\nFacturas --> {2} \r\nRespuesta --> {4}", _ModeloFiscal._Modelo, _Libro._Libro.Trim(), listaFacturas, key, processMsgError, rutaFichero);
            factucert factucert = (factucert)Sage.ES.S50.Addons.AddonsController.Instance.AddonsManager.GetAddon("FACTUCERT");
            factucert.Log(ew.enumerations.TipoMensaje.Info, lcLog, "_Envio Modelo_" + _ModeloFiscal._Modelo + "_" + key + "_" + cIdentificador);

            enviadoXML = generadoXML & isSend;

            string codigoError = "";
            Dictionary<string[], string[]> allDes_Error = new Dictionary<string[], string[]>();

            if (!string.IsNullOrWhiteSpace(processMsgError))
            {
                allDes_Error = extraerDescripcionesdeErrores(processMsgError, out codigoError);
            }
            else
            {
                string[] clave = { "", "" };
                string[] value = { "", "" };
                allDes_Error.Add(clave, value);
            }

            // Me recorro los errores extraidos y creo las repuestas 
            foreach (KeyValuePair<string[], string[]> des_Error in allDes_Error)
            {
                EstadoAEATModelos estado;
                if (string.IsNullOrWhiteSpace(des_Error.Key[1])) // si es un error para todas las facturas
                {
                    estado = (enviadoXML ? (string.IsNullOrWhiteSpace(processMsgError) ? EstadoAEATModelos.Aceptada : EstadoAEATModelos.AceptadaConErrores) : EstadoAEATModelos.Rechazada);
                }
                else // Error para una factura en concreto de numero des_Error.Key
                {
                    estado = (des_Error.Value[1].Trim().ToUpper() == "CORRECTO" ? EstadoAEATModelos.Aceptada : (des_Error.Value[1].Trim().ToUpper() == "INCORRECTO" ? EstadoAEATModelos.Rechazada : EstadoAEATModelos.AceptadaConErrores)); // ACEPTADOCONERRORES
                }

                List<RespuestaFacturaBase> itemsRespuestas = crearRespuestas(codigoError, des_Error, estado, rutaFichero);
                foreach (RespuestaFacturaBase item in itemsRespuestas)
                {
                    respuestas.Add(item);
                }
            }

            //            MessageBox.Show((generadoXML ? "GENERADO:" : "NO GENERADO:") + processMsgError, "Respuesta");

        }

        private void ProcesoEnviar(IConfig config, object libro, string rutaFichero, string key, string cIdentificador)
        {

            if (String.IsNullOrWhiteSpace(tag_Envio_Ticketbai))
            {
                this._process.Model = model;

                try
                {
                    this._process.TypeBook = libro;
                }
                catch (Exception loEx)
                {
                    string lcMensaje = loEx.Message;
                    //                    MessageBox.Show(lcMensaje,"error enviar1");
                }

                config.SendFact = new SendFact();
                config.SendFact.XmlFact = rutaFichero;
                config.EnvioDiferido = true;
                config.SendFact.Host = _cHost;

                enviadoXML = false;

                try
                {
                    enviadoXML = this._process.Send();
                }
                catch (Exception loEx)
                {
                    string lcMensaje = loEx.Message;
                    //                    MessageBox.Show(lcMensaje, "error enviar 2");
                }

                string codigoError = "";
                processMsgError = "";
                try
                {
                    processMsgError = (_process != null && !string.IsNullOrWhiteSpace(_process.MsgError) ? _process.MsgError : "");
                    
                }
                catch
                {
                    // Pongo try-catch por cuando el proceso es correcto y no devuelve nada en  _process.MsgError da un error al hacer el !string.IsNullOrWhiteSpace(_process.MsgError) y así lo solvento
                    processMsgError = "";

                    string listaFacturas = "";
                    List<ILibroFila> lolstSel = _Libro._Filas.Where(f => f._Seleccion && (f._ProximoEnvio == tipoEnvioModelos || f._ProximoEnvio == TipoEnvioModelos.Nada)).ToList(); // Filtramos las seleccionadas
                    foreach (ILibroFila fila in lolstSel)
                    {
                        listaFacturas += fila._Factura + ";";
                    }

                    string lcLog = string.Format("\r\nModelo --> {0} \r\nNombre del libro --> {1}_{3} \r\nRuta XML --> {5} \r\nFacturas --> {2} \r\nRespuesta --> {4}", _ModeloFiscal._Modelo, _Libro._Libro.Trim(), listaFacturas, key, processMsgError, rutaFichero);
                    factucert factucert = (factucert)Sage.ES.S50.Addons.AddonsController.Instance.AddonsManager.GetAddon("FACTUCERT");
                    factucert.Log(ew.enumerations.TipoMensaje.Info, lcLog, "_Envio Modelo_" + _ModeloFiscal._Modelo + "_" + key + "_" + cIdentificador);

                }
                //                MessageBox.Show((enviadoXML ? "ENVIADO:" : "NO ENVIADO:") + processMsgError, "Respuesta");

                Dictionary<string[], string[]> allDes_Error = new Dictionary<string[], string[]>();

                if (!string.IsNullOrWhiteSpace(processMsgError))
                {
                    allDes_Error = extraerDescripcionesdeErrores(processMsgError, out codigoError);
                }
                else
                {
                    string[] clave = { "", "" };
                    string[] value = { "", "" };
                    allDes_Error.Add(clave, value);
                }

                // Me recorro los errores extraidos y creo las repuestas 
                foreach (KeyValuePair<string[], string[]> des_Error in allDes_Error)
                {
                    EstadoAEATModelos estado;
                    if (string.IsNullOrWhiteSpace(des_Error.Key[1])) // si es un error para todas las facturas
                    {
                        estado = (enviadoXML ? (string.IsNullOrWhiteSpace(processMsgError) ? EstadoAEATModelos.Aceptada : EstadoAEATModelos.AceptadaConErrores) : EstadoAEATModelos.Rechazada);
                    }
                    else // Error para una factura en concreto de numero des_Error.Key
                    {
                        estado = (des_Error.Value[1].Trim().ToUpper() == "CORRECTO" ? EstadoAEATModelos.Aceptada : (des_Error.Value[1].Trim().ToUpper() == "INCORRECTO" ? EstadoAEATModelos.Rechazada : EstadoAEATModelos.AceptadaConErrores)); // ACEPTADOCONERRORES
                    }
                    
                    List<RespuestaFacturaBase> itemsRespuestas = crearRespuestas(codigoError, des_Error, estado, rutaFichero);
                    foreach (RespuestaFacturaBase item in itemsRespuestas)
                    {
                        respuestas.Add(item); 
                    }
                }

            }
            else
            {
                if (tag_Envio_Ticketbai.ToUpper() == "NO")
                {
                    RespuestaFacturaBase respuesta = new RespuestaFacturaBase();
                    respuesta._Envio = tipoEnvioModelos;
                    respuesta._Estado = EstadoAEATModelos.Rechazada;
                    respuesta._Error._Descripcion = "ERROR GENERAL PROVOCADO. REVISA TU CONFIG.INI EL TAG [ENVIO_TICKETBAI]";
                    respuestas.Add(respuesta);

                    enviadoXML = false;
                }
                else
                {
                    RespuestaFacturaBase respuesta = new RespuestaFacturaBase();
                    respuesta._Envio = tipoEnvioModelos;
                    respuesta._Estado = EstadoAEATModelos.Aceptada;
                    respuesta._Error._Descripcion = "";// "ACEPTADA GENERAL PROVOCADO. REVISA TU CONFIG.INI EL TAG [ENVIO_TICKETBAI]";
                    respuestas.Add(respuesta);

                    enviadoXML = true;
                }
            }
        }

        private Dictionary<string[], string[]> extraerDescripcionesdeErrores(string msgError, out string codigoError)
        {
            string[] separador = { "||" };
            string[] errores = msgError.Split(separador, StringSplitOptions.None);
            Dictionary<string[], string[]> allDes_Error = new Dictionary<string[], string[]>();
            int count = 0;

            codigoError = (errores.Count() > 0 ? errores[0].Split('|')[0] : "");

            foreach (string error in errores)
            {
                count++;

                if (errores.Count() == 1 || count > 1) // Si solo hay un error es el genérico y lo añadimos, pero si hay mas de uno obviamos el generico que es el primero y solo cogemos los errores por factura.
                {
                    string[] errorSplit = error.Split('|');
                    if (errorSplit != null && errorSplit.Count() > 0)
                    {

                        ParseError(ref errorSplit);

                        string factura = (errores.Count() > 1 ? obtenerFactura(error) : "");
                        string nif = (errores.Count() > 1 ? obtenerNif(error) : "");
                        string[] clave = { nif, factura };
                        // Si la descripción del error viene vacia guardo el error completo
                        string[] datosError = { (string.IsNullOrWhiteSpace(errorSplit[errorSplit.Count() - 1]) ? error : errorSplit[errorSplit.Count() - 1]), (string.IsNullOrWhiteSpace(errorSplit[errorSplit.Count() - 1]) || count == 1 ? "" : errorSplit[0].Trim())};

                        if (allDes_Error.ContainsKey(clave)) // siya ha habido un error para esta factura le sumo la nueva desripcion a la antigua para que pueda visualizar las dos
                        {
                            allDes_Error[clave][0] = allDes_Error[clave][0] + (String.IsNullOrWhiteSpace(allDes_Error[clave][0]) ? "" : "#") + datosError;
                        }
                        else
                        {
                            allDes_Error.Add(clave, datosError);
                        }

                    }
                }

            }
            return allDes_Error;
        }

        private string obtenerFactura(string error)
        {
            string factura = "";
            string[] errorSplit = error.Split('|');
            if (errorSplit != null && errorSplit.Count() > 3)
            {
                factura = (errorSplit[2].Trim().ToUpper() != "EMPTY" ? errorSplit[2].Trim() : "") + (errorSplit[3].Trim().ToUpper() != "EMPTY" ? errorSplit[3].Trim().PadLeft(8) : "");//TODO Verificar cuantos espacios hay que poner entre serie y numero
            }

            return factura;
        }

        private string obtenerNif(string error)
        {
            string nif = "";
            string[] errorSplit = error.Split('|');
            if (errorSplit != null && errorSplit.Count() > 3)
            {
                // Quitamos el "ES" del nif porque puede venir de IDOtro relleno con este y si no lo quitamos no encontrariamos la factura...
                nif = (errorSplit[1].Trim().ToUpper() != "EMPTY" ? (errorSplit[1].Trim().ToUpper().StartsWith("ES") ? errorSplit[1].Trim().Substring(2) : errorSplit[1].Trim() ) : "").Trim();
            }

            return nif;
        }


        private List<RespuestaFacturaBase> crearRespuestas(string codigoError, KeyValuePair<string[], string[]> des_Error, EstadoAEATModelos estado, string tcFicheroXML)
        {
            IEnumerable<ILibroFila> filas = null;
            string descripError = des_Error.Value[0];

            if (!string.IsNullOrWhiteSpace(des_Error.Key[1]))
            {
                if (_lEsLibroBienes140)
                {
                    filas = ObtenerFilasLibroBienesCrearRespuesta(des_Error.Key[1]);                    
                }
                // En el caso de ingresos y gastos sin factura también llega NIF. Quito la condición que sea cliente
                else if (string.IsNullOrWhiteSpace(des_Error.Key[0]) || des_Error.Key[0] == ((Empresa)EW_GLOBAL._Empresa)._CifTC) // Ventas no trae nif y solo buscamos por factura o si viene el nif de la empresa. 
                {
                    // Consideramos que son ventas por lo cual despreciamos si hay alguna de compras por si coincide que se manden facturas con el mismo numero y unas de compras y otras de ventas. Siempre cogeremos las de Ventas
                    filas = _Libro._Filas.Where(f => f._Seleccion && (((DatosIVAFactucert)f)._EnvioSerieFactura.Trim() + ((DatosIVAFactucert)f)._EnvioNumFactura.Trim().PadLeft(8)).TrimEnd() == des_Error.Key[1].TrimEnd()); // Filtramos las seleccionadas                    
                }
                else // compras : viene el nif y buscamos por él
                {
                    filas = _Libro._Filas.Where(f => f._Seleccion && ((DatosIVAFactucert)f)._NIF.Trim() + ((DatosIVAFactucert)f)._EnvioSerieFactura.Trim() + ((DatosIVAFactucert)f)._EnvioNumFactura.Trim().PadLeft(8) == des_Error.Key[0].Trim() + des_Error.Key[1].TrimEnd()); // Filtramos las seleccionadas
                }
                if( filas == null)
                {
                    descripError = "Factura no encontrada." + descripError;
                }
            }

            ObtenerRutaNombreFicheroRespuesta(tcFicheroXML, out string lcRutaFicheroRespuesta, out string lcNombreFicheroRespuesta);

            List<RespuestaFacturaBase> localRespuestas = new List<RespuestaFacturaBase>();
            if (filas == null || filas.Count() == 0)
            {
                RespuestaFacturaBase respuesta = new RespuestaFacturaBase();
                respuesta._Envio = tipoEnvioModelos;
                respuesta._Estado = estado;
                respuesta._Factura = des_Error.Key[1].Trim();
                respuesta._IdentificacionFactura = "";
                respuesta._Error._Codigo = codigoError;
                respuesta._Error._Descripcion = descripError;
                respuesta._FechaPresentacion = DateTime.Now;
                respuesta._Libro = _Libro;
                respuesta._Cuenta = "";
                respuesta._RutaFichero = lcRutaFicheroRespuesta;
                respuesta._Fichero = lcNombreFicheroRespuesta;                                
                respuesta._NIF = des_Error.Key[0].Trim();
                respuesta._FechaExpedicion = Convert.ToDateTime(null);
                respuesta._MasInformacion = ObtenerMasInformacionSubcapitulo(subcapituloBien);

                localRespuestas.Add(respuesta);
            }
            else
            {
                foreach (ILibroFila fila in filas)
                {
                    // Bug 190698 Rellenamos con la misma respuesta de error todos los registros de la factura ya que no sabemos cual de ellos es el cre ha producido el error.
                    RespuestaFacturaBase respuesta = new RespuestaFacturaBase();
                    respuesta._Envio = tipoEnvioModelos;
                    respuesta._Estado = estado;
                    respuesta._Factura = (_lEsLibroBienes140 ? fila._IdentificacionBien : fila._Factura);
                    respuesta._IdentificacionFactura = fila._IdentificacionFactura;
                    respuesta._Error._Codigo = codigoError;
                    respuesta._Error._Descripcion = descripError;
                    respuesta._FechaPresentacion = DateTime.Now;
                    respuesta._Libro = _Libro;
                    respuesta._Cuenta = fila._Codigo;
                    respuesta._NIF = fila._NIF;
                    respuesta._FechaExpedicion = Convert.ToDateTime((_lEsLibroBienes140 ? fila._FechaInicio : fila._FechaExpedicion));
                    respuesta._MasInformacion = ObtenerMasInformacionSubcapitulo(((DatosIVAFactucert)fila)._SubcapituloBien);
                    respuesta._RutaFichero = lcRutaFicheroRespuesta;
                    respuesta._Fichero = lcNombreFicheroRespuesta;
                    
                    localRespuestas.Add(respuesta);
                }
            }
            return localRespuestas;
        }

        private void ObtenerRutaNombreFicheroRespuesta(string tcFicheroXML, out string tcRutaFicheroRespuesta, out string tcNombreFicheroRespuesta)
        {
            tcRutaFicheroRespuesta = Path.Combine(_RutaFicheroXML, (string.IsNullOrWhiteSpace(_Libro._Libro) ? "Libro" : _Libro._Libro.Trim()), "respuesta");
            tcNombreFicheroRespuesta = Path.GetFileNameWithoutExtension(tcFicheroXML) + "_Resp" + Path.GetExtension(tcFicheroXML);
        }

        private IEnumerable<ILibroFila> ObtenerFilasLibroBienesCrearRespuesta(string tcIdBien)
        {
            IEnumerable<ILibroFila> filasBase = null, filasExtra = null;

            filasBase = _Libro._Filas.Where(f => f._Seleccion && f._ProximoEnvio == tipoEnvioModelos && ((DatosIVAFactucert)f)._SubcapituloBien == subcapituloBien && (((DatosIVAFactucert)f)._IdentificacionBien.Trim() == tcIdBien.TrimEnd()));
            filasExtra = ((Sage.ES.S50.Modelos._140.LibroBienesInversion)_Libro)._FilasExtra.Where(f => f._Seleccion && f._ProximoEnvio == tipoEnvioModelos && ((DatosIVAFactucert)f)._SubcapituloBien == subcapituloBien && (((DatosIVAFactucert)f)._IdentificacionBien.Trim() == tcIdBien.TrimEnd()));

            if (filasBase != null && filasBase.Count() > 0)
                filasBase.Concat(filasExtra);
            else
                filasBase = filasExtra;

            return filasBase;
        }


        private void ProcesarResultados(bool isSend)
        {
            List<ILibroFila> lolstSel = null;

            if (!_lEsLibroBienes140)
                lolstSel = _Libro._Filas.Where(f => f._Seleccion && (f._ProximoEnvio == tipoEnvioModelos || f._ProximoEnvio == TipoEnvioModelos.Nada)).ToList(); // Filtramos las seleccionadas
            else
                lolstSel = ObtenerFilasLibroBienesProcesarResultados();

            // Asignamos el primer error que no tenga numero de factura para posteriormente crear errores en todas las facturas que no hayan dado error.
            RespuestaFacturaBase loRespuestaFacturaBase = respuestas.Where(r => string.IsNullOrWhiteSpace(r._Factura)).FirstOrDefault();

            if (loRespuestaFacturaBase == null) // Si no tenemos ningún error generico para todas las facturas creamos uno para que las facturas que no devuelvan error para que queden como aceptadas
            {
                EstadoAEATModelos estado =  EstadoAEATModelos.Aceptada  ;
                string[] clave = { "", "" };
                string[] value = { "", "" };
                KeyValuePair<string[], string[]> facturaVacia = new KeyValuePair<string[], string[]>(clave, value);
                string mensaje = "";
                loRespuestaFacturaBase = crearRespuestas(mensaje, facturaVacia, estado,"")[0];// crearRespuesta(mensaje, facturaVacia, estado);
            }

            int numResp = 0;
            if (loRespuestaFacturaBase != null)
            {
                foreach (ILibroFila fila in lolstSel)
                {
                    // si no encontramos una respuesta especifica para esa factura añadimos una respuesta para esa factura generica que la sacamos de loRespuestaFacturaBase
                    if (ComprobarRespuesta(fila))
                    {
                        if (fila._ProximoEnvio == loRespuestaFacturaBase._Envio || fila._ProximoEnvio == TipoEnvioModelos.Nada && loRespuestaFacturaBase._Envio == TipoEnvioModelos.Modificacion)
                        {
                            numResp++;
                            RespuestaFacturaBase respuesta = new RespuestaFacturaBase()
                            {
                                _Error = loRespuestaFacturaBase._Error,
                                _Cuenta = fila._Codigo,
                                _Envio = loRespuestaFacturaBase._Envio, // fila._ProximoEnvio,
                                _Estado = loRespuestaFacturaBase._Estado,
                                _Factura = (_lEsLibroBienes140 ? fila._IdentificacionBien : fila._Factura),
                                _IdentificacionFactura = fila._IdentificacionFactura,
                                _FechaExpedicion = Convert.ToDateTime((_lEsLibroBienes140 ? fila._FechaInicio : fila._FechaExpedicion)),
                                _FechaPresentacion = DateTime.Now,
                                _Libro = _Libro,
                                _NIF = fila._NIF,
                                _MasInformacion = ObtenerMasInformacionSubcapitulo(((DatosIVAFactucert)fila)._SubcapituloBien),
                                _Fichero = loRespuestaFacturaBase._Fichero,
                                _RutaFichero=loRespuestaFacturaBase._RutaFichero
                                
                            };
                            _Resultado.Add(respuesta);
                        }
                    }
                }
            }

            // pasamos a _Resultado todas las respuestas que NO tengan la _Factura vacia
            foreach (RespuestaFacturaBase respuesta in respuestas)
            {
                if (!string.IsNullOrWhiteSpace(respuesta._Factura))
                {
                    _Resultado.Add(respuesta);
                }
            }

            if (_Resultado.Count > 0)
            {
                _Resultado = _Resultado.OrderBy(r => r._Factura).ToList(); // Ordenamos la lista por factura
            }
        }

        private bool ComprobarRespuesta(ILibroFila toFila)
        {
            bool llOk = false;

            if (!_lEsLibroBienes140)
                llOk = respuestas.Where(r => r._Factura.Trim() == toFila._Factura.Trim() && r._NIF.Trim() == toFila._NIF.Trim() && r._IdentificacionFactura.Trim() == toFila._IdentificacionFactura.Trim()).Count() == 0;
            else
                llOk = respuestas.Where(r => r._Factura.Trim() == toFila._IdentificacionBien.Trim() && r._NIF.Trim() == toFila._NIF.Trim() && r._IdentificacionFactura.Trim() == toFila._IdentificacionFactura.Trim()).Count() == 0;

            return llOk;
        }

        private string ObtenerMasInformacionSubcapitulo(SubcapituloBien teSubcapitulo)
        {
            if (!_lEsLibroBienes140)
                return "";

            string lcSubcapitulo = "";
            switch (teSubcapitulo)
            {
                case SubcapituloBien.Alta:
                    lcSubcapitulo = "Subcapítulo Alta de bienes";
                    break;
                case SubcapituloBien.Regularizacion:
                    lcSubcapitulo = "Subcapítulo Regularización de bienes";
                    break;
                case SubcapituloBien.Baja:
                    lcSubcapitulo = "Subcapítulo Baja de bienes";
                    break;
            }

            return lcSubcapitulo;
        }

        private List<ILibroFila> ObtenerFilasLibroBienesProcesarResultados()
        {                 
            List<ILibroFila> lolstSel = _Libro._Filas.Where(f => f._Seleccion && ((DatosIVAFactucert)f)._SubcapituloBien == subcapituloBien && (f._ProximoEnvio == tipoEnvioModelos || f._ProximoEnvio == TipoEnvioModelos.Nada)).ToList(); 
            List<ILibroFila> lolstSelExtra = ((Sage.ES.S50.Modelos._140.LibroBienesInversion)_Libro)._FilasExtra.Where(f => f._Seleccion && ((DatosIVAFactucert)f)._SubcapituloBien == subcapituloBien && (f._ProximoEnvio == tipoEnvioModelos || f._ProximoEnvio == TipoEnvioModelos.Nada)).ToList();

            if (lolstSel != null && lolstSel.Count > 0)
                lolstSel.AddRange(lolstSelExtra);
            else
                lolstSel = lolstSelExtra;

            return lolstSel;
        }

        protected override string rutaAddonsXml()
        {
            string grupoactual = FUNCTIONS._Grupo_Actual();
            string empresa = Convert.ToString(EW_GLOBAL._GetVariable("wc_empresa")).Trim();

            return FACTUCERT._FactuCertConfig._ConfigFactuCertModelo._RutaExportacion.Trim() + "\\" + grupoactual + "\\" + empresa + "\\" + _ModeloFiscal._Modelo.Trim() + "\\files";
        }

        protected override string rutaAddonsLog()
        {
            string grupoactual = FUNCTIONS._Grupo_Actual();
            string empresa = Convert.ToString(EW_GLOBAL._GetVariable("wc_empresa")).Trim();

            return FACTUCERT._FactuCertConfig._ConfigFactuCertModelo._RutaExportacion.Trim() + "\\" + grupoactual + "\\" + empresa + "\\" + _ModeloFiscal._Modelo.Trim() + "\\resp";
        }
    }
}