Beispiel #1
0
        public bool AnularDB(in_ProvisionIngresosPorOC_Info info)
        {
            try
            {
                using (SqlConnection connection = new SqlConnection(ConexionERP.GetConnectionString()))
                {
                    connection.Open();
                    SqlCommand command = new SqlCommand();
                    command.Connection  = connection;
                    command.CommandText = "UPDATE [dbo].[in_ProvisionIngresosPorOC]"
                                          + " SET  Estado = 0"
                                          + " ,[IdUsuarioAnulacion] = '" + info.IdUsuario + "'"
                                          + " ,[FechaAnulacion] = GETDATE()"
                                          + " WHERE IdEmpresa = " + info.IdEmpresa.ToString() + " and idprovision = " + info.IdProvision.ToString() + ";";

                    decimal IdCbteCble_rev = 0;
                    odatact.ReversoCbteCble(info.IdEmpresa,
                                            info.IdCbteCble,
                                            info.IdTipoCbte,
                                            1,
                                            ref IdCbteCble_rev,
                                            ref MensajeError,
                                            info.IdUsuario,
                                            info.IdUsuario
                                            );

                    command.ExecuteNonQuery();
                }
                return(true);
            }
            catch (Exception)
            {
                throw;
            }
        }
Beispiel #2
0
 public bool AnularDB(in_ProvisionIngresosPorOC_Info info)
 {
     try
     {
         return(odata.AnularDB(info));
     }
     catch (Exception)
     {
         throw;
     }
 }
Beispiel #3
0
        public bool GuardarDB(in_ProvisionIngresosPorOC_Info info)
        {
            try
            {
                using (SqlConnection connection = new SqlConnection(ConexionERP.GetConnectionString()))
                {
                    connection.Open();
                    SqlCommand command = new SqlCommand();
                    command.Connection = connection;

                    #region Diario
                    info.IdCbteCble     = odatact.Get_IdCbteCble(info.IdEmpresa, info.IdTipoCbte, ref MensajeError);
                    command.CommandText = "INSERT INTO [dbo].[ct_cbtecble]([IdEmpresa],[IdTipoCbte],[IdCbteCble],[CodCbteCble],[IdPeriodo],[cb_Fecha],[cb_Valor],[cb_Observacion],[cb_Secuencia],[cb_Estado],[cb_Anio],[cb_mes]"
                                          + " ,[IdUsuario],[IdUsuarioAnu],[cb_MotivoAnu],[IdUsuarioUltModi],[cb_FechaAnu],[cb_FechaTransac],[cb_FechaUltModi],[cb_Mayorizado],[cb_para_conciliar],[IdSucursal])"
                                          + " VALUES(" + info.IdEmpresa.ToString() + "," + info.IdTipoCbte.ToString() + "," + info.IdCbteCble.ToString() + ",''," + info.Fecha.ToString("yyyyMM").ToString() + ",DATEFROMPARTS(" + info.Fecha.Year.ToString() + "," + info.Fecha.Month.ToString() + "," + info.Fecha.Day.ToString() + ")," + info.ListaDiario.Where(q => q.dc_Valor > 0).Sum(q => q.dc_Valor).ToString() + ",'" + info.Observacion + "',0,'A'," + info.Fecha.Year.ToString() + "," + info.Fecha.Month.ToString()
                                          + " ,'" + info.IdUsuario + "',NULL,NULL,NULL,NULL,GETDATE(),NULL,0,0,1);";
                    command.ExecuteNonQuery();
                    int Secuencia = 1;
                    command.CommandText = string.Empty;
                    foreach (var item in info.ListaDiario)
                    {
                        command.CommandText += "INSERT INTO [dbo].[ct_cbtecble_det]"
                                               + " ([IdEmpresa],[IdTipoCbte],[IdCbteCble],[secuencia],[IdCtaCble],[IdCentroCosto],[IdCentroCosto_sub_centro_costo],[dc_Valor],[dc_Observacion],[dc_Numconciliacion],[dc_EstaConciliado],[IdPunto_cargo],[IdPunto_cargo_grupo],[dc_para_conciliar])"
                                               + " VALUES(" + info.IdEmpresa.ToString() + "," + info.IdTipoCbte.ToString() + "," + info.IdCbteCble.ToString() + "," + Secuencia.ToString() + ",'" + item.IdCtaCble + "'," + (string.IsNullOrEmpty(item.IdCentroCosto) ? "NULL" : "'" + item.IdCentroCosto + "'") + "," + (string.IsNullOrEmpty(item.IdCentroCosto_sub_centro_costo) ? "NULL" : "'" + item.IdCentroCosto_sub_centro_costo + "'") + "," + item.dc_Valor.ToString() + ",'" + item.dc_Observacion + "',NULL,NULL," + (item.IdPunto_cargo == null ? "NULL" : item.IdPunto_cargo.ToString()) + "," + (item.IdPunto_cargo_grupo == null ? "NULL" : item.IdPunto_cargo_grupo.ToString()) + ",NULL);";
                        Secuencia++;
                    }
                    command.ExecuteNonQuery();
                    #endregion

                    #region Provision
                    info.IdProvision    = GetID(info.IdEmpresa);
                    command.CommandText = "INSERT INTO [dbo].[in_ProvisionIngresosPorOC]([IdEmpresa],[IdProvision],[IdCtaCble],[Fecha],[Observacion],[IdTipoCbte],[IdCbteCble],[FechaIni],[FechaFin],[Estado],[IdUsuarioCreacion],[FechaCreacion])"
                                          + " VALUES(" + info.IdEmpresa.ToString() + "," + info.IdProvision.ToString() + ",'" + info.IdCtaCble + "',DATEFROMPARTS(" + info.Fecha.Year.ToString() + "," + info.Fecha.Month.ToString() + "," + info.Fecha.Day.ToString() + "),'" + info.Observacion + "'," + info.IdTipoCbte.ToString() + "," + info.IdCbteCble.ToString() + ",DATEFROMPARTS(" + info.FechaIni.Year.ToString() + "," + info.FechaIni.Month.ToString() + "," + info.FechaIni.Day.ToString() + "),DATEFROMPARTS(" + info.FechaFin.Year.ToString() + "," + info.FechaFin.Month.ToString() + "," + info.FechaFin.Day.ToString() + "),1,'" + info.IdUsuario + "',GETDATE())";
                    command.ExecuteNonQuery();
                    Secuencia           = 1;
                    command.CommandText = string.Empty;
                    foreach (var item in info.ListaDetalle)
                    {
                        command.CommandText += "INSERT INTO [dbo].[in_ProvisionIngresosPorOCDet]([IdEmpresa],[IdProvision],[Secuencia],[IdSucursal],[IdMovi_inven_tipo],[IdNumMovi],[Secuencia_inv],[Costo])"
                                               + " VALUES(" + info.IdEmpresa.ToString() + "," + info.IdProvision.ToString() + "," + (Secuencia++).ToString() + "," + item.IdSucursal.ToString() + "," + item.IdMovi_inven_tipo.ToString() + "," + item.IdNumMovi.ToString() + "," + item.Secuencia_inv.ToString() + "," + item.Costo.ToString() + ");";
                    }
                    command.ExecuteNonQuery();
                    #endregion
                }

                return(true);
            }
            catch (Exception)
            {
                throw;
            }
        }
Beispiel #4
0
 private void GetInfo()
 {
     info              = info ?? new in_ProvisionIngresosPorOC_Info();
     info.IdEmpresa    = param.IdEmpresa;
     info.IdProvision  = string.IsNullOrEmpty(txtIdProvision.Text) ? 0 : Convert.ToDecimal(txtIdProvision.Text);
     info.IdCtaCble    = cmbPlanctaCabecera.EditValue.ToString();
     info.IdTipoCbte   = Convert.ToInt32(cmbTipoCbte.EditValue);
     info.Observacion  = txtObservacion.Text;
     info.Fecha        = deFecha.DateTime;
     info.FechaIni     = deFechaIni.DateTime;
     info.FechaFin     = deFechaFin.DateTime;
     info.ListaDetalle = new List <in_ProvisionIngresosPorOCDet_Info>(blstDet);
     info.ListaDiario  = new List <ct_Cbtecble_det_Info>(blstDetCuenta);
 }
Beispiel #5
0
 public FrmIn_ProvisionIngresoOCMant()
 {
     InitializeComponent();
     info           = new in_ProvisionIngresosPorOC_Info();
     bus            = new in_ProvisionIngresosPorOC_Bus();
     busDet         = new in_ProvisionIngresosPorOCDet_Bus();
     busPlancta     = new ct_Plancta_Bus();
     blstDet        = new BindingList <in_ProvisionIngresosPorOCDet_Info>();
     param          = cl_parametrosGenerales_Bus.Instance;
     busTipoCbte    = new ct_Cbtecble_tipo_Bus();
     busCentroCosto = new ct_Centro_costo_Bus();
     busSubcentro   = new ct_centro_costo_sub_centro_costo_Bus();
     blstDetCuenta  = new BindingList <ct_Cbtecble_det_Info>();
     busDetConta    = new ct_Cbtecble_det_Bus();
     event_delegateFrmIn_ProvisionIngresoOCMant_FormClosed += FrmIn_ProvisionIngresoOCMant_event_delegateFrmIn_ProvisionIngresoOCMant_FormClosed;
 }
Beispiel #6
0
        public in_ProvisionIngresosPorOC_Info GetInfo(int IdEmpresa, decimal IdProvision)
        {
            try
            {
                in_ProvisionIngresosPorOC_Info info = new in_ProvisionIngresosPorOC_Info();
                using (SqlConnection connection = new SqlConnection(ConexionERP.GetConnectionString()))
                {
                    connection.Open();
                    SqlCommand command = new SqlCommand();
                    command.Connection  = connection;
                    command.CommandText = "select IdEmpresa,IdProvision,IdCtaCble,Fecha,Observacion,IdTipoCbte,IdCbteCble,FechaIni,FechaFin,Estado "
                                          + " from in_ProvisionIngresosPorOC"
                                          + " where IdEmpresa = " + IdEmpresa.ToString() + " and IdProvision = " + IdProvision.ToString();

                    var ResultValue = command.ExecuteScalar();
                    if (ResultValue == null)
                    {
                        return(null);
                    }

                    SqlDataReader reader = command.ExecuteReader();
                    while (reader.Read())
                    {
                        info = new in_ProvisionIngresosPorOC_Info
                        {
                            IdEmpresa   = Convert.ToInt32(reader["IdEmpresa"]),
                            IdProvision = Convert.ToDecimal(reader["IdProvision"]),
                            IdCtaCble   = Convert.ToString(reader["IdCtaCble"]),
                            Fecha       = Convert.ToDateTime(reader["Fecha"]),
                            Observacion = Convert.ToString(reader["Observacion"]),
                            IdTipoCbte  = Convert.ToInt32(reader["IdTipoCbte"]),
                            IdCbteCble  = Convert.ToDecimal(reader["IdCbteCble"]),
                            FechaIni    = Convert.ToDateTime(reader["FechaIni"]),
                            FechaFin    = Convert.ToDateTime(reader["FechaFin"]),
                            Estado      = Convert.ToBoolean(reader["Estado"])
                        };
                    }
                    reader.Close();
                }
                return(info);
            }
            catch (Exception)
            {
                throw;
            }
        }
Beispiel #7
0
        private void gvConsulta_RowStyle(object sender, DevExpress.XtraGrid.Views.Grid.RowStyleEventArgs e)
        {
            in_ProvisionIngresosPorOC_Info row = (in_ProvisionIngresosPorOC_Info)gvConsulta.GetRow(e.RowHandle);

            if (row == null)
            {
                e.Appearance.ForeColor = Color.Black;
                return;
            }
            if (!row.Estado)
            {
                e.Appearance.ForeColor = Color.Red;
                return;
            }
            else
            {
                e.Appearance.ForeColor = Color.Black;
                return;
            }
        }
Beispiel #8
0
 private void SetInfoInControls()
 {
     if (info != null)
     {
         info = bus.GetInfo(param.IdEmpresa, info.IdProvision);
         if (info != null)
         {
             txtIdProvision.Text          = info.IdProvision.ToString();
             cmbPlanctaCabecera.EditValue = info.IdCtaCble;
             cmbTipoCbte.EditValue        = info.IdTipoCbte;
             txtObservacion.Text          = info.Observacion;
             deFecha.DateTime             = info.Fecha;
             deFechaIni.DateTime          = info.FechaIni;
             deFechaFin.DateTime          = info.FechaFin;
             blstDet             = new BindingList <in_ProvisionIngresosPorOCDet_Info>(busDet.GetList(info.IdEmpresa, info.IdProvision));
             blstDetCuenta       = new BindingList <ct_Cbtecble_det_Info>(busDetConta.Get_list_Cbtecble_det(info.IdEmpresa, info.IdTipoCbte, info.IdCbteCble, ref MensajeError));
             gcDet.DataSource    = blstDet;
             gcDiario.DataSource = blstDetCuenta;
         }
     }
 }
Beispiel #9
0
        private void LlamarFormulario(Cl_Enumeradores.eTipo_action Accion)
        {
            in_ProvisionIngresosPorOC_Info row = (in_ProvisionIngresosPorOC_Info)gvConsulta.GetFocusedRow();

            if (Accion != Cl_Enumeradores.eTipo_action.grabar)
            {
                if (row == null)
                {
                    MessageBox.Show("Seleccione un registro", param.Nombre_sistema, MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
                    return;
                }
                if (Accion != Cl_Enumeradores.eTipo_action.consultar && !row.Estado)
                {
                    MessageBox.Show("El registro se encuentra anulado", param.Nombre_sistema, MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
                    return;
                }
            }
            FrmIn_ProvisionIngresoOCMant frm = new FrmIn_ProvisionIngresoOCMant();

            frm.MdiParent = this.MdiParent;
            frm.SetInfo(Accion, row ?? new in_ProvisionIngresosPorOC_Info());
            frm.event_delegateFrmIn_ProvisionIngresoOCMant_FormClosed += frm_event_delegateFrmIn_ProvisionIngresoOCMant_FormClosed;
            frm.Show();
        }
Beispiel #10
0
        public bool ModificarDB(in_ProvisionIngresosPorOC_Info info)
        {
            try
            {
                using (SqlConnection connection = new SqlConnection(ConexionERP.GetConnectionString()))
                {
                    connection.Open();
                    SqlCommand command = new SqlCommand();
                    command.Connection = connection;

                    #region Diario
                    command.CommandText = "UPDATE [dbo].[ct_cbtecble]"
                                          + " SET [IdPeriodo] = " + info.Fecha.ToString("yyyyMM")
                                          + " ,[cb_Fecha] = datefromparts(" + info.Fecha.Year.ToString() + "," + info.Fecha.Month.ToString() + "," + info.Fecha.Day.ToString() + ")"
                                          + " ,[cb_Valor] = " + info.ListaDiario.Sum(q => q.dc_Valor_D).ToString()
                                          + " ,[cb_Observacion] = '" + info.Observacion + "'"
                                          + " ,[cb_Anio] = " + info.Fecha.Year.ToString()
                                          + " ,[cb_mes] = " + info.Fecha.Month.ToString()
                                          + " ,[IdUsuarioUltModi] = '" + info.IdUsuario + "'"
                                          + " ,[cb_FechaUltModi] = GETDATE()"
                                          + " WHERE IdEmpresa = " + info.IdEmpresa.ToString() + " AND IdTipoCbte = " + info.IdTipoCbte.ToString() + " AND IdCbteCble = " + info.IdCbteCble.ToString() + ";";

                    command.CommandText += "DELETE [dbo].[ct_cbtecble_det] WHERE IdEmpresa = " + info.IdEmpresa.ToString() + " AND IdTipoCbte = " + info.IdTipoCbte.ToString() + " AND IdCbteCble = " + info.IdCbteCble.ToString() + ";";
                    int Secuencia = 1;
                    command.CommandText = string.Empty;
                    foreach (var item in info.ListaDiario)
                    {
                        command.CommandText += "INSERT INTO [dbo].[ct_cbtecble_det]"
                                               + " ([IdEmpresa],[IdTipoCbte],[IdCbteCble],[secuencia],[IdCtaCble],[IdCentroCosto],[IdCentroCosto_sub_centro_costo],[dc_Valor],[dc_Observacion],[dc_Numconciliacion],[dc_EstaConciliado],[IdPunto_cargo],[IdPunto_cargo_grupo],[dc_para_conciliar])"
                                               + " VALUES(" + info.IdEmpresa.ToString() + "," + info.IdTipoCbte.ToString() + "," + info.IdCbteCble.ToString() + "," + Secuencia.ToString() + ",'" + item.IdCtaCble + "'," + (string.IsNullOrEmpty(item.IdCentroCosto) ? "NULL" : "'" + item.IdCentroCosto + "'") + "," + (string.IsNullOrEmpty(item.IdCentroCosto_sub_centro_costo) ? "NULL" : "'" + item.IdCentroCosto_sub_centro_costo + "'") + "," + item.dc_Valor.ToString() + ",'" + item.dc_Observacion + "',NULL,NULL," + (item.IdPunto_cargo == null ? "NULL" : item.IdPunto_cargo.ToString()) + "," + (item.IdPunto_cargo_grupo == null ? "NULL" : item.IdPunto_cargo_grupo.ToString()) + ",NULL);";
                        Secuencia++;
                    }
                    #endregion

                    #region Provision

                    command.CommandText += "UPDATE [dbo].[in_ProvisionIngresosPorOC]"
                                           + " SET [IdCtaCble] = '" + info.IdCtaCble + "'"
                                           + " [Fecha] = DATEFROMPARTS(" + info.Fecha.Year.ToString() + "," + info.Fecha.Month.ToString() + "," + info.Fecha.Day.ToString() + ")"
                                           + " ,[Observacion] = '" + info.Observacion + "'"
                                           + " ,[FechaIni] = DATEFROMPARTS(" + info.FechaIni.Year.ToString() + "," + info.FechaIni.Month.ToString() + "," + info.FechaIni.Day.ToString() + ")"
                                           + " ,[FechaFin] = DATEFROMPARTS(" + info.FechaFin.Year.ToString() + "," + info.FechaFin.Month.ToString() + "," + info.FechaFin.Day.ToString() + ")"
                                           + " ,[IdUsuarioMod] = '" + info.IdUsuario + "'"
                                           + " ,[FechaModificacion] = GETDATE()"
                                           + " WHERE IdEmpresa = " + info.IdEmpresa.ToString() + " and idprovision = " + info.IdProvision.ToString() + ";";

                    Secuencia            = 1;
                    command.CommandText  = string.Empty;
                    command.CommandText += "DELETE [dbo].[in_ProvisionIngresosPorOCDet] WHERE IdEmpresa = " + info.IdEmpresa.ToString() + " and idprovision = " + info.IdProvision.ToString() + ";";
                    foreach (var item in info.ListaDetalle)
                    {
                        command.CommandText += "INSERT INTO [dbo].[in_ProvisionIngresosPorOCDet]([IdEmpresa],[IdProvision],[Secuencia],[IdSucursal],[IdMovi_inven_tipo],[IdNumMovi],[Secuencia_inv],[Costo])"
                                               + " VALUES(" + info.IdEmpresa.ToString() + "," + info.IdProvision.ToString() + "," + (Secuencia++).ToString() + "," + item.IdSucursal.ToString() + "," + item.IdMovi_inven_tipo.ToString() + "," + item.IdNumMovi.ToString() + "," + item.Secuencia_inv.ToString() + "," + item.Costo.ToString() + ");";
                    }
                    command.ExecuteNonQuery();
                    #endregion
                }

                return(true);
            }
            catch (Exception)
            {
                throw;
            }
        }
Beispiel #11
0
 public void SetInfo(Cl_Enumeradores.eTipo_action _Accion, in_ProvisionIngresosPorOC_Info _info)
 {
     Accion = _Accion;
     info   = _info;
 }