private bool fncAltaLinea() { bool vOk = false; cAlbaranesCompra.LinAlbCompra cLinCompra = new cAlbaranesCompra.LinAlbCompra(); if (txCan.Text == "") { txCan.Text = "0"; } if (txRecepPor.Text == "") { txRecepPor.Text = "0"; } if (txLote.Text == "") { txLote.Text = "0"; } cLinCompra.Cantidad = Convert.ToDecimal(txCan.Text); cLinCompra.Descripción = txDesProd.Text; cLinCompra.Empresa = cParamXml.Emp; cLinCompra.Producto = txProd.Text; vOk = cLinCompra.fncAltaLin(); return(vOk); }
private void sbrProceso() { if (cParamXml.ActProv == "False") { return; } string vSql = cConstantes.SQL_Insert_Cab_AlbProv; vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString()); SQLDataAccess.GEN_ExecuteNonQuery(vSql, cParamXml.strConec); tiProces.Enabled = false; lbMen.Text = "Procesando Albaranes de Proveedor"; Application.DoEvents(); DataTable dt = new DataTable(); string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerOrdAlbProv, false, cParamXml.strConec); vSql = cConstantes.SQL_Alb_Dbf; vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString()); vSql = vSql.Replace("[?NumAlb]", vNumSerie); lbMen.Text = "Procesando Albaranes de Proveedor: Captura de Datos"; lbError.Text = vSql; Application.DoEvents(); try { dt = SQLDataAccess.TraeDBF(vSql, cUtil.DBFConec(cParamXml.strOleDBConecDbf)); cAlbaranesCompra.LinAlbCompra oLinAlb = new cAlbaranesCompra.LinAlbCompra(); lbMen.Text = "Procesando Albaranes de Proveedor: Proceso"; Application.DoEvents(); foreach (DataRow dr in dt.Rows) { string vNumAlb = dr["nnumalb"].ToString(); string vNumPed = dr["nnumped"].ToString(); string vProd = dr["CREF"].ToString(); string vNomProd = dr["cdetalle"].ToString(); string vCan = dr["NCANENT"].ToString(); string vFecha = dr["DFecAlb"].ToString(); string vProv = dr["ccodpro"].ToString(); string vNomProv = cProveedores.fncTraeC("cnompro", vProv); string vLote = dr["cprop2"].ToString(); string vLinea = dr["nlinea"].ToString(); if (vLinea == "") { vLinea = "0"; } if (vCan == "") { vCan = "0"; } decimal vCanEnt = Convert.ToDecimal(vCan); string vNumSer = SQLDataAccess.GenTraeNumSerie("ProductoLote", true, cParamXml.strConec); oLinAlb.Empresa = cParamXml.Emp; oLinAlb.NumAlb = vNumAlb; oLinAlb.Linea = Convert.ToInt16(vLinea); oLinAlb.FechaEntrega = Convert.ToDateTime(vFecha); oLinAlb.Producto = vProd; oLinAlb.Descripción = vNomProd; oLinAlb.CodProv = vProv; oLinAlb.NombreProv = vNomProv; oLinAlb.Cantidad = vCanEnt; oLinAlb.Lote = vLote; oLinAlb.RecepcionadoPor = ""; oLinAlb.NumSerie = vNumSer; oLinAlb.Grabado = 10; lbMen.Text = "Procesando Albaranes de Proveedor: " + vNumAlb; Application.DoEvents(); if (oLinAlb.fncAltaLin()) { SQLDataAccess.GenSetNumSerie(cParamXml.NSerOrdAlbProv, vNumAlb, cParamXml.strConec); } } } catch (Exception ex) { lbError.Text = DateTime.Now.ToLongDateString() + "-- " + ex.Message; } lbMen.Text = ""; Application.DoEvents(); tiProces.Enabled = true; }