Exemple #1
0
        private static object ExecInstanciar(string comando)
        {
            string SubComando = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim();

            string Prefijo = Lfx.Types.Strings.GetNextToken(ref SubComando, ".").Trim();

            if (Lfx.Components.Manager.ComponentesCargados.ContainsKey(Prefijo) == false)
            {
                // Intento cargar una segunda parte del prefijo (P. Ej. Lazaro.Mensajeria)
                Prefijo += "." + Lfx.Types.Strings.GetNextToken(ref SubComando, ".").Trim();
            }

            if (Lfx.Components.Manager.ComponentesCargados.ContainsKey(Prefijo) == false)
            {
                return(new Lfx.Types.FailureOperationResult("No se reconoce el prefijo " + Prefijo));
            }

            Lfx.Components.IComponent Comp = Lfx.Components.Manager.ComponentesCargados[Prefijo];
            Type Tipo = Comp.Assembly.GetType(Prefijo + "." + SubComando);

            object Res = null;

            if (comando != null && comando.Length > 0)
            {
                try {
                    // Intento pasarle los parámetros
                    Res = System.Activator.CreateInstance(Tipo, comando);
                } catch {
                    // Si no funciona, intento llamar sin parámetros
                    Res = System.Activator.CreateInstance(Tipo);
                }
            }
            else
            {
                Res = System.Activator.CreateInstance(Tipo);
            }

            return(Res);
        }
Exemple #2
0
        private static object ExecInternal(string comando, string estacion)
        {
            Console.WriteLine("Exec:" + comando);

            if (estacion == null || estacion.Length == 0)
            {
                estacion = Lfx.Environment.SystemInformation.MachineName;
            }

            string SubComando = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim().ToUpperInvariant();

            switch (SubComando)
            {
            case "CREAR":
            case "CREATE":
                return(ExecCrearEditar(true, comando));

            case "EDITAR":
            case "EDIT":
                return(ExecCrearEditar(false, comando));

            case "LISTAR":
            case "LIST":
                return(ExecListar(comando));

            case "IMPRIMIR":
                return(ExecImprimir(comando));

            case "INSTANCIAR":
                return(ExecInstanciar(comando));

            /* case "REPO":
             *      qGen.Select Sel = new qGen.Select("comprob_detalle");
             *      Sel.Fields = "personas.id_persona,personas.nombre_visible,comprob.fecha,comprob.total";
             *      Sel.Joins.Add(new qGen.Join("comprob", "comprob_detalle.id_comprob=comprob.id_comprob"));
             *      Sel.Joins.Add(new qGen.Join("personas", "comprob.id_cliente=personas.id_persona"));
             *      Sel.WhereClause = new qGen.Where();
             *      Sel.WhereClause.AddWithValue("comprob.fecha", "'2009-09-01'", "'2009-09-30'");
             *      Sel.WhereClause.AddWithValue("comprob.compra", 0);
             *      Sel.WhereClause.AddWithValue("comprob.numero", qGen.ComparisonOperators.GreaterThan, 0);
             *      Sel.WhereClause.AddWithValue("comprob.tipo_fac", qGen.ComparisonOperators.In, new string[] { "FA", "FB", "FC", "FM", "FE" });
             *
             *      Lbl.Reportes.Reporte Rep = new Lbl.Reportes.Reporte(Lfx.Workspace.Master.GetNewConnection("REPO"), Sel);
             *      Rep.Grouping = new Lfx.Data.Grouping("personas.nombre_visible");
             *      Rep.Aggregates.Add(new Lfx.Data.Aggregate(Lfx.Data.AggregationFunctions.Count, "comprob.fecha"));
             *      Rep.Aggregates.Add(new Lfx.Data.Aggregate(Lfx.Data.AggregationFunctions.Sum, "comprob.total"));
             *      Rep.Fields.Add(new Lazaro.Pres.Field("personas.nombre_visible", "Cliente", Lfx.Data.InputFieldTypes.Text, 320));
             *      Rep.Fields.Add(new Lazaro.Pres.Field("comprob.fecha", "Fecha", Lfx.Data.InputFieldTypes.Date, 100));
             *      Rep.Fields.Add(new Lazaro.Pres.Field("comprob.total", "Total", Lfx.Data.InputFieldTypes.Currency, 120));
             *      Rep.ExpandGroups = false;
             *
             *      Lfc.Reportes.Reporte RepForm = new Lfc.Reportes.Reporte();
             *      RepForm.MdiParent = Aplicacion.FormularioPrincipal;
             *      RepForm.ReporteAMostrar = Rep;
             *      RepForm.Show();
             *      break; */

            case "LIC":
                Lfx.Lic.Licenciar(@"..\..\");
                Lfx.Lic.Licenciar(@"..\..\..\Componentes\RunComponent");
                Lfx.Lic.Licenciar(@"..\..\..\Componentes\ServidorFiscal");
                Lfx.Lic.Licenciar(@"..\..\..\Lfx");
                Lfx.Lic.Licenciar(@"..\..\..\Lbl");
                Lfx.Lic.Licenciar(@"..\..\..\Lui");
                Lfx.Lic.Licenciar(@"..\..\..\Lcc");
                Lfx.Lic.Licenciar(@"..\..\..\Lfc");
                Lfx.Lic.Licenciar(@"..\..\..\Impresion");
                Lfx.Lic.Licenciar(@"..\..\..\Pres");
                break;

            case "HISTORIAL":
                string         Tabla = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim();
                int            Id    = Lfx.Types.Parsing.ParseInt(Lfx.Types.Strings.GetNextToken(ref comando, " "));
                Lfc.Log.Editar His   = new Lfc.Log.Editar();
                His.MdiParent = Aplicacion.FormularioPrincipal;
                His.Mostrar(Tabla, Id);
                His.Show();
                break;

            case "NAL":
            case "SONPESOS":
                Lui.Forms.MessageBox.Show(Lfx.Types.Formatting.SpellNumber(Lfx.Types.Parsing.ParseCurrency(comando)), "Números a letras");
                break;

            case "VENTRE":
                Lfx.Data.Connection ConexionFiltro = Lfx.Workspace.Master.GetNewConnection("Importar datos");

                string Opciones = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim().ToUpperInvariant();
                Lbl.Servicios.Importar.Opciones OpcionesFiltro = new Lbl.Servicios.Importar.Opciones();
                OpcionesFiltro.ImportarClientes  = Opciones.IndexOf('C') >= 0;
                OpcionesFiltro.ImportarArticulos = Opciones.IndexOf('A') >= 0;
                OpcionesFiltro.ImportarFacturas  = Opciones.IndexOf('F') >= 0;
                OpcionesFiltro.ImportarCtasCtes  = Opciones.IndexOf('E') >= 0;

                OpcionesFiltro.ActualizarRegistros = SubComando.IndexOf('+') >= 0;

                Lbl.Servicios.Importar.FiltroEscorpion Fil = new Lbl.Servicios.Importar.FiltroEscorpion(ConexionFiltro, OpcionesFiltro);
                Fil.Dsn = "ventre";

                System.Threading.ThreadStart ThreadFiltro = delegate { Fil.Importar(); };
                System.Threading.Thread      Thr          = new System.Threading.Thread(ThreadFiltro);
                Thr.IsBackground = true;
                Thr.Start();

                break;

            case "CHECK":
                string SubComandoDbCheck = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim().ToUpperInvariant();
                switch (SubComandoDbCheck)
                {
                case "ALL":
                case "":
                    Exec("CHECK STRUCT", estacion);
                    Exec("CHECK DATA", estacion);
                    break;

                case "DATA":
                    Lbl.Servicios.Verificador Ver = new Lbl.Servicios.Verificador(Lfx.Workspace.Master.MasterConnection);
                    Ver.CheckDataBase();
                    break;

                case "STRUCT":
                    System.Threading.ThreadStart ThreadVerif = delegate { Lfx.Workspace.Master.CheckAndUpdateDataBaseVersion(true, false); };
                    System.Threading.Thread      ThrVerif    = new System.Threading.Thread(ThreadVerif);
                    ThrVerif.IsBackground = true;
                    ThrVerif.Start();
                    break;
                }
                break;

            case "VER":
                Lazaro.WinMain.Misc.AcercaDe OAcercaDe = new Lazaro.WinMain.Misc.AcercaDe();
                OAcercaDe.ShowDialog();
                break;

            case "REBOOT":
                try {
                    int EstacionFiscal = Lfx.Workspace.Master.MasterConnection.FieldInt("SELECT id_pv FROM pvs WHERE estacion='" + Lfx.Environment.SystemInformation.MachineName + "' AND tipo=2 AND id_sucursal=" + Lfx.Workspace.Master.CurrentConfig.Empresa.SucursalActual.ToString());
                    if (EstacionFiscal > 0)
                    {
                        Lfx.Workspace.Master.DefaultScheduler.AddTask("REBOOT", "fiscal" + EstacionFiscal);
                        System.Threading.Thread.Sleep(100);
                    }
                } catch {
                    // Nada
                }

                Lfx.Environment.Shell.Reboot();
                break;

            case "CALC":
                Lazaro.WinMain.Misc.Calculadora OCalc = new Lazaro.WinMain.Misc.Calculadora();
                OCalc.Show();
                break;

            case "BACKUP":
                if (Lui.LogOn.LogOnData.ValidateAccess("Global.Backup", Lbl.Sys.Permisos.Operaciones.Administrar))
                {
                    string SubComandoBackup = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim().ToUpper();
                    switch (SubComandoBackup)
                    {
                    case "MANAGER":
                        WinMain.Backup.Manager FormBackup = (WinMain.Backup.Manager)BuscarVentana("WinMain.Misc.Backup.Manager");
                        if (FormBackup == null)
                        {
                            FormBackup = new WinMain.Backup.Manager();
                        }
                        FormBackup.MdiParent = Aplicacion.FormularioPrincipal;
                        FormBackup.Show();
                        break;

                    case "NOW":
                        Lfx.Backups.BackupInfo Bkp = new Lfx.Backups.BackupInfo();
                        Bkp.Name           = System.DateTime.Now.ToString(Lfx.Types.Formatting.DateTime.LongDatePattern + @" ""a las"" HH.mm.ss");
                        Bkp.CompanyName    = Lbl.Sys.Config.Empresa.Nombre;
                        Bkp.UserName       = Lbl.Sys.Config.Actual.UsuarioConectado.Persona.Nombre;
                        Bkp.ProgramVersion = Aplicacion.Version() + " del " + Aplicacion.BuildDate();

                        Lfx.Backups.Manager BackupManager = new Lfx.Backups.Manager();
                        BackupManager.BackupPath = System.IO.Path.Combine(Lbl.Sys.Config.CarpetaEmpresa, "Copias de seguridad" + System.IO.Path.DirectorySeparatorChar);
                        BackupManager.StartBackup(Bkp);
                        break;
                    }
                }
                break;

            case "CONFIG":
                if (Lbl.Sys.Config.Actual.UsuarioConectado.TieneAccesoGlobal())
                {
                    Config.Preferencias FormConfig = new Config.Preferencias();
                    FormConfig.ShowDialog(Aplicacion.FormularioPrincipal);
                }
                else
                {
                    Lfx.Workspace.Master.RunTime.Toast("No tiene permiso para cambiar las preferencias del programa.", "Error");
                }
                break;

            case "CHANGEPWD":
                Misc.CambioContrasena FormCambio = new Misc.CambioContrasena();
                FormCambio.ShowDialog();
                break;

            case "FISCAL":
                string SubComandoFiscal = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim().ToUpper();

                switch (SubComandoFiscal)
                {
                case "INICIAR":
                    Lfx.Environment.Shell.Execute(Lfx.Environment.Folders.ApplicationFolder + "ServidorFiscal.exe", null, System.Diagnostics.ProcessWindowStyle.Normal, false);
                    break;

                case "PANEL":
                    Lazaro.WinMain.Misc.Fiscal OFormFiscal = (Lazaro.WinMain.Misc.Fiscal)BuscarVentana("Lazaro.Misc.Fiscal");
                    if (OFormFiscal == null)
                    {
                        OFormFiscal = new Lazaro.WinMain.Misc.Fiscal();
                    }
                    OFormFiscal.ShowDialog();
                    break;
                }
                break;

            case "MENSAJE":
            case "MESSAGE":
                Lfx.Workspace.Master.RunTime.Toast(comando, "Mensaje remoto de " + estacion);
                return(null);

            case "RUN":
                string NombreComponente = Lfx.Types.Strings.GetNextToken(ref comando, ".").Trim();
                string NombreFuncion    = Lfx.Types.Strings.GetNextToken(ref comando, " ").Trim();

                if (Lfx.Components.Manager.ComponentesCargados.ContainsKey(NombreComponente) == false)
                {
                    NombreComponente += "." + Lfx.Types.Strings.GetNextToken(ref NombreFuncion, ".").Trim();
                }

                if (Lfx.Components.Manager.ComponentesCargados.ContainsKey(NombreComponente) == false)
                {
                    return(new Lfx.Types.FailureOperationResult("No se encuentra el componente " + NombreComponente));
                }
                else
                {
                    Lfx.Components.IComponent Componente = Lfx.Components.Manager.ComponentesCargados[NombreComponente];
                    if (Componente.Funciones.ContainsKey(NombreFuncion) == false)
                    {
                        return(new Lfx.Types.FailureOperationResult("No se encuentra el la función " + NombreComponente + "." + NombreFuncion));
                    }
                    else
                    {
                        Lfx.Components.FunctionInfo Funcion = Componente.Funciones[NombreFuncion];
                        object RunResult = Funcion.Run();

                        if (RunResult is System.Windows.Forms.Form)
                        {
                            if (Funcion.Instancia.FunctionType == Lfx.Components.FunctionTypes.MdiChildren)
                            {
                                ((System.Windows.Forms.Form)(RunResult)).MdiParent = Aplicacion.Flotante ? null : Aplicacion.FormularioPrincipal;
                            }
                            ((System.Windows.Forms.Form)(RunResult)).Show();
                        }
                        else if (RunResult is Lfx.Types.OperationResult)
                        {
                            Lfx.Types.OperationResult OpeResult = RunResult as Lfx.Types.OperationResult;
                            if (OpeResult.Message != null && OpeResult.Message.Length > 0)
                            {
                                Lfx.Workspace.Master.RunTime.Toast(OpeResult.Message, OpeResult.Success ? "Aviso" : "Error");
                            }
                        }
                    }
                }
                break;

            case "QUIT":
                if (Aplicacion.FormularioPrincipal != null)
                {
                    Aplicacion.FormularioPrincipal.Close();
                }
                System.Threading.Thread.Sleep(200);
                Lfx.Workspace.Master.Dispose();
                System.Environment.Exit(0);
                break;

            case "ERROR":
                throw new Exception("Error de prueba.");

            default:
                if (Lfx.Workspace.Master.DebugMode)
                {
                    throw new NotImplementedException(comando);
                }
                else
                {
                    return(new Lfx.Types.OperationResult(false));
                }
            }

            return(null);
        }