MontajeServices.cs

using System;
using System.Collections.Generic;
using System.Data;
using sage.ew.db;
using sage.ew.global;
using sage.ew.empresa;
using sage.ew.articulo;
using sage.ew.cliente;
using sage.ew.docsven;
using sage.ew.functions;
using sage.ew.global.Diccionarios;

using sage.ew.serie;
using sage.ew.interficies;

namespace sage.addons.services.Negocio.Clases
{
    public class MontajeServices:Montaje // SerieServices 
    {
        public string cliente = "";

        public MontajeServices(): base()
        {
            //_Init();
        }

        public MontajeServices(string tcMontaje, IDocumentLinea toDocumentoLinea = null) : base( tcMontaje, toDocumentoLinea )        
        {
            //_Init(tcMontaje, toDocumentoLinea);
        }

        #region METODOS PUBLICOS
        #region Montaje_Services
        public virtual bool _Service_Serie(IDocumentLinea toLinea = null)
        {
            //Obtengo el query
            string lcQuery = "";// TODO: Si usamos algún dia modelos en las lineas de servicios : ObtenerQuery_Service_Serie(toLinea);

            //Si tengo query (lo normal es que sí)
            if (!String.IsNullOrWhiteSpace(lcQuery))
            {
                return DB.SQLExec(lcQuery); //Devuelvo el resultado de la operación
            }
            return false;
        }

        public virtual bool _ServiceCabecera_Serie()
        {
            //Obtengo el query
            string lcQuery = ObtenerQuery_ServiceCabecera_Serie(); //(toDocum);

            //Si tengo query (lo normal es que sí)
            if (!String.IsNullOrWhiteSpace(lcQuery))
            {
                return DB.SQLExec(lcQuery); //Devuelvo el resultado de la operación
            }
            return false;
        }

        public bool _ServiceCabecera_Serie(string tcEmpresa, string tcNumero, string tcLetra)
        {
            //Obtengo el query
            string lcQuery = ObtenerQuery_ServiceCabecera_Serie(tcEmpresa, tcNumero, tcLetra); //(toDocum);

            //Si tengo query (lo normal es que sí)
            if (!String.IsNullOrWhiteSpace(lcQuery))
            {
                return DB.SQLExec(lcQuery); //Devuelvo el resultado de la operación
            }
            return false;
        }

        protected string ObtenerQuery_ServiceCabecera_Serie(string tcEmpresa = "", string tcNumero = "", string tcLetra = "")
        {
            string lcQuery = "";

            //lcQuery += ObtenerQueryCompras(eOperacionesCompras.SERVICE_cabecera_Alta, _Serie, tcEmpresa, tcNumero, tcLetra);
            lcQuery += ObtenerQueryHisserie(eOperacionesHisserie.SERVICE_cabecera_AltaModelo, tcEmpresa, tcNumero + tcLetra);
            //                    lcQuery += ObtenerQueryVenser(eOperacionesVenser.Insertar);

            return lcQuery;
        }

        #endregion Montaje_Services

        #region Cancelar_Montaje_Services
        public bool _Cancelar_Service_Serie(IDocumentLinea toLinea = null)
        {
            //Obtengo el query
            string lcQuery = "";// TODO: Si usamos algún dia modelos en las lineas de servicios :  ObtenerQuery_Cancelar_Service_Serie(toLinea);

            //Si tengo query (lo normal es que sí)
            if (!String.IsNullOrWhiteSpace(lcQuery))
            {
                return DB.SQLExec(lcQuery); //Devuelvo el resultado de la operación
            }
            return false;
        }

        public virtual bool _Cancelar_ServiceCabecera_Serie() // IDocumentLinea toLinea = null)
        {
            //Obtengo el query
            string lcQuery = ObtenerQuery_Cancelar_ServiceCabecera_Serie(); // toLinea);

            //Si tengo query (lo normal es que sí)
            if (!String.IsNullOrWhiteSpace(lcQuery))
            {
                return DB.SQLExec(lcQuery); //Devuelvo el resultado de la operación
            }
            return false;
        }

        public bool _Cancelar_ServiceCabecera_Serie(string tcEmpresa, string tcNumero, string tcLetra) // IDocumentLinea toLinea = null)
        {
            //Obtengo el query
            string lcQuery = ObtenerQuery_Cancelar_ServiceCabecera_Serie(tcEmpresa, tcNumero, tcLetra); // toLinea);

            //Si tengo query (lo normal es que sí)
            if (!String.IsNullOrWhiteSpace(lcQuery))
            {
                return DB.SQLExec(lcQuery); //Devuelvo el resultado de la operación
            }
            return false;
        }

        protected virtual string ObtenerQuery_Cancelar_ServiceCabecera_Serie(string tcEmpresa = "", string tcNumero = "", string tcLetra = "") // IDocumentLinea toLinea = null)
        {
            string lcQuery = "";

            //lcQuery += ObtenerQueryCompras(eOperacionesCompras.SERVICE_cabecera_Baja, _Serie, tcEmpresa, tcNumero, tcLetra);
            lcQuery += ObtenerQueryHisserie(eOperacionesHisserie.SERVICE_cabecera_BajaModelo, tcEmpresa, tcNumero + tcLetra);

            //                    lcQuery += ObtenerQueryVenser(eOperacionesVenser.Borrar);

            return lcQuery;
        }
        #endregion Cancelar_Montaje_Services


        protected override string ObtenerQueryCompras(eOperacionesCompras teOperacion, string tcSerie = "", string tcEmpresa = "", string tcNumero = "", string tcLetra = "", string tcLinea = "")
        {
            string lcSql = "";
         
            decimal precio = (_oDocLin != null && _oDocLin.GetType().GetProperty("_Precio") != null ? _oDocLin._Precio : 0);
            string letra = (_oDocLin != null && _oDocLin.GetType().GetProperty("_Letra") != null && _oDocLin._Letra != null ? _oDocLin._Letra : "");
            cliente = (string.IsNullOrWhiteSpace(cliente) ? (_oDocLin != null && _oDocLin.GetType().GetProperty("_Cliente") != null ? _oDocLin._Cliente : "") : cliente);

            Cliente loCli = new Cliente(cliente); //(_oDocLin._Cliente);
            loCli._Load();

            switch (teOperacion)
            {

                //Si la operación es una venta
                case eOperacionesCompras.SERVICE_cabecera_Baja:
                    //Actualizo la tabla modelo con los datos de la venta
                    lcSql = "UPDATE " + DB.SQLDatabase("COMUNES", "MODELO") + " SET " +
                            "VENTA = " + DB.SQLString(precio) + ", " +                                //Precio Venta
                            "NUM_VENT = " + DB.SQLString(tcNumero.ToString().TrimEnd().PadLeft(10) +
                                            tcLetra.ToString().Trim()) + " , " +                        //Número de documento
// no tengo fecha porque no tengo linea aqui, hay que pasasarsela por parametro    "FEC_VENT =  " + DB.SQLString(_oDocLin._Fecha) + " , " +                            //Fecha documento de venta
                            "CODEMP = " + DB.SQLString(tcEmpresa.ToString().Trim()) + ", " +            //Empresa 
                            "CLIENTE= " + DB.SQLString(cliente.ToString().Trim()) + ", " +            //Cliente de la venta
                            "NOMBRE= " + DB.SQLString(loCli._Nombre.ToString().Trim()) + ", " +                 //Nombre del cliente de la venta
                            "ESTADO= " + DB.SQLString(6) + ", " +                                               //ESTADO -> 6 (entregado)
                            "ACCESO= " + DB.SQLString("N") +                                                    //ACCESO -> N (muestra sello CERRADO)
                            "WHERE CODIGO = " + DB.SQLString(_Serie);
                    break;

                //Si la operación es un abono de venta.
                case eOperacionesCompras.SERVICE_cabecera_Alta:
                    //Libero los datos del montaje
                    lcSql = "UPDATE " + DB.SQLDatabase("COMUNES", "MODELO") +
                            " SET " + // VENTA = 0, NUM_VENT = '', FEC_VENT = null, " +
                            "CLIENTE= " + DB.SQLString(cliente.ToString().Trim()) + ", " +            //Cliente de la venta
                            "NOMBRE = '', ESTADO=" + DB.SQLString(1) + ", ACCESO= " + DB.SQLString("S") +
                            " WHERE CODIGO = " + DB.SQLString(_Serie);
                    break;




                default: //Caso no contemplado (?)
                    lcSql = base.ObtenerQueryCompras(teOperacion, tcSerie, tcEmpresa, tcNumero, tcLetra, tcLinea);
                    break;
            }

            return lcSql.__ToConcatenableQuery();
        }

        protected string ObtenerQueryHisserie(eOperacionesHisserie teOperacion, string tcEmpresa = "", string lcNumero = "", decimal tnCoste = 0, string tcObserva = "", string tcDocumento = "", bool tlUsarParametroCoste = false)
        {
            string lcSql = "", lcDocumento = "", lcMovimiento = "", lcObserva = "";
            decimal lnCoste = 0, lnPrecio = 0;

            switch (teOperacion)
            {
                //Alta de un montaje
                case eOperacionesHisserie.SERVICE_cabecera_AltaModelo:
                    lcDocumento = "SERVICEMODELO";
                    lcMovimiento = "A";
                    if (tlUsarParametroCoste) lnCoste = tnCoste;
                    else lnCoste = _Coste();
                    lnPrecio = _Venta();
                    lcObserva = "Modelo entrada en un servicio";
                    lcSql = QueryInsertarHisserieServices(lcDocumento, lcMovimiento, lnCoste, lnPrecio, lcObserva, false, tcEmpresa, lcNumero);
                    break;

                case eOperacionesHisserie.SERVICE_cabecera_BajaModelo:
                    lcDocumento = "SERVICEMODELO";
                    lcMovimiento = "B";
                    lnCoste = _Coste();
                    lnPrecio = 0;
                    lcObserva = "Modelo borrado del servicio";
                    lcSql = QueryInsertarHisserieServices(lcDocumento, lcMovimiento, lnCoste, lnPrecio, lcObserva, false, tcEmpresa, lcNumero);
                    break;

                case eOperacionesHisserie.Traspaso_Empresa:
                    if (tcDocumento == "*CABECERA*")
                    {
                        lcDocumento = "SERVICEMODELO";
                        lcMovimiento = "M";
                        lnCoste = 0;
                        lnPrecio = 0;
                        lcObserva = "Traspaso entre empresas";
                        lcSql = QueryInsertarHisserieServices(lcDocumento, lcMovimiento, lnCoste, lnPrecio, lcObserva, false, tcEmpresa, lcNumero);
                        break;
                    }
                    else
                    {
                        // no tenemos modelos enlineas en servicios
                        //lcDocumento = "SERVICEMATERIAL";
                        //lcMovimiento = "M";
                        //lnCoste = 0;
                        //lnPrecio = 0;
                        //lcObserva = "Traspaso entre empresas del material de un servicio";
                        //lcSql = QueryInsertarHisserie(lcDocumento, lcMovimiento, lnCoste, lnPrecio, lcObserva, false, tcEmpresa, lcNumero);
                        break;
                    }
                //Resto de operaciones
                default:
                    lcSql = base.ObtenerQueryHisserie(teOperacion, tnCoste, tcObserva, tcDocumento, tlUsarParametroCoste);
                    break;
            }

            return lcSql.__ToConcatenableQuery();
        }


        protected string QueryInsertarHisserieServices(string tcDocumento, string tcMovimiento, decimal tnCoste, decimal tnPrecio, string tcObserva, bool ignorarRegistro = false, string tcEmpresa = "", string lcNumero = "")
        {
            string lcSql = "", lcCuenta = "", lcEmpresa = "";
            string letra = (_oDocLin != null && _oDocLin.GetType().GetProperty("_Letra") != null && _oDocLin._Letra != null ? _oDocLin._Letra : "");
            cliente = (string.IsNullOrWhiteSpace(cliente) ? (_oDocLin != null && _oDocLin.GetType().GetProperty("_Cliente") != null ? _oDocLin._Cliente : "") : cliente);

            // PE-79498, PE-82543, PE-82540
            lcEmpresa = (string.IsNullOrWhiteSpace(tcEmpresa) ? EW_GLOBAL._GetVariable("wc_empresa").ToString().Trim() : tcEmpresa);

            //Task 168713
            DateTime? fechaDocumento = null;

            switch (tcDocumento)
            {

                case "SERVICEMODELO":
                    lcNumero = (string.IsNullOrWhiteSpace(lcNumero) ? (_oDocLin != null ? _oDocLin._Numero.ToString() : "") : lcNumero).TrimEnd().PadLeft(10) + letra.ToString().Trim();
                    lcCuenta = cliente.ToString().Trim();
                    lcEmpresa = (string.IsNullOrWhiteSpace(tcEmpresa) ? (_oDocLin != null ? _oDocLin._Empresa : "") : tcEmpresa);

                    break;
                    
                default:
                    lcNumero = (string.IsNullOrWhiteSpace(lcNumero) ? (_oDocLin != null ? _oDocLin._Numero.ToString() : "") : lcNumero).TrimEnd().PadLeft(10) + letra.ToString().Trim();
                    lcCuenta = cliente.ToString().Trim();
                    lcEmpresa = (string.IsNullOrWhiteSpace(tcEmpresa) ? (_oDocLin != null ? _oDocLin._Empresa : "") : tcEmpresa);
                    try //Pruebo una recuperación genérica (ventas)
                    {
                        if (_oDocLin != null && _oDocLin.GetType().GetProperty("DocVenta") != null && _oDocLin.DocVenta != null)
                        {
                            fechaDocumento = _oDocLin.DocVenta._Fecha;
                        }
                    }
                    catch (Exception loEx)
                    {
                        DB.Registrar_Error(loEx);
                    }
                    break;
            }

            // FI PE-79498, PE-82543, PE-82540

            //Tabla hisserie MOVIMIENTO DE ABONO
            //SERIE,FECHA,HORA,DOCUMENTO,NUMERO,CUENTA,MOVIMIENTO,USUARIO,COSTE,PRECIO,OBSERVA,ORDENADOR,MODELO,
            //VISTA,EMPRESA,UBICA,LOTE,MOVANT,MOVANT2

            lcSql = "INSERT INTO " + DB.SQLDatabase("COMUNES", "HISSERIE") + "  " +
                            "(SERIE,FECHA,HORA,DOCUMENTO,NUMERO,CUENTA,MOVIMIENTO,USUARIO,COSTE,PRECIO,OBSERVA,ORDENADOR,EMPRESA,ALMACEN,MODELO, IGNORAR, FECHADOC) " +
                            "Values(" +
                                (!_Modelo ? DB.SQLString(_Serie) : DB.SQLString("")) + ", " + //SERIE
                                DB.SQLString(DateTime.Now.ToString("d")) + ", " + //FECHA
                                DB.SQLString(DateTime.Now.ToString("T")) + ", " + //HORA
                                DB.SQLString(tcDocumento) + ", " + //DOCUMENTO
                                DB.SQLString(lcNumero) + " , " + //NUMERO
                                DB.SQLString(lcCuenta) + ", " + //CUENTA
                                DB.SQLString(tcMovimiento) + ", " + //MOVIMIENTO
                                DB.SQLString(Convert.ToString(EW_GLOBAL._GetVariable("wc_usuario")).Trim().ToUpper()) + ", " + //USUARIO
                                DB.SQLString(tnCoste) + ", " + //COSTE
                                DB.SQLString(tnPrecio) + ", " + //PRECIO
                                DB.SQLString(tcObserva) + ", " + //OBSERVA
                                DB.SQLString(Environment.MachineName.Trim().ToUpper()) + ", " + //ORDENADOR
                                DB.SQLString(lcEmpresa) + ", " + //EMPRESA
                                DB.SQLString(GetAlmacen()) + ", " + //ALMACEN
                                (_Modelo ? DB.SQLString(_Serie) : DB.SQLString("")) + ", " + //MODELO
                                (ignorarRegistro ? " CAST(1 as BIT) " : " CAST(0 as BIT) ") + ", " +  //CCR 148577
                                DB.SQLString(fechaDocumento) +
                                ")";


            return lcSql.__ToConcatenableQuery();

        }

        //Se retoca la base para que haga una gestión más completa de la obtención del almacen (Primero intenta obtenerlo del documento sino de la serie y sino blanco)
        //protected override string GetAlmacen()
        //{
        //    return "";
        //}

        // Contiene el método virtual de actualización de tablas y los métodos específicos por tipo de documento
        #region Actualizar posición tablas

        protected virtual bool _ActualizarPosicionTabla_Serser(string tcNumero, IDocumentLinea toLinea = null)
        {
            string lcQuery = "";
            bool llOk = true;

            //Si me pasan la línea la vinculo
            if (toLinea != null) _oDocLin = toLinea;

            //La venta va asociada a una linea Y una serie
            if (_oDocLin == null || string.IsNullOrWhiteSpace(_Serie)) llOk = false;

            lcQuery += ObtenerQueryVenser(eOperacionesVenser.Actualizar, tcNumero); // ObtenerQuerySerser(eOperacionesSerser.Actualizar, tcNumero);

            llOk = llOk && DB.SQLExec(lcQuery);

            return llOk;
        }


        #endregion Actualizar posición tablas

        public override bool _ConsultarVenser(string tcEmpresa, string tcNumero, string tcLetra, int tnLinea, ref DataTable toVenser)
        {
            string lcSql = string.Empty;
            bool llOk = false;

            //VENSER
            //PK:   [EMPRESA] [ALBARAN] [LETRA] [ARTICULO]  [LINEA] [SERIE]
            //[EMPRESA][ALBARAN] [ARTICULO] [LINEA] [SERIE] [NUMERO] [MODELO] [LETRA] [UBICA] [LOTE] [FECHALOG] 

            lcSql = "SELECT SERSER.EMPRESA, SERSER.ALBARAN, SERSER.ARTICULO, SERSER.LINEA, SERSER.SERIE, SERSER.NUMERO, SERSER.MODELO, SERSER.LETRA, SERSER.UBICA, SERSER.LOTE, SERSER.FECHALOG, COMPRAS.COSTE " +
                    "FROM " + DB.SQLDatabase("SERVICES", "SERSER") + " " +
                    "LEFT JOIN " + DB.SQLDatabase("COMUNES", "COMPRAS") + " COMPRAS " +
                    "ON SERSER.SERIE = COMPRAS.SERIE COLLATE Modern_Spanish_CS_AS " +
                    "WHERE SERSER.EMPRESA = " + DB.SQLString(tcEmpresa) +
                     " AND SERSER.ALBARAN  = " + DB.SQLString(tcNumero) +
                     " AND SERSER.LETRA   = " + DB.SQLString(tcLetra) +
                     " AND SERSER.LINEA   = " + DB.SQLString(tnLinea);

            llOk = DB.SQLExec(lcSql, ref toVenser);

            return llOk;
        }

        public override bool _Actualizar_Numero_Linia(IDocumentLinea toDocVentaLin, int tnNewLinia)
        {
            string lcSql = string.Empty;
            bool lbRetorn = false;


            // Taula SERIES!VENSER
            lcSql = " Update " + DB.SQLDatabase("SERVICES", "SERSER") +
                    " Set LINEA = " + DB.SQLString(tnNewLinia) +
                    " WHERE EMPRESA = " + DB.SQLString(toDocVentaLin._Empresa) +
                        " AND ALBARAN = " + DB.SQLString(toDocVentaLin._Numero) +
                        " AND LETRA = " + DB.SQLString(toDocVentaLin._Letra) +
                        " AND LINEA = " + DB.SQLString(toDocVentaLin._LineaReal);


            //Executo la consulta
            lbRetorn = DB.SQLExec(lcSql);

            return lbRetorn;
        }

        public override bool _ConsultarVenser(IDocumentoLineaExtensiones toLinea, ref DataTable toVenser, bool tlFiltrarLineas = true, string tcSerie = "")
        {
            string lcSql = string.Empty;
            bool llOk = false;

            //Si no tengo linea acabo
            if (toLinea == null) return llOk;

            bool llEsmontaje = (toLinea._oArticulo != null && !string.IsNullOrWhiteSpace(toLinea._oArticulo._Codigo)) ? toLinea._oArticulo._EsMontaje : _Modelo;

            //VENSER
            //PK:   [EMPRESA] [ALBARAN] [LETRA] [ARTICULO]  [LINEA] [SERIE]
            //[EMPRESA][ALBARAN] [ARTICULO] [LINEA] [SERIE] [NUMERO] [MODELO] [LETRA] [UBICA] [LOTE] [FECHALOG] 

            lcSql = "SELECT SERSER.EMPRESA, SERSER.ALBARAN, SERSER.ARTICULO, SERSER.LINEA, SERSER.SERIE, SERSER.NUMERO, SERSER.MODELO, SERSER.LETRA, SERSER.UBICA, SERSER.LOTE, SERSER.FECHALOG, COMPRAS.COSTE " +
                    "FROM " + DB.SQLDatabase("SERVICES", "SERSER") + " " +
                    "LEFT JOIN " + DB.SQLDatabase("COMUNES", "COMPRAS") + " COMPRAS " +
                    "ON SERSER.SERIE = COMPRAS.SERIE COLLATE Modern_Spanish_CS_AS " +
                    "WHERE SERSER.EMPRESA = " + DB.SQLString(toLinea._Empresa) +
                     " AND SERSER.ALBARAN  = " + DB.SQLString(toLinea._Numero) +
                     " AND SERSER.LETRA   = " + DB.SQLString(toLinea._Letra) +
                     " AND SERSER.MODELO = " + (llEsmontaje ? DB.SQLTrue() : DB.SQLFalse());
            if (tlFiltrarLineas) lcSql += " AND SERSER.LINEA   = " + DB.SQLString(toLinea._LineaReal);
            if (!string.IsNullOrWhiteSpace(tcSerie)) lcSql += " AND SERSER.SERIE   = " + DB.SQLString(tcSerie);

            llOk = DB.SQLExec(lcSql, ref toVenser);

            return llOk;
        }
    }

    #endregion METODOS PUBLICOS
}