Esempio n. 1
0
        private void btnEliminarLinea_Click(object sender, EventArgs e)
        {
            try
            {
                string resp = "";

                if (lineasAlbPartida.Count > 0)
                {
                    string lineaSel = dgvAlbLineas.CurrentRow.Cells["ComLnl"].Value.ToString();

                    if (esEdicion)
                    {
                        clase_lineaAlbCom_partida lineaAP = lineasAlbPartida.FirstOrDefault(x => x.ComLnl == lineaSel);

                        if (lineaSel != null)
                        {
                            clase_linea_albcom linea = new clase_linea_albcom();

                            SqlTransaction sqlTran = GloblaVar.gConRem.BeginTransaction();

                            resp = linea.Eliminar(tbComCpa.Text, lineaSel, tbAnyo.Text, lineaAP.Partida, ref sqlTran);

                            if (resp == "")
                            {
                                sqlTran.Commit();
                            }
                            else
                            {
                                sqlTran.Rollback();
                            }
                        }
                    }

                    if (resp == "")
                    {
                        lineasAlbPartida.RemoveAll(x => x.ComLnl == lineaSel);

                        cargarGridLineas();
                        calcularTotalAlbaran();
                    }
                    else
                    {
                        MessageBox.Show("Error al eliminar la línea del albarán:\n\n" + resp);
                    }
                }
            }
            catch (Exception ex)
            {
                MessageBox.Show("Error al eliminar la línea del albarán:\n\n" + ex.Message);
            }
        }
Esempio n. 2
0
        private void dgvAlbLineas_DoubleClick(object sender, EventArgs e)
        {
            string selec = dgvAlbLineas.CurrentRow.Cells["ComLnl"].Value.ToString();

            clase_lineaAlbCom_partida lineaSel = lineasAlbPartida.FirstOrDefault(x => x.ComLnl == selec);

            if (lineaSel != null)
            {
                tbComLnl.Text       = lineaSel.ComLnl;
                tbArtCod.Text       = lineaSel.ArtCod;
                tbArtDes.Text       = lineaSel.ArtDes;
                tbComLca.Text       = lineaSel.ComLca;
                tbComLki.Text       = lineaSel.ComLki;
                tbComLpr.Text       = lineaSel.ComLpr;
                tbComLim.Text       = lineaSel.ComLim;
                tbRef.Text          = lineaSel.Ref;
                tbPartida.Text      = lineaSel.Partida;
                cbArtePesca.Text    = lineaSel.ArtePesca;
                cbObtencion.Text    = lineaSel.Obtencion;
                cbPresentacion.Text = lineaSel.Presentacion;
                cbZonaCaptura.Text  = lineaSel.ZCaptura;
                cbPais.Text         = lineaSel.Pais;
                tbPExpedidor2.Text  = lineaSel.PExpedidor2;
                lCondEsps.Text      = lineaSel.CondEsps;

                if (lineaSel.FCaptura != "")
                {
                    dtpFCaptura.Value = Convert.ToDateTime(lineaSel.FCaptura);
                }

                cbBarco.Text         = lineaSel.Matricula;
                cbPtoDbco.Text       = lineaSel.PDesembarco;
                dtpFDesembarco.Value = Convert.ToDateTime(lineaSel.FDesembarco);

                if (lineaSel.FElaboracion != "")
                {
                    dtpFElaboracion.Value = Convert.ToDateTime(lineaSel.FElaboracion);
                }

                tbFElaboracion.Text = lineaSel.FElaboracion;
                if (lineaSel.FCaducidad != "")
                {
                    dtpFCaducidad.Value = Convert.ToDateTime(lineaSel.FCaducidad);
                }

                tbFCaducidad.Text = lineaSel.FCaducidad;

                esEdicionLinea = true;
            }
        }
Esempio n. 3
0
        private void cargarListaAlbPartida()
        {
            lineasAlbPartida.Clear();

            foreach (clase_linea_albcom lineaAlb in albaran.lineas)
            {
                clase_lineaAlbCom_partida lineaAP = new clase_lineaAlbCom_partida();

                lineaAP.ComLnl       = lineaAlb.ComLnl;
                lineaAP.ArtCod       = lineaAlb.ArtCod;
                lineaAP.ArtDes       = Funciones.DameNomArt(lineaAlb.ArtCod);
                lineaAP.ComLca       = lineaAlb.ComLca;
                lineaAP.ComLki       = Funciones.FormateaKilos(lineaAlb.ComLki);
                lineaAP.ComLpr       = Funciones.Formatea(lineaAlb.ComLpr);
                lineaAP.ComLim       = Funciones.Formatea(Funciones.Multiplica(lineaAlb.ComLki, lineaAlb.ComLpr));
                lineaAP.Ref          = lineaAlb.cPartida.Ref;
                lineaAP.Partida      = lineaAlb.cPartida.Partida;
                lineaAP.ArtePesca    = lineaAlb.cPartida.ArtePesca;
                lineaAP.Obtencion    = lineaAlb.cPartida.Obtencion;
                lineaAP.Presentacion = lineaAlb.cPartida.Presentacion;
                lineaAP.Matricula    = lineaAlb.cPartida.Matricula;
                lineaAP.PDesembarco  = lineaAlb.cPartida.PDesembarco;
                lineaAP.FDesembarco  = Convert.ToDateTime(lineaAlb.cPartida.FDesembarco).ToShortDateString();
                lineaAP.FElaboracion = lineaAlb.cPartida.FElaboracion;
                lineaAP.FCaducidad   = lineaAlb.cPartida.FCaducidad;
                lineaAP.ZCaptura     = lineaAlb.cPartida.ZCaptura;
                lineaAP.FCaptura     = lineaAlb.cPartida.FCaptura;
                lineaAP.Pais         = lineaAlb.cPartida.Pais;
                lineaAP.PExpedidor1  = lineaAlb.cPartida.PExpedidor1;
                lineaAP.PExpedidor2  = lineaAlb.cPartida.PExpedidor2;
                lineaAP.CExped1      = lineaAlb.cPartida.CExped1;
                lineaAP.CExped2      = lineaAlb.cPartida.CExped2;
                lineaAP.CExped3      = lineaAlb.cPartida.CExped3;
                lineaAP.CondEsps     = lineaAlb.cPartida.CondEsps;

                lineasAlbPartida.Add(lineaAP);
            }
        }
Esempio n. 4
0
        private void btnAceptarLinea_Click(object sender, EventArgs e)
        {
            if (tbArtCod.Text == string.Empty || tbComLki.Text == string.Empty || tbComLpr.Text == string.Empty)
            {
                MessageBox.Show("Los campos artículo, kilos y precio son obligatorios");
            }
            else
            {
                if (esEdicion) //Edición albarán
                {
                    string resp = "";

                    if (esEdicionLinea)
                    {
                        clase_lineaAlbCom_partida lineaSel = lineasAlbPartida.FirstOrDefault(x => x.ComLnl == tbComLnl.Text);

                        lineaSel.ArtCod       = tbArtCod.Text;
                        lineaSel.ArtDes       = tbArtDes.Text;
                        lineaSel.ComLca       = tbComLca.Text;
                        lineaSel.ComLki       = Funciones.FormateaKilos(tbComLki.Text);
                        lineaSel.ComLpr       = Funciones.Formatea(tbComLpr.Text);
                        lineaSel.ComLim       = Funciones.Formatea(Funciones.Multiplica(lineaSel.ComLki, lineaSel.ComLpr));
                        lineaSel.Ref          = tbRef.Text;
                        lineaSel.Partida      = tbPartida.Text;
                        lineaSel.ArtePesca    = cbArtePesca.Text;
                        lineaSel.Obtencion    = cbObtencion.Text;
                        lineaSel.Presentacion = cbPresentacion.Text;
                        lineaSel.Matricula    = cbBarco.Text;
                        lineaSel.PDesembarco  = cbPtoDbco.Text;
                        lineaSel.FDesembarco  = dtpFDesembarco.Value.ToShortDateString();
                        //lineaSel.FElaboracion = dtpFElaboracion.Value.ToShortDateString();
                        lineaSel.FElaboracion = tbFElaboracion.Text;
                        //lineaSel.FCaducidad = dtpFCaducidad.Value.ToShortDateString();
                        lineaSel.FCaducidad  = tbFCaducidad.Text;
                        lineaSel.ZCaptura    = cbZonaCaptura.Text;
                        lineaSel.FCaptura    = dtpFCaptura.Value.ToShortDateString();
                        lineaSel.Pais        = cbPais.Text;
                        lineaSel.PExpedidor1 = tbProNom.Text;
                        lineaSel.PExpedidor2 = tbPExpedidor2.Text;
                        lineaSel.CExped1     = "";
                        lineaSel.CExped2     = "";
                        lineaSel.CExped3     = "";
                        lineaSel.CondEsps    = lCondEsps.Text;

                        //Modificamos la base de datos

                        clase_linea_albcom lineaAlb = new clase_linea_albcom();

                        lineaAlb = lineaAlb.CogerLineaAlbaranPorCodigoYLinea(tbComCpa.Text, tbAnyo.Text, tbComLnl.Text);
                        //lineaAlb.cPartida.CogerPartidaPorRef(lineaSel.Ref);

                        lineaAlb.ArtCod = lineaSel.ArtCod;
                        lineaAlb.ComLca = lineaSel.ComLca;
                        lineaAlb.ComLki = lineaSel.ComLki;
                        lineaAlb.ComLpr = lineaSel.ComLpr;
                        lineaAlb.comlcp = lineaSel.ComLca;
                        lineaAlb.comlkp = lineaSel.ComLki;
                        lineaAlb.Ref    = lineaSel.Ref;
                        //lineaAlb.Stock = lineaSel.ComLki;


                        lineaAlb.cPartida.PDesembarco  = lineaSel.PDesembarco;
                        lineaAlb.cPartida.FDesembarco  = lineaSel.FDesembarco;
                        lineaAlb.cPartida.FElaboracion = lineaSel.FElaboracion;
                        lineaAlb.cPartida.FCaducidad   = lineaSel.FCaducidad;
                        lineaAlb.cPartida.ArtePesca    = lineaSel.ArtePesca;
                        lineaAlb.cPartida.Obtencion    = lineaSel.Obtencion;
                        lineaAlb.cPartida.Presentacion = lineaSel.Presentacion;
                        lineaAlb.cPartida.Matricula    = lineaSel.Matricula;
                        lineaAlb.cPartida.ArtCod       = lineaSel.ArtCod;
                        lineaAlb.cPartida.StockInicial = lineaSel.ComLki;
                        lineaAlb.cPartida.ZCaptura     = lineaSel.ZCaptura;
                        lineaAlb.cPartida.FCaptura     = lineaSel.FCaptura;
                        lineaAlb.cPartida.Pais         = lineaSel.Pais;
                        lineaAlb.cPartida.PExpedidor1  = lineaSel.PExpedidor1;
                        lineaAlb.cPartida.PExpedidor2  = lineaSel.PExpedidor2;
                        lineaAlb.cPartida.CExped1      = lineaSel.CExped1;
                        lineaAlb.cPartida.CExped2      = lineaSel.CExped2;
                        lineaAlb.cPartida.CExped3      = lineaSel.CExped3;
                        lineaAlb.cPartida.CondEsps     = lineaSel.CondEsps;
                        lineaAlb.cPartida.Ref          = lineaSel.Ref;

                        //lineaAlb.cPartida.Stock = lineaSel.ComLki;

                        resp = lineaAlb.cPartida.Modificar();
                        if (resp == "")
                        {
                            resp = lineaAlb.Modificar();
                            if (resp == "")
                            {
                                cargarGridLineas();
                                calcularTotalAlbaran();
                                limpiarDetalleLinea();
                            }
                            else
                            {
                                MessageBox.Show("Error al modificar la línea del albarán:\n\n" + resp);
                            }
                        }
                        else
                        {
                            MessageBox.Show("Error al modificar la partida:\n\n" + resp);
                        }
                    }
                    else //Nueva línea
                    {
                        clase_linea_albcom lineaAlb = new clase_linea_albcom();
                        string             nuevaLnl = lineaAlb.ObtenerNumeroLineaAlbaran(tbComCpa.Text, tbAnyo.Text);

                        clase_lineaAlbCom_partida nueva = new clase_lineaAlbCom_partida();

                        nueva.ComLnl       = nuevaLnl;
                        nueva.ArtCod       = tbArtCod.Text;
                        nueva.ArtDes       = tbArtDes.Text;
                        nueva.ComLca       = tbComLca.Text;
                        nueva.ComLki       = Funciones.FormateaKilos(tbComLki.Text);
                        nueva.ComLpr       = Funciones.Formatea(tbComLpr.Text);
                        nueva.ComLim       = Funciones.Formatea(Funciones.Multiplica(nueva.ComLki, nueva.ComLpr));
                        nueva.Ref          = tbRef.Text;
                        nueva.ArtePesca    = cbArtePesca.Text;
                        nueva.Obtencion    = cbObtencion.Text;
                        nueva.Presentacion = cbPresentacion.Text;
                        nueva.Matricula    = cbBarco.Text;
                        nueva.PDesembarco  = cbPtoDbco.Text;
                        nueva.FDesembarco  = dtpFDesembarco.Value.ToShortDateString();
                        //nueva.FElaboracion = dtpFElaboracion.Value.ToShortDateString();
                        nueva.FElaboracion = tbFElaboracion.Text;
                        //nueva.FCaducidad = dtpFCaducidad.Value.ToShortDateString();
                        nueva.FCaducidad  = tbFCaducidad.Text;
                        nueva.ZCaptura    = cbZonaCaptura.Text;
                        nueva.FCaptura    = dtpFCaptura.Value.ToShortDateString();
                        nueva.Pais        = cbPais.Text;
                        nueva.PExpedidor1 = tbProNom.Text;
                        nueva.PExpedidor2 = tbPExpedidor2.Text;
                        nueva.CExped1     = "";
                        nueva.CExped2     = "";
                        nueva.CExped3     = "";
                        nueva.CondEsps    = lCondEsps.Text;

                        //Ahora insertamos en base de datos

                        lineaAlb.ComLpa    = tbComCpa.Text;
                        lineaAlb.ProCod    = tbProCod.Text;
                        lineaAlb.comcfa    = dtpComCfa.Value.ToString();
                        lineaAlb.ComLnl    = nuevaLnl;
                        lineaAlb.comltl    = "N";
                        lineaAlb.ArtCod    = nueva.ArtCod;
                        lineaAlb.ComLca    = nueva.ComLca;
                        lineaAlb.ComLki    = nueva.ComLki;
                        lineaAlb.comlcp    = nueva.ComLca;
                        lineaAlb.comlkp    = nueva.ComLki;
                        lineaAlb.ComLpr    = nueva.ComLpr;
                        lineaAlb.Ref       = nueva.Ref;
                        lineaAlb.ComLal    = "1";
                        lineaAlb.Stock     = lineaAlb.ComLki;
                        lineaAlb.Anyo      = tbAnyo.Text;
                        lineaAlb.AlmMay    = "01";
                        lineaAlb.Facturado = false;

                        lineaAlb.cPartida.Anyo         = tbAnyo.Text;
                        lineaAlb.cPartida.AlmMay       = "01";
                        lineaAlb.cPartida.Ref          = nueva.Ref;
                        lineaAlb.cPartida.PDesembarco  = nueva.PDesembarco;
                        lineaAlb.cPartida.FDesembarco  = nueva.FDesembarco;
                        lineaAlb.cPartida.ArtCod       = nueva.ArtCod;
                        lineaAlb.cPartida.ProCod       = tbProCod.Text;
                        lineaAlb.cPartida.FElaboracion = nueva.FElaboracion;
                        lineaAlb.cPartida.FCaducidad   = nueva.FCaducidad;
                        lineaAlb.cPartida.StockInicial = nueva.ComLki;
                        lineaAlb.cPartida.ArtePesca    = nueva.ArtePesca;
                        lineaAlb.cPartida.Obtencion    = nueva.Obtencion;
                        lineaAlb.cPartida.Presentacion = nueva.Presentacion;
                        lineaAlb.cPartida.Matricula    = nueva.Matricula;
                        lineaAlb.cPartida.AlbCompra    = lineaAlb.ComLpa;
                        lineaAlb.cPartida.FCompra      = lineaAlb.comcfa;
                        lineaAlb.cPartida.ZCaptura     = nueva.ZCaptura;
                        lineaAlb.cPartida.FCaptura     = nueva.FCaptura;
                        lineaAlb.cPartida.Pais         = nueva.Pais;
                        lineaAlb.cPartida.PExpedidor1  = nueva.PExpedidor1;
                        lineaAlb.cPartida.PExpedidor2  = nueva.PExpedidor2;
                        lineaAlb.cPartida.CExped1      = nueva.CExped1;
                        lineaAlb.cPartida.CExped2      = nueva.CExped2;
                        lineaAlb.cPartida.CExped3      = nueva.CExped3;
                        lineaAlb.cPartida.CondEsps     = nueva.CondEsps;


                        SqlTransaction sqlTran = GloblaVar.gConRem.BeginTransaction();

                        resp = lineaAlb.cPartida.Insertar(ref sqlTran);
                        if (resp == "")
                        {
                            //Asignamos a la línea los datos que vienen de la partida (Partida y Ref)
                            lineaAlb.Partida = lineaAlb.cPartida.Partida;
                            lineaAlb.Ref     = lineaAlb.cPartida.Ref;

                            nueva.Ref     = lineaAlb.cPartida.Ref;
                            nueva.Partida = lineaAlb.Partida;
                            lineasAlbPartida.Add(nueva);

                            resp = lineaAlb.Insertar(ref sqlTran);
                        }

                        if (resp == "")
                        {
                            sqlTran.Commit();

                            cargarGridLineas();
                            calcularTotalAlbaran();
                            limpiarDetalleLinea();
                        }
                        else
                        {
                            sqlTran.Rollback();

                            MessageBox.Show("Error al insertar la línea del albarán:\n\n" + resp);
                        }
                    }
                }
                else //Nuevo albarán
                {
                    if (esEdicionLinea)
                    {
                        clase_lineaAlbCom_partida lineaSel = lineasAlbPartida.FirstOrDefault(x => x.ComLnl == tbComLnl.Text);

                        lineaSel.ArtCod = tbArtCod.Text;
                        lineaSel.ArtDes = tbArtDes.Text;
                        lineaSel.ComLca = tbComLca.Text;
                        lineaSel.ComLki = Funciones.FormateaKilos(tbComLki.Text);
                        lineaSel.ComLpr = Funciones.Formatea(tbComLpr.Text);
                        lineaSel.ComLim = Funciones.Formatea(Funciones.Multiplica(lineaSel.ComLki, lineaSel.ComLpr));
                        lineaSel.Ref    = tbRef.Text;
                        //lineaSel.Partida = tbPartida.Text;
                        lineaSel.ArtePesca    = cbArtePesca.Text;
                        lineaSel.Obtencion    = cbObtencion.Text;
                        lineaSel.Presentacion = cbPresentacion.Text;
                        lineaSel.Matricula    = cbBarco.Text;
                        lineaSel.PDesembarco  = cbPtoDbco.Text;
                        lineaSel.FDesembarco  = dtpFDesembarco.Value.ToShortDateString();
                        //lineaSel.FElaboracion = dtpFElaboracion.Value.ToShortDateString();
                        lineaSel.FElaboracion = tbFElaboracion.Text;
                        //lineaSel.FCaducidad = dtpFCaducidad.Value.ToShortDateString();
                        lineaSel.FCaducidad  = tbFCaducidad.Text;
                        lineaSel.ZCaptura    = cbZonaCaptura.Text;
                        lineaSel.FCaptura    = dtpFCaptura.Value.ToShortDateString();
                        lineaSel.Pais        = cbPais.Text;
                        lineaSel.PExpedidor1 = tbProNom.Text;
                        lineaSel.PExpedidor2 = tbPExpedidor2.Text;
                        lineaSel.CExped1     = "";
                        lineaSel.CExped2     = "";
                        lineaSel.CExped3     = "";
                        lineaSel.CondEsps    = lCondEsps.Text;
                    }
                    else //Nueva línea
                    {
                        contLinea++;

                        clase_lineaAlbCom_partida nueva = new clase_lineaAlbCom_partida();

                        nueva.ComLnl       = (contLinea).ToString();
                        nueva.ArtCod       = tbArtCod.Text;
                        nueva.ArtDes       = tbArtDes.Text;
                        nueva.ComLca       = tbComLca.Text;
                        nueva.ComLki       = Funciones.FormateaKilos(tbComLki.Text);
                        nueva.ComLpr       = Funciones.Formatea(tbComLpr.Text);
                        nueva.ComLim       = Funciones.Formatea(Funciones.Multiplica(nueva.ComLki, nueva.ComLpr));
                        nueva.Ref          = tbRef.Text;
                        nueva.ArtePesca    = cbArtePesca.Text;
                        nueva.Obtencion    = cbObtencion.Text;
                        nueva.Presentacion = cbPresentacion.Text;
                        nueva.Matricula    = cbBarco.Text;
                        nueva.PDesembarco  = cbPtoDbco.Text;
                        nueva.FDesembarco  = dtpFDesembarco.Value.ToShortDateString();
                        //nueva.FElaboracion = dtpFElaboracion.Value.ToShortDateString();
                        nueva.FElaboracion = tbFElaboracion.Text;
                        //nueva.FCaducidad = dtpFCaducidad.Value.ToShortDateString();
                        nueva.FCaducidad  = tbFCaducidad.Text;
                        nueva.ZCaptura    = cbZonaCaptura.Text;
                        nueva.FCaptura    = dtpFCaptura.Value.ToShortDateString();
                        nueva.Pais        = cbPais.Text;
                        nueva.PExpedidor1 = tbProNom.Text;
                        nueva.PExpedidor2 = tbPExpedidor2.Text;
                        nueva.CExped1     = "";
                        nueva.CExped2     = "";
                        nueva.CExped3     = "";
                        nueva.CondEsps    = lCondEsps.Text;
                        lineasAlbPartida.Add(nueva);
                    }

                    cargarGridLineas();
                    calcularTotalAlbaran();
                    limpiarDetalleLinea();
                }

                tbArtCod.Focus();
            }
        }