Пример #1
0
        /// <summary>
        /// Procedimiento Listar Siguiente Datos
        /// </summary>
        /// <param name="Listar Siguiente FCompra"></param>
        public DataSet Siguiente(DFCompra FCompra)
        {
            DataSet       DsRpta  = new DataSet();
            SqlConnection SqlConn = new SqlConnection();

            try
            {
                SqlConn.ConnectionString = DConexion.Cn;
                SqlConn.Open();

                SqlCommand Cmd = new SqlCommand
                {
                    Connection  = SqlConn,
                    CommandText = "fcompra_siguiente",
                    CommandType = CommandType.StoredProcedure,
                };

                SqlParameter Parcod_fcompra = Getcod_fcompra(FCompra);
                Cmd.Parameters.Add(Parcod_fcompra);

                Cmd.ExecuteNonQuery();
                SqlDataAdapter SqlDat = new SqlDataAdapter(Cmd);
                SqlDat.Fill(DsRpta);
            }
            catch (Exception Ex)
            {
                DsRpta = null;
                throw new Exception("Error al Ejecutar el procedimiento almacenado" + Ex.Message, Ex);
            }
            finally
            {
                SqlConn.Close();
            }
            return(DsRpta);
        }
Пример #2
0
        /// <summary>
        /// Procedimiento Procesar
        /// </summary>
        /// <param name="Procesar FCompra"></param>
        public string Procesar(DFCompra FCompra)
        {
            string        Rpta   = "";
            SqlConnection SqlCon = new SqlConnection();

            try
            {
                SqlCon.ConnectionString = DConexion.Cn;
                SqlCon.Open();

                SqlCommand Cmd = new SqlCommand
                {
                    Connection  = SqlCon,
                    CommandText = "fcompra_procesar",
                    CommandType = CommandType.StoredProcedure
                };
                #region ParametrosInsertar

                SqlParameter Parcod_fcompra = Getcod_fcompra(FCompra);
                Cmd.Parameters.Add(Parcod_fcompra);

                SqlParameter Parestatus = Getestatus(FCompra);
                Cmd.Parameters.Add(Parestatus);

                SqlParameter Parcod_usuario = Getcod_usuario(FCompra);
                Cmd.Parameters.Add(Parcod_usuario);
                #endregion

                Cmd.ExecuteNonQuery();
                Rpta = "Y";
            }
            catch (SqlException ex)
            {
                if (ex.Number == 8152)
                {
                    Rpta = "Has introducido demasiados caracteres en uno de los campos.";
                }
                else if (ex.Number == 2627)
                {
                    Rpta = "No se Permiten Registros Duplicados";
                }
                else if (ex.Number == 2812)
                {
                    Rpta = "No Existe el Procedimiento Almacenado";
                }
                else
                {
                    Rpta = "Error al intentar ejecutar el procedimiento almacenado " + ex.Message;
                }
            }
            finally
            {
                if (SqlCon.State == ConnectionState.Open)
                {
                    SqlCon.Close();
                }
            }
            return(Rpta);
        }
Пример #3
0
        /// <summary>
        /// Metodo Anular Datos Recibe 4 Parametros
        /// </summary>
        /// <returns> Recibe 4 Parametros</returns>
        public string Anular(DFCompra FCompra)
        {
            string        Rpta    = "";
            SqlConnection SqlConn = new SqlConnection();

            try
            {
                SqlConn.ConnectionString = DConexion.Cn;
                SqlConn.Open();

                SqlCommand Cmd = new SqlCommand()
                {
                    Connection  = SqlConn,
                    CommandText = "fcompra_eliminar",
                    CommandType = CommandType.StoredProcedure,
                };

                SqlParameter Parcod_fcompra = Getcod_fcompra(FCompra);
                Cmd.Parameters.Add(Parcod_fcompra);

                SqlParameter Parestatus = Getestatus(FCompra);
                Cmd.Parameters.Add(Parestatus);

                SqlParameter Paranulado = Getanulado(FCompra);
                Cmd.Parameters.Add(Paranulado);

                SqlParameter Parcod_usuario = Getcod_usuario(FCompra);
                Cmd.Parameters.Add(Parcod_usuario);

                Cmd.ExecuteNonQuery();
                Rpta = "Y";
            }
            catch (SqlException Exc)
            {
                if (Exc.Number == 2812)
                {
                    Rpta = "No Existe el Procedimiento Almacenado";
                }
                else if (Exc.Number == 547)
                {
                    Rpta = "No se Pueden Eliminar Registros Relacionados!  " + Exc.Message;
                }
                else
                {
                    Rpta = "Error al intentar ejecutar el procedimiento almacenado! " + Exc.Message;
                }
            }
            finally
            {
                if (SqlConn.State == ConnectionState.Open)
                {
                    SqlConn.Close();
                }
            }
            return(Rpta);
        }
Пример #4
0
        private static SqlParameter Getfecha_ven(DFCompra FCompra)
        {
            SqlParameter Pfecha_ven = new SqlParameter
            {
                ParameterName = "@fecha_ven",
                SqlDbType     = SqlDbType.DateTime,
                Value         = FCompra.Dfecha_ven
            };

            return(Pfecha_ven);
        }
Пример #5
0
        private static SqlParameter Getanulado(DFCompra FCompra)
        {
            SqlParameter Panulado = new SqlParameter
            {
                ParameterName = "@anulado",
                SqlDbType     = SqlDbType.Bit,
                Value         = FCompra.Danulado
            };

            return(Panulado);
        }
Пример #6
0
        private static SqlParameter Getdoc_asociado(DFCompra FCompra)
        {
            SqlParameter Pdoc_asociado = new SqlParameter
            {
                ParameterName = "@doc_asociado",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Ddoc_asociado
            };

            return(Pdoc_asociado);
        }
Пример #7
0
        private static SqlParameter Getnumcontrol(DFCompra FCompra)
        {
            SqlParameter Pnumcontrol = new SqlParameter
            {
                ParameterName = "@numcontrol",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Dnumcontrol
            };

            return(Pnumcontrol);
        }
Пример #8
0
        private static SqlParameter Getnumdocumento(DFCompra FCompra)
        {
            SqlParameter Pnumdocumento = new SqlParameter
            {
                ParameterName = "@numdocumento",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Dnumdocumento
            };

            return(Pnumdocumento);
        }
Пример #9
0
        private static SqlParameter Getdesc_fcompra(DFCompra FCompra)
        {
            SqlParameter Pdesc_fcompra = new SqlParameter
            {
                ParameterName = "@desc_fcompra",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Ddesc_fcompra,
            };

            return(Pdesc_fcompra);
        }
Пример #10
0
        private static SqlParameter Getcod_condicionpago(DFCompra FCompra)
        {
            SqlParameter Pcod_condicionpago = new SqlParameter
            {
                ParameterName = "@cod_condicionpago",
                SqlDbType     = SqlDbType.NVarChar,
                Size          = 50,
                Value         = FCompra.Dcod_condicionpago,
            };

            return(Pcod_condicionpago);
        }
Пример #11
0
        private static SqlParameter Getcod_proveedor(DFCompra FCompra)
        {
            SqlParameter Pcod_proveedor = new SqlParameter
            {
                ParameterName = "@cod_proveedor",
                SqlDbType     = SqlDbType.NVarChar,
                Size          = 50,
                Value         = FCompra.Dcod_proveedor,
            };

            return(Pcod_proveedor);
        }
Пример #12
0
        private static SqlParameter Getestatus(DFCompra FCompra)
        {
            SqlParameter Pestatus = new SqlParameter
            {
                ParameterName = "@estatus",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Destatus
            };

            return(Pestatus);
        }
Пример #13
0
        private static SqlParameter Getorigen(DFCompra FCompra)
        {
            SqlParameter Porigen = new SqlParameter
            {
                ParameterName = "@origen",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Dorigen
            };

            return(Porigen);
        }
Пример #14
0
        private static SqlParameter Getbuscarh(DFCompra FCompra)
        {
            SqlParameter Pbuscarh = new SqlParameter
            {
                ParameterName = "@buscarh",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Dbuscarh,
            };

            return(Pbuscarh);
        }
Пример #15
0
        private static SqlParameter Getcod_fcomprav(DFCompra FCompra)
        {
            SqlParameter Pcod_fcomprav = new SqlParameter
            {
                ParameterName = "@cod_fcomprav",
                SqlDbType     = SqlDbType.NVarChar,
                Size          = 50,
                Value         = FCompra.Dcod_fcomprav,
            };

            return(Pcod_fcomprav);
        }
Пример #16
0
        private static SqlParameter Getbtipo(DFCompra FCompra)
        {
            SqlParameter Pbtipo = new SqlParameter
            {
                ParameterName = "@btipo",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Dbtipo,
            };

            return(Pbtipo);
        }
Пример #17
0
        private static SqlParameter Getcampo6(DFCompra FCompra)
        {
            SqlParameter Pcampo6 = new SqlParameter
            {
                ParameterName = "@campo6",
                SqlDbType     = SqlDbType.VarChar,
                Size          = 50,
                Value         = FCompra.Dcampo6
            };

            return(Pcampo6);
        }
Пример #18
0
        private static SqlParameter Getcod_usuario(DFCompra FCompra)
        {
            SqlParameter Pcod_usuario = new SqlParameter
            {
                ParameterName = "@cod_usuario",
                SqlDbType     = SqlDbType.NVarChar,
                Size          = 50,
                Value         = FCompra.Dcod_usuario,
            };

            return(Pcod_usuario);
        }
Пример #19
0
        private static SqlParameter Gettotal(DFCompra FCompra)
        {
            SqlParameter Ptotal = new SqlParameter
            {
                ParameterName = "@total",
                SqlDbType     = SqlDbType.Money,
                Precision     = 18,
                Scale         = 3,
                Value         = FCompra.Dtotal
            };

            return(Ptotal);
        }
Пример #20
0
        private static SqlParameter Getmonto_imp(DFCompra FCompra)
        {
            SqlParameter Pmonto_imp = new SqlParameter
            {
                ParameterName = "@monto_imp",
                SqlDbType     = SqlDbType.Money,
                Precision     = 18,
                Scale         = 3,
                Value         = FCompra.Dmonto_imp
            };

            return(Pmonto_imp);
        }
Пример #21
0
        /// <summary>
        /// Metodo Buscar Datos Recibe 2 Parametros
        /// </summary>
        public DataTable Buscar(DFCompra FCompra)
        {
            string        Rpta    = "";
            DataTable     DtRpta  = new DataTable("TbFCompra");
            SqlConnection SqlConn = new SqlConnection();

            try
            {
                SqlConn.ConnectionString = DConexion.Cn;
                SqlConn.Open();

                SqlCommand Cmd = new SqlCommand
                {
                    Connection  = SqlConn,
                    CommandText = "fcompra_buscar",
                    CommandType = CommandType.StoredProcedure,
                };

                SqlParameter Parbuscar = Getbuscar(FCompra);
                Cmd.Parameters.Add(Parbuscar);

                SqlParameter Parbtipo = Getbtipo(FCompra);
                Cmd.Parameters.Add(Parbtipo);

                Cmd.ExecuteNonQuery();
                SqlDataAdapter SqlDat = new SqlDataAdapter(Cmd);
                SqlDat.Fill(DtRpta);
            }
            catch (SqlException ex)
            {
                if (ex.Number == 2812)
                {
                    Rpta = "No Existe el Procedimiento Almacenado";
                }
                else
                {
                    Rpta = "Error al intentar ejecutar el procedimiento almacenado " + ex.Message;
                }
            }
            finally
            {
                SqlConn.Close();
            }
            return(DtRpta);
        }
Пример #22
0
        /// <summary>
        /// Procedimiento Buscar Datos Recibe 3 Parametros
        /// </summary>
        public DataTable RepBuscar(DFCompra FCompra)
        {
            DataTable     DtRpta  = new DataTable("TbFCompra");
            SqlConnection SqlConn = new SqlConnection();

            try
            {
                SqlConn.ConnectionString = DConexion.Cn;
                SqlConn.Open();

                SqlCommand Cmd = new SqlCommand
                {
                    Connection  = SqlConn,
                    CommandText = "fcompra_rptlistar",
                    CommandType = CommandType.StoredProcedure,
                };

                SqlParameter Parbuscard = Getbuscard(FCompra);
                Cmd.Parameters.Add(Parbuscard);

                SqlParameter Parbuscarh = Getbuscarh(FCompra);
                Cmd.Parameters.Add(Parbuscarh);

                SqlParameter Parbtipo = Getbtipo(FCompra);
                Cmd.Parameters.Add(Parbtipo);

                Cmd.ExecuteNonQuery();
                SqlDataAdapter SqlDat = new SqlDataAdapter(Cmd);
                SqlDat.Fill(DtRpta);
            }
            catch (Exception Ex)
            {
                DtRpta = null;
                throw new Exception("Error al Ejecutar el procedimiento almacenado" + Ex.Message, Ex);
            }
            finally
            {
                SqlConn.Close();
            }
            return(DtRpta);
        }
Пример #23
0
        /// <summary>
        /// Procedimiento Generar Codigo
        /// </summary>
        /// <param name="Generar Codigo"></param>
        /// <return>Retorna el Codigo</return>
        public string GenerarCod(DFCompra FCompra)
        {
            SqlConnection SqlConn = new SqlConnection
            {
                ConnectionString = DConexion.Cn
            };

            SqlConn.Open();
            SqlCommand Cmd = new SqlCommand
            {
                Connection  = SqlConn,
                CommandText = "fcompra_generarcod",
                CommandType = CommandType.StoredProcedure,
            };

            try
            {
                SqlParameter ParCod_fcompra = new SqlParameter("@cod_fcompra", SqlDbType.Int)
                {
                    Direction = ParameterDirection.Output,
                    Value     = FCompra.Dcod_fcompra
                };
                Cmd.Parameters.Add(ParCod_fcompra);

                if (Cmd.ExecuteNonQuery() == 0)
                {
                    return(Cmd.Parameters[ParCod_fcompra.ToString()].Value.ToString());
                }
            }
            catch (Exception ex)
            {
                string Resp = ex.Message;
            }
            finally
            {
                SqlConn.Close();
            }
            return(Cmd.Parameters["@cod_fcompra"].Value.ToString());
        }
Пример #24
0
        /// <summary>
        /// Metodo Editar Datos Recibe 9 Parametros
        /// </summary>
        /// <returns> Recibe Parametros</returns>
        public string Editar(DFCompra FCompra)
        {
            string        Rpta    = "";
            SqlConnection SqlConn = new SqlConnection();

            try
            {
                SqlConn.ConnectionString = DConexion.Cn;
                SqlConn.Open();

                SqlCommand Cmd = new SqlCommand()
                {
                    Connection  = SqlConn,
                    CommandText = "fcompra_editar",
                    CommandType = CommandType.StoredProcedure,
                };

                SqlParameter Parcod_fcompra = Getcod_fcompra(FCompra);
                Cmd.Parameters.Add(Parcod_fcompra);

                SqlParameter Parcod_fcomprav = Getcod_fcomprav(FCompra);
                Cmd.Parameters.Add(Parcod_fcomprav);

                SqlParameter Parcod_proveedor = Getcod_proveedor(FCompra);
                Cmd.Parameters.Add(Parcod_proveedor);

                SqlParameter Parcod_condicionpago = Getcod_condicionpago(FCompra);
                Cmd.Parameters.Add(Parcod_condicionpago);

                SqlParameter Pardesc_fcompra = Getdesc_fcompra(FCompra);
                Cmd.Parameters.Add(Pardesc_fcompra);

                SqlParameter Paroptipo = Getoptipo(FCompra);
                Cmd.Parameters.Add(Paroptipo);

                SqlParameter Parnumdocumento = Getnumdocumento(FCompra);
                Cmd.Parameters.Add(Parnumdocumento);

                SqlParameter Parnumcontrol = Getnumcontrol(FCompra);
                Cmd.Parameters.Add(Parnumcontrol);

                SqlParameter Pardoc_asociado = Getdoc_asociado(FCompra);
                Cmd.Parameters.Add(Pardoc_asociado);

                SqlParameter Parorigen = Getorigen(FCompra);
                Cmd.Parameters.Add(Parorigen);

                SqlParameter Parestatus = Getestatus(FCompra);
                Cmd.Parameters.Add(Parestatus);

                SqlParameter Paranulado = Getanulado(FCompra);
                Cmd.Parameters.Add(Paranulado);

                SqlParameter Parmonto_base = Getmonto_base(FCompra);
                Cmd.Parameters.Add(Parmonto_base);

                SqlParameter Parmonto_r = Getmonto_r(FCompra);
                Cmd.Parameters.Add(Parmonto_r);

                SqlParameter Parmonto_d = Getmonto_d(FCompra);
                Cmd.Parameters.Add(Parmonto_d);

                SqlParameter Parmonto_o = Getmonto_o(FCompra);
                Cmd.Parameters.Add(Parmonto_o);

                SqlParameter Parmonto_imp = Getmonto_imp(FCompra);
                Cmd.Parameters.Add(Parmonto_imp);

                SqlParameter Parsubtotal = Getsubtotal(FCompra);
                Cmd.Parameters.Add(Parsubtotal);

                SqlParameter Partotal = Gettotal(FCompra);
                Cmd.Parameters.Add(Partotal);

                SqlParameter Parfecha_doc = Getfecha_doc(FCompra);
                Cmd.Parameters.Add(Parfecha_doc);

                SqlParameter Parfecha_reg = Getfecha_reg(FCompra);
                Cmd.Parameters.Add(Parfecha_reg);

                SqlParameter Parfecha_ven = Getfecha_ven(FCompra);
                Cmd.Parameters.Add(Parfecha_ven);

                SqlParameter Parcampo1 = Getcampo1(FCompra);
                Cmd.Parameters.Add(Parcampo1);

                SqlParameter Parcampo2 = Getcampo2(FCompra);
                Cmd.Parameters.Add(Parcampo2);

                SqlParameter Parcampo3 = Getcampo3(FCompra);
                Cmd.Parameters.Add(Parcampo3);

                SqlParameter Parcampo4 = Getcampo4(FCompra);
                Cmd.Parameters.Add(Parcampo4);

                SqlParameter Parcampo5 = Getcampo5(FCompra);
                Cmd.Parameters.Add(Parcampo5);

                SqlParameter Parcampo6 = Getcampo6(FCompra);
                Cmd.Parameters.Add(Parcampo6);

                SqlParameter Parcod_usuario = Getcod_usuario(FCompra);
                Cmd.Parameters.Add(Parcod_usuario);

                Cmd.ExecuteNonQuery();
                Rpta = "Y";
            }
            catch (SqlException Exc)
            {
                if (Exc.Number == 8152)
                {
                    Rpta = "Ha introducido demasiados caracteres en uno de los campos.";
                }
                else if (Exc.Number == 2627)
                {
                    Rpta = "El Codigo Ya Existe. No se Permiten Registros Duplicados.";
                }
                else if (Exc.Number == 2812)
                {
                    Rpta = "No Existe el Procedimiento Almacenado";
                }
                else
                {
                    Rpta = "Error al intentar ejecutar el procedimiento almacenado " + Exc.Message;
                }
            }
            finally
            {
                if (SqlConn.State == ConnectionState.Open)
                {
                    SqlConn.Close();
                }
            }
            return(Rpta);
        }