EjecutarFormularioCommand.cs

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using sage.ew.db;
using sage.ew.interficies;

namespace Sage.ES.S50.Addons
{
    internal class EjecutarFormularioCommand : Command
    {
        int ret = 0;

        public EjecutarFormularioCommand(IAddonsManager addons) : base(addons)
        {
            Name = "EjecutarFormulario";
        }

        protected override void CommandModulo(IModulo modulo, params object[] parameters)
        {
            if (DB._SQLExisteTablaBBDD(modulo._NombreConexion, "FORMSNET"))
            {
                string tcFormularioFox = parameters[0].ToString();
                Func<Dictionary<string, object>, bool> ExisteFormNet = parameters[1] as Func<Dictionary<string, object>, bool>;
                Func<IFormBase, object[], bool> InitAccesoDirecto = parameters[2] as Func<IFormBase, object[], bool>;
                object[] toParametros = parameters[3] as object[];
                bool tlAccesoDirecto = Convert.ToBoolean(parameters[4]);
                bool tlTareaProgramada = Convert.ToBoolean(parameters[5]);
                Dictionary<string, object> _dicFormNet = new Dictionary<string, object>();
                string lcLibreriaNet = "", lcFormNet = "";
                bool llExisteFormNet = false;

                _dicFormNet = DB.SQLREGValor("FORMSNET", "FORMVFP", tcFormularioFox, modulo._AliasDB);
                if (_dicFormNet != null && _dicFormNet.Count > 0)
                {
                    lcFormNet = Convert.ToString(_dicFormNet["formnet"]).Trim();
                    llExisteFormNet = ExisteFormNet(_dicFormNet); //FUNCTIONS.ExisteFormNet(_dicFormNet);
                    if (llExisteFormNet)
                    {
                        // Cargamos la clase de negocio
                        int lnPos = lcFormNet.IndexOf('.', lcFormNet.IndexOf('.', lcFormNet.IndexOf('.') + 1) + 1);
                        if (lnPos > 0)
                            lcLibreriaNet = lcFormNet.Substring(0, lnPos);

                        string lcType = lcFormNet + "," + lcLibreriaNet;
                        Type ltType = Type.GetType(lcType);

                        dynamic loForm = Activator.CreateInstance(ltType);
                        if (loForm != null)
                        {
                            // Bug 145257. Comprobar parámetros del acceso directo
                            bool llFormBase = loForm is IFormBase;

                            //Pasem parametres
                            bool llOk = true;
                            if (toParametros != null && toParametros.Length > 0)
                            {
                                string lcParam0 = toParametros[0].ToString().Trim().ToUpper();

                                // Si el primer parámetro es AUTOMATICO o ACCESODIRECTO no ejecutamos el método_Init
                                // CCR 127560. Añadir caso especial para ejecuciones de tareas programadas mediante informes configurables.
                                if ((ltType.GetMethod("_Init") != null) && (((lcParam0 != "AUTOMATICO") && (lcParam0 != "ACCESODIRECTO")) || tcFormularioFox == "ICLISPRO"))
                                {
                                    llOk = loForm._Init(toParametros);
                                }

                                // Bug 122494 - En el caso de formulari, realizar el Init
                                if (llFormBase)
                                {
                                    InitAccesoDirecto(loForm, toParametros);
                                }
                                //FUNCTIONS._InitAccesoDirecto(loForm, toParametros);
                            }

                            if (!llOk)
                                ((Form)loForm).Close();
                            else
                            {
                                //PE-104237: Quitamos el ShowDialog y lo cambiamos por Show ya que con ShowDialog y ejecutando desde una tarea programada configurada como ejecutar tanto si el usuario ha iniciado sesión
                                //como si no, y con el tipo Servicio de red o SYSTEM, no se pueden ejecutar formularios modales, peta con esta excepción. En cambio con el Show al no ser modal si que deja ejecutarse
                                // Bug 122494 - Si es clase de negocio, ejecutar _ShowDialog
                                if (!llFormBase)
                                    loForm._ShowDialog();
                                else if (tlAccesoDirecto && !tlTareaProgramada)
                                    loForm.ShowDialog();
                                else
                                    loForm.Show();
                            }
                            ret = 1;
                        }
                    }
                }
            }

        }

        protected override ExpectedParameters GetExpectedParameters()
        {
            return new ExpectedParameters(new Type[] { typeof(string),
                                                       typeof(Func<Dictionary<string, object>, bool>),
                                                       typeof(Func<IFormBase,object[], bool>),
                                                       typeof(object[]),
                                                       typeof(bool),
                                                       typeof(bool)
            });
        }
        protected override object Return(params object[] parameters)
        {
            return ret;
        }
        protected override bool Exit()
        {
            return ret == 1;
        }
    }
}