GetListadosModulosCommand.cs

using System;
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Text;
using sage.ew.db;
using sage.ew.global;
using sage.ew.interficies;

namespace Sage.ES.S50.Addons
{
    internal class GetListadosModulosCommand : Command
    {
        string lcWhere = string.Empty;
        int lnAsesorContable = Convert.ToInt32(EW_GLOBAL._GetVariable("wn_AsesorContable"));

        public GetListadosModulosCommand(IAddonsManager addons) : base(addons)
        {
            Name = "GetListadosModulos";
        }
        protected override bool Condition(params object[] parameters)
        {
            Func<string> Where_Mantes = parameters[1] as Func<string>;
            lcWhere = Where_Mantes();
            return base.Condition(parameters);
        }

        protected override void CommandModulo(IModulo modulo, params object[] parameters)
        {
            string lcConexion = modulo._NombreConexion;
            string lcNombre = modulo._Nombre;
            DataTable tdtResultados = parameters[0] as DataTable;
            Func<string, string> RevisarDescripcion = parameters[2] as Func<string, string>;

            string tcTipo = parameters[3].ToString();

            //Task 194374 - Controlar que existe la base de dades en el diccionario
            if (DB._SQLExisteTablaBBDD(lcConexion, "LISTADOS") && DB._oAliasDB.ContainsKey(lcNombre))
            {
                // Task 175987
                string lcCampoUpdate = DB.SQLExisteCampo(lcNombre, "LISTADOS", "UPDATE") ? " , [update] " : " , '' as [update] ";
                string lcCampoPers   = DB.SQLExisteCampo(lcNombre, "LISTADOS", "PERS") ? " , [pers] " : " , "+DB.SQLFalse()+" as [pers] ";

                string lcSql = $@"select id,pantalla,nombre, FORM, clase, tipo {lcCampoPers} {lcCampoUpdate}
                            from  {DB.SQLDatabase(lcNombre, "listados")} 
                            where {lcWhere}";

                //si la tabla existe en el módulo, obtenemos los registros de listados
                //string lcSql = "select id,pantalla,nombre, FORM, clase, tipo " +
                //                " from " + DB.SQLDatabase(lcNombre, "listados") +
                //                " where " + lcWhere;

                if (!string.IsNullOrWhiteSpace(tcTipo))
                    lcSql += " AND tipo=" + DB.SQLString(tcTipo);

                // Task 142633
                //
                if (lnAsesorContable > 0)
                {
                    // Task 142633; Si estoy en un Sage50 Asesor Contable no miramos el campo SOLUCION sino el campo SMALLPROF y exigiremos que
                    // el campo SMALLPROF sea menor o igual al nivel de Asesor Contable (wn_AsesorContable)
                    // 
                    if (DB.SQLExisteCampo(lcNombre, "LISTADOS", "SMALLPROF"))
                        lcSql += " AND smallprof <= " + lnAsesorContable.ToString().Trim() + " ";
                }
                else
                {
                    // Estoy en un Sage50 normal con gestión comercial y contabilidad, o en un Sage50 SoloConta, o cualquier otro.
                    if (DB.SQLExisteCampo(lcNombre, "LISTADOS", "SOLUCION"))
                        lcSql += " AND solucion <= " + DB.SQLString(EW_GLOBAL._Solucion) + " "; // Task 134340
                }

                lcSql += " order by nombre";

                DataTable ldtTemp = new DataTable();
                DB.SQLExec(lcSql, ref ldtTemp);


                if (ldtTemp != null && ldtTemp.Rows.Count > 0)
                {
                    foreach (DataRow row in ldtTemp.Rows)
                    {
                        //añadimos al nombre del listado, entre parentesis el nombre del módulo al que pertenece
                        row["nombre"] = RevisarDescripcion(row["nombre"].ToString());
                        row["nombre"] = row["nombre"].ToString().Trim() + " (" + lcNombre + ")";


                        DataRow[] foundListado = tdtResultados.Select("pantalla = '" + row["pantalla"].ToString().Trim() + "'");
                        if (foundListado.Length != 0)
                        {
                            //eliminar la fila del datatable tdtResultados puesto que a mismo nombre de pantalla tendrá preferencia la del módulo
                            foundListado[0].Delete();
                            tdtResultados.AcceptChanges();
                        }
                    }
                    tdtResultados.Merge(ldtTemp); //añadimos los registros al DataTable de resultados
                }
            }
        }

        protected override object Return(params object[] parameters)
        {
            ((DataTable)parameters[0]).DefaultView.Sort = "nombre asc";
            ((DataTable)parameters[0]).DefaultView.ToTable();
            return base.Return(parameters);
        }
        protected override ExpectedParameters GetExpectedParameters()
        {
            return new ExpectedParameters(new Type[] { typeof(DataTable), typeof(Func<string>), typeof(Func<string, string>), typeof(string) });
        }
    }
}