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);
}
}
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;
}
}
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);
}
}
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();
}
}