private void sbrProcesoPedCli()
{
if (cParamXml.ActPedCli == "False")
{
return;
}
tiProces.Enabled = false;
lbMen.Text = "Procesando Pedidos de Cliente";
Application.DoEvents();
DataTable dt = new DataTable();
string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerPedCli, false, cParamXml.strConec);
string vSql = cConstantes.SQL_CabPed_Dbf;
vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString());
vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString());
vSql = vSql.Replace("[?NumPed]", vNumSerie);
try
{
dt = SQLDataAccess.TraeDBF(vSql, cUtil.DBFConec(cParamXml.strOleDBConecDbf));
cPedidosVenta.CabVenta oCabPed = new cPedidosVenta.CabVenta();
cPedidosVenta.LinVenta oLinPed = new cPedidosVenta.LinVenta();
string vNumPed = "";
string vErr = "";
foreach (DataRow dr in dt.Rows)
{
vNumPed = dr["nnumped"].ToString();
if (oCabPed.fncAlta(dr))
{
string vSql2 = cConstantes.SQL_LinPed_Dbf;
vSql2 = vSql2.Replace("[?vbCr]", cConstantes.vbCtr.ToString());
vSql2 = vSql2.Replace("[?vbLf]", cConstantes.vbLF.ToString());
vSql2 = vSql2.Replace("[?NumPed]", vNumPed);
DataTable dt2 = SQLDataAccess.TraeDBF(vSql2, cUtil.DBFConec(cParamXml.strOleDBConecDbf));
foreach (DataRow dr2 in dt2.Rows)
{
//DataRow dr2 = dt2.Rows[0];
if (!oLinPed.fncAltaLin(dr2))
{
vErr = oLinPed.Error;
lbError.Text = vErr;
Application.DoEvents();
Thread.Sleep(5000);
}
}
}
else
{
vErr = oCabPed.Error;
lbError.Text = vErr;
Application.DoEvents();
Thread.Sleep(5000);
}
SQLDataAccess.GenSetNumSerie(cParamXml.NSerPedCli, vNumPed, cParamXml.strConec);
}
}
catch (Exception ex)
{
lbError.Text = DateTime.Now.ToLongDateString() + "-- " + ex.Message;
}
lbMen.Text = "";
Application.DoEvents();
tiProces.Enabled = true;
}
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;
}
private void sbrProcesoCli()
{
if (cParamXml.ActCli == "False")
{
return;
}
tiProces.Enabled = false;
lbMen.Text = "Procesando Albaranes de Cliente";
Application.DoEvents();
DataTable dt = new DataTable();
string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerOrdAlbCli, false, cParamXml.strConec);
string vSql = cConstantes.SQL_Alb_Cli_Dbf;
vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString());
vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString());
vSql = vSql.Replace("[?NumAlb]", vNumSerie);
try
{
dt = SQLDataAccess.TraeDBF(vSql, cUtil.DBFConec(cParamXml.strOleDBConecDbf));
cAlbaranesVenta.LinAlbVenta oLinAlb = new cAlbaranesVenta.LinAlbVenta();
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 vCli = dr["ccodcli"].ToString();
string vNomCli = cClientes.fncTraeC("cnomcli", vCli);
string vLote = dr["cprop2"].ToString();
string vLinea = dr["nlinea"].ToString();
if (vLinea == "")
{
vLinea = "0";
}
if (vCan == "")
{
vCan = "0";
}
decimal vCanEnt = Convert.ToDecimal(vCan);
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.CodCli = vCli;
oLinAlb.NombreCli = vNomCli;
oLinAlb.Cantidad = vCanEnt;
oLinAlb.Lote = vLote;
oLinAlb.Grabado = 10;
if (oLinAlb.fncAltaLin())
{
SQLDataAccess.GenSetNumSerie(cParamXml.NSerOrdAlbCli, vNumAlb, cParamXml.strConec);
}
}
}
catch (Exception ex)
{
lbError.Text = DateTime.Now.ToLongDateString() + "-- " + ex.Message;
}
lbMen.Text = "";
Application.DoEvents();
tiProces.Enabled = true;
}
