public static DataTable Financiero(string IdPeriodo, string TipoReporte, string ListaClientes, CedEntidades.Sesion Sesion, out List<CedForecastEntidades.Advertencia> Advertencias)
{
Advertencias = new List<CedForecastEntidades.Advertencia>();
//Validacion de parámetros
if (ListaClientes == String.Empty)
{
throw new Microsoft.ApplicationBlocks.ExceptionManagement.Validaciones.ValorNoInfo("Cliente(s)");
}
//Leer datos Forecast
CedForecastDB.Forecast db = new CedForecastDB.Forecast(Sesion);
DataSet ds = db.LeerDatosParaFinanciero(IdPeriodo, TipoReporte, ListaClientes);
DataTable dtZona;
switch (TipoReporte)
{
case "Zona-Cliente":
dtZona = ds.Tables[0];
break;
}
DataTable dtClientes = ds.Tables[1];
DataTable dtDatos = ds.Tables[2];
//Leer datos Bejerman
List<CedForecastEntidades.Bejerman.Zona> zonas = new CedForecastDB.Bejerman.Zona(Sesion).LeerLista();
List<CedForecastEntidades.Bejerman.Clientes> clientes = new CedForecastDB.Bejerman.Clientes(Sesion).LeerLista();
//Crear crosstab
DataTable dt = new DataTable();
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Zona"])); //Zona
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cliente"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["TipoDato"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Descr"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["FecVto"]));
DateTime fechaInicio = Convert.ToDateTime("01/" + IdPeriodo.Substring(4, 2) + "/" + IdPeriodo.Substring(0, 4));
DateTime periodoColumna = fechaInicio;
for (int i = 0; i < 12; i++)
{
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Saldo"], " " + periodoColumna.ToString("MM-yyyy"), " " + periodoColumna.ToString("MM-yyyy")));
periodoColumna = periodoColumna.AddMonths(1);
}
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Saldo"], "Total Saldo", "Total Saldo"));
//Llenar crosstab
string claveAnterior = String.Empty;
for (int i = 0; i < dtDatos.Rows.Count; i++)
{
//string claveActual = Convert.ToString(dtDatos.Rows[i]["Zona"]) + Convert.ToString(dtDatos.Rows[i]["Cliente"]);
//if (claveAnterior != claveActual)
//{
//Zona
DataRow dr = dt.NewRow();
CedForecastEntidades.Bejerman.Zona zona = zonas.Find(delegate(CedForecastEntidades.Bejerman.Zona c) { return c.Zon_Cod == Convert.ToString(dtDatos.Rows[i]["Zona"]); });
if (zona == null)
{
dr["Zona"] = Convert.ToString(dtDatos.Rows[i]["Zona"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-01", "Descripción no encontrada para la zona " + Convert.ToString(dtDatos.Rows[i]["Zona"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Zona"] = Convert.ToString(dtDatos.Rows[i]["Zona"]) + "-" + zona.Zon_Desc;
}
//Cliente
CedForecastEntidades.Bejerman.Clientes cliente = clientes.Find(delegate(CedForecastEntidades.Bejerman.Clientes c) { return c.Cli_Cod == Convert.ToString(dtDatos.Rows[i]["Cliente"]); });
if (cliente == null)
{
dr["Cliente"] = Convert.ToString(dtDatos.Rows[i]["Cliente"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-02", "Descripción no encontrada para el cliente " + Convert.ToString(dtDatos.Rows[i]["Cliente"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Cliente"] = Convert.ToString(dtDatos.Rows[i]["Cliente"]) + "-" + cliente.Cli_RazSoc;
}
dr["FecVto"] = Convert.ToString(dtDatos.Rows[i]["FecVto"]);
dr["TipoDato"] = Convert.ToString(dtDatos.Rows[i]["TipoDato"]);
dr["Descr"] = Convert.ToString(dtDatos.Rows[i]["Descr"]);
dt.Rows.Add(dr);
//claveAnterior = claveActual;
//}
decimal valor = Convert.ToDecimal(dtDatos.Rows[i]["Saldo"]);
string periodo = Convert.ToDateTime(dtDatos.Rows[i]["FecVto"]).ToString("MM-yyyy");
if (Convert.ToInt32(Convert.ToDateTime(dtDatos.Rows[i]["FecVto"]).ToString("yyyyMM")) < Convert.ToInt32(fechaInicio.ToString("yyyyMM")))
{
if (dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")] = "0";
}
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")]) + valor;
}
else if (Convert.ToInt32(Convert.ToDateTime(dtDatos.Rows[i]["FecVto"]).ToString("yyyyMM")) > Convert.ToInt32(fechaInicio.AddMonths(11).ToString("yyyyMM")))
{
if (dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")] = "0";
}
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")]) + valor;
}
else
{
if (dt.Rows[dt.Rows.Count - 1][" " + periodo].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1][" " + periodo] = "0";
}
dt.Rows[dt.Rows.Count - 1][" " + periodo] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1][" " + periodo]) + valor;
}
if (dt.Rows[dt.Rows.Count - 1]["Total Saldo"].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1]["Total Saldo"] = "0";
}
dt.Rows[dt.Rows.Count - 1]["Total Saldo"] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1]["Total Saldo"]) + valor;
dt.AcceptChanges();
}
return dt;
}
private static DataTable LeerDatosForecastParaFinancieroDS(string PeriodoDesde, string PeriodoHasta, string ListaClientes, List<CedForecastEntidades.Advertencia> Advertencias, CedEntidades.Sesion Sesion)
{
if (ListaClientes == String.Empty)
{
throw new Microsoft.ApplicationBlocks.ExceptionManagement.Validaciones.ValorNoInfo("Cliente(s)");
}
//Leer datos Forecast
CedForecastDB.Forecast db = new CedForecastDB.Forecast(Sesion);
DataSet ds = db.LeerDatosForecastParaFinancieroDS(PeriodoDesde, PeriodoHasta, ListaClientes);
DataTable dtDatos = ds.Tables[0];
//Leer datos Bejerman
List<CedForecastEntidades.Bejerman.Zona> zonas = new CedForecastDB.Bejerman.Zona(Sesion).LeerLista();
List<CedForecastEntidades.Bejerman.Clientes> clientes = new CedForecastDB.Bejerman.Clientes(Sesion).LeerLista();
List<CedForecastEntidades.Bejerman.Articulos> articulos = new CedForecastDB.Bejerman.Articulos(Sesion).LeerListaConPrecios();
//Crear datos de forecast para FinancieroDS
DataTable dt = new DataTable();
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Zona"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cliente"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Nombre"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["CondVta"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Articulo"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Periodo"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cantidad"], "Valor", "Valor"));
for (int i = 0; i < dtDatos.Rows.Count; i++)
{
decimal precio = 0;
//Ajustar Periodo en funcion a la condicion de pago.
//POR AHORA CONDICION DE PAGO FIJA (90 dias = 3 meses).
DateTime fechaAux = Convert.ToDateTime("01/" + dtDatos.Rows[i]["Periodo"].ToString().Substring(4, 2) + "/" + dtDatos.Rows[i]["Periodo"].ToString().Substring(0, 4));
string nuevoPeriodo = fechaAux.AddMonths(3).ToString("yyyyMM");
//
if (Convert.ToInt32(nuevoPeriodo) <= Convert.ToInt32(PeriodoHasta))
{
DataRow dr = dt.NewRow();
dr["Periodo"] = nuevoPeriodo;
CedForecastEntidades.Bejerman.Articulos articulo = articulos.Find(delegate(CedForecastEntidades.Bejerman.Articulos c) { return c.Art_CodGen == Convert.ToString(dtDatos.Rows[i]["Articulo"]); });
if (articulo == null)
{
dr["Articulo"] = Convert.ToString(dtDatos.Rows[i]["Articulo"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-Forecast-01", "Descripción no encontrada para el artículo " + Convert.ToString(dtDatos.Rows[i]["Articulo"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
precio = 0;
}
else
{
dr["Articulo"] = Convert.ToString(dtDatos.Rows[i]["Articulo"]) + "-" + articulo.Art_DescGen;
precio = articulo.Lpr_Precio;
}
if (precio == 0)
{
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-Forecast-02", "Precio no encontrado para el artículo " + Convert.ToString(dtDatos.Rows[i]["Articulo"]), CedForecastEntidades.Advertencia.TipoSeveridad.Error));
}
//Zona
CedForecastEntidades.Bejerman.Zona zona = zonas.Find(delegate(CedForecastEntidades.Bejerman.Zona c) { return c.Zon_Cod == Convert.ToString(dtDatos.Rows[i]["Zona"]); });
if (zona == null)
{
dr["Zona"] = Convert.ToString(dtDatos.Rows[i]["Zona"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-Forecast-03", "Descripción no encontrada para la zona " + Convert.ToString(dtDatos.Rows[i]["Zona"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Zona"] = Convert.ToString(dtDatos.Rows[i]["Zona"]); // +"-" + zona.Zon_Desc;
}
//Cliente
CedForecastEntidades.Bejerman.Clientes cliente = clientes.Find(delegate(CedForecastEntidades.Bejerman.Clientes c) { return c.Cli_Cod == Convert.ToString(dtDatos.Rows[i]["Cliente"]); });
if (cliente == null)
{
dr["Cliente"] = Convert.ToString(dtDatos.Rows[i]["Cliente"]);
dr["Nombre"] = "<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-Forecast-04", "Descripción no encontrada para el cliente " + Convert.ToString(dtDatos.Rows[i]["Cliente"]) + "-" + dr["Nombre"].ToString(), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Cliente"] = Convert.ToString(dtDatos.Rows[i]["Cliente"]); // + "-" + cliente.Cli_RazSoc;
dr["Nombre"] = Convert.ToString(dtDatos.Rows[i]["Nombre"]);
}
if (articulo == null)
{
precio = 0;
}
else
{
precio = articulo.Lpr_Precio;
}
decimal valor = Convert.ToDecimal(dtDatos.Rows[i]["Cantidad"]) * precio;
dr["Valor"] = valor;
dt.Rows.Add(dr);
}
}
return dt;
}
public static DataTable ResumenArgentinaXZonas(string PeriodoDesde, string PeriodoHasta, string TipoReporte, string ListaArticulos, string ListaClientes, string ListaVendedores, bool Valorizado, CedEntidades.Sesion Sesion, out List<CedForecastEntidades.Advertencia> Advertencias)
{
Advertencias = new List<CedForecastEntidades.Advertencia>();
//Validacion de parámetros
if (ListaArticulos == String.Empty)
{
throw new Microsoft.ApplicationBlocks.ExceptionManagement.Validaciones.ValorNoInfo("Articulo(s)");
}
if (ListaClientes == String.Empty)
{
throw new Microsoft.ApplicationBlocks.ExceptionManagement.Validaciones.ValorNoInfo("Cliente(s)");
}
//Leer datos Forecast
CedForecastDB.Forecast db = new CedForecastDB.Forecast(Sesion);
DataSet ds = db.LeerDatosParaResumenArgentinaXZonas(PeriodoDesde, PeriodoHasta, TipoReporte, ListaArticulos, ListaClientes, ListaVendedores);
DataTable dtZona;
DataTable dtVendedor;
switch (TipoReporte)
{
case "Zona-Familia-Articulo":
dtZona = ds.Tables[0];
break;
case "Vendedor-Familia-Articulo":
dtVendedor = ds.Tables[0];
break;
}
DataTable dtFamilia = ds.Tables[1];
DataTable dtArticulos = ds.Tables[2];
DataTable dtDatos = ds.Tables[3];
//Leer datos Bejerman
List<CedForecastEntidades.Bejerman.Zona> zonas = new CedForecastDB.Bejerman.Zona(Sesion).LeerLista();
List<CedForecastEntidades.Bejerman.Vendedor> vendedores = new CedForecastDB.Bejerman.Vendedor(Sesion).LeerLista();
List<CedForecastEntidades.Bejerman.Articulos> articulos = new CedForecastDB.Bejerman.Articulos(Sesion).LeerListaConPrecios();
List<CedForecastEntidades.ArticuloInfoAdicional> familiaXArticulos = new CedForecastDB.ArticuloInfoAdicional(Sesion).LeerLista();
//Crear crosstab
DataTable dt = new DataTable();
dt.Columns.Add(ClonarColumna(dtDatos.Columns[0])); //Empresa
dt.Columns.Add(ClonarColumna(dtDatos.Columns[1])); //Zona o Vendedor
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Familia"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Articulo"]));
string idPeriodo = "";
DateTime periodoDesde = Convert.ToDateTime("01/" + PeriodoDesde.Substring(4, 2) + "/" + PeriodoDesde.Substring(0, 4));
DateTime periodoHasta = Convert.ToDateTime("01/" + PeriodoHasta.Substring(4, 2) + "/" + PeriodoHasta.Substring(0, 4));
int meses = periodoHasta.Month - periodoDesde.Month + 1;
int años = periodoHasta.Year - periodoDesde.Year;
meses += años * 12;
idPeriodo = periodoDesde.ToString("yyyyMM");
for (int i = 1; i <= meses; i++)
{
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cantidad"], "Plan-" + idPeriodo, "Plan-" + idPeriodo));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cantidad"], "Real-" + idPeriodo, "Real-" + idPeriodo));
idPeriodo = periodoDesde.AddMonths(i).ToString("yyyyMM");
}
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cantidad"], "Total Plan", "Total Plan"));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cantidad"], "Total Real", "Total Real"));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cantidad"], "Desvio Plan", "Desvio Plan"));
//Llenar crosstab
string claveAnterior = String.Empty;
//Buscar Ventas
CedForecastDB.Bejerman.Ventas dbVentas = new CedForecastDB.Bejerman.Ventas(Sesion);
List<CedForecastEntidades.Bejerman.Ventas> ventas = dbVentas.LeerParaResumenArgentinaXZonas(TipoReporte, PeriodoDesde, PeriodoHasta, ListaArticulos, ListaClientes, ListaVendedores);
decimal precio = 0;
for (int i = 0; i < ventas.Count; i++)
{
string familia = "";
CedForecastEntidades.ArticuloInfoAdicional articuloInfoAdicional = familiaXArticulos.Find(delegate(CedForecastEntidades.ArticuloInfoAdicional c) { return c.IdArticulo == Convert.ToString(ventas[i].Sdvart_CodGen); });
if (articuloInfoAdicional != null)
{
familia = articuloInfoAdicional.IdFamiliaArticulo;
}
DataRow[] drv;
switch (TipoReporte)
{
case "Zona-Familia-Articulo":
drv = dtDatos.Select("Zona = '" + ventas[i].Zona + "' and Articulo = '" + ventas[i].Sdvart_CodGen + "' and Periodo = '" + ventas[i].Periodo + "'");
if (drv.Length == 0)
{
dtDatos.Rows.Add("Empresa", ventas[i].Zona, familia, ventas[i].Sdvart_CodGen, ventas[i].Sdvart_CodGen, ventas[i].Periodo, 0);
}
break;
case "Vendedor-Familia-Articulo":
drv = dtDatos.Select("Vendedor = '" + ventas[i].Vendedor + "' and Articulo = '" + ventas[i].Sdvart_CodGen + "' and Periodo = '" + ventas[i].Periodo + "'");
if (drv.Length == 0)
{
dtDatos.Rows.Add("Empresa", ventas[i].Vendedor, familia, ventas[i].Sdvart_CodGen, ventas[i].Sdvart_CodGen, ventas[i].Periodo, 0);
}
break;
}
}
//Ordenar datos
switch (TipoReporte)
{
case "Zona-Familia-Articulo":
dtDatos.DefaultView.Sort = "Zona ASC, Familia ASC, Articulo ASC";
break;
case "Vendedor-Familia-Articulo":
dtDatos.DefaultView.Sort = "Vendedor ASC, Familia ASC, Articulo ASC";
break;
}
for (int i = 0; i < dtDatos.DefaultView.Count; i++)
{
string claveActual = Convert.ToString(dtDatos.DefaultView[i][1]) + Convert.ToString(dtDatos.DefaultView[i]["Familia"]) + Convert.ToString(dtDatos.DefaultView[i]["Articulo"]);
if (claveAnterior != claveActual)
{
DataRow dr = dt.NewRow();
dr["Empresa"] = "Empresa";
CedForecastEntidades.ArticuloInfoAdicional familiaXArticulo = familiaXArticulos.Find(delegate(CedForecastEntidades.ArticuloInfoAdicional c) { return c.IdArticulo == Convert.ToString(dtDatos.DefaultView[i]["Articulo"]); });
if (familiaXArticulo == null)
{
dr["Familia"] = "<<<Desconocida>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-01", "Artículo " + Convert.ToString(dtDatos.DefaultView[i]["Articulo"]) + " sin familia definida", CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Familia"] = familiaXArticulo.DescrFamiliaArticulo;
}
CedForecastEntidades.Bejerman.Articulos articulo = articulos.Find(delegate(CedForecastEntidades.Bejerman.Articulos c) { return c.Art_CodGen == Convert.ToString(dtDatos.DefaultView[i]["Articulo"]); });
if (articulo == null)
{
dr["Articulo"] = Convert.ToString(dtDatos.DefaultView[i]["Articulo"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-02", "Descripción no encontrada para el artículo " + Convert.ToString(dtDatos.DefaultView[i]["Articulo"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
precio = 0;
}
else
{
dr["Articulo"] = Convert.ToString(dtDatos.DefaultView[i]["Articulo"]) + "-" + articulo.Art_DescGen;
precio = articulo.Lpr_Precio;
}
if (precio == 0)
{
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-03", "Precio no encontrado para el artículo " + Convert.ToString(dtDatos.DefaultView[i]["Articulo"]), CedForecastEntidades.Advertencia.TipoSeveridad.Error));
}
switch (TipoReporte)
{
case "Zona-Familia-Articulo":
CedForecastEntidades.Bejerman.Zona zona = zonas.Find(delegate(CedForecastEntidades.Bejerman.Zona c) { return c.Zon_Cod == Convert.ToString(dtDatos.DefaultView[i]["Zona"]); });
if (zona == null)
{
dr["Zona"] = Convert.ToString(dtDatos.DefaultView[i]["Zona"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-04", "Descripción no encontrada para la zona " + Convert.ToString(dtDatos.DefaultView[i]["Zona"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Zona"] = Convert.ToString(dtDatos.DefaultView[i]["Zona"]) + "-" + zona.Zon_Desc;
}
break;
case "Vendedor-Familia-Articulo":
CedForecastEntidades.Bejerman.Vendedor vendedor = vendedores.Find(delegate(CedForecastEntidades.Bejerman.Vendedor c) { return c.Ven_Cod == Convert.ToString(dtDatos.DefaultView[i]["Vendedor"]); });
if (vendedor == null)
{
dr["Vendedor"] = Convert.ToString(dtDatos.DefaultView[i]["Vendedor"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-04", "Descripción no encontrada para el vendedor " + Convert.ToString(dtDatos.DefaultView[i]["Vendedor"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Vendedor"] = Convert.ToString(dtDatos.DefaultView[i]["Vendedor"]) + "-" + vendedor.Ven_Desc;
}
break;
}
if (!Valorizado)
{
precio = 1;
}
else
{
if (articulo == null)
{
precio = 0;
}
else
{
precio = articulo.Lpr_Precio;
}
}
dr["Total Plan"] = 0;
dr["Total Real"] = 0;
dt.Rows.Add(dr);
claveAnterior = claveActual;
}
decimal valor = Convert.ToDecimal(dtDatos.DefaultView[i]["Cantidad"]) * precio;
dt.Rows[dt.Rows.Count - 1]["Plan-" + dtDatos.DefaultView[i]["Periodo"].ToString()] = valor;
//Completo ventas
CedForecastEntidades.Bejerman.Ventas venta = new CedForecastEntidades.Bejerman.Ventas();
switch (TipoReporte)
{
case "Zona-Familia-Articulo":
venta = ventas.Find((delegate(CedForecastEntidades.Bejerman.Ventas e) { return e.Zona == dtDatos.DefaultView[i]["Zona"].ToString() && e.Sdvart_CodGen == dtDatos.DefaultView[i]["Articulo"].ToString() && e.Periodo == dtDatos.DefaultView[i]["Periodo"].ToString(); }));
break;
case "Vendedor-Familia-Articulo":
venta = ventas.Find((delegate(CedForecastEntidades.Bejerman.Ventas e) { return e.Vendedor == dtDatos.DefaultView[i]["Vendedor"].ToString() && e.Sdvart_CodGen == dtDatos.DefaultView[i]["Articulo"].ToString() && e.Periodo == dtDatos.DefaultView[i]["Periodo"].ToString(); }));
break;
}
decimal valorReal = 0;
if (venta != null)
{
if (Valorizado)
{
valorReal = venta.Sdv_ImpTot;
}
else
{
valorReal = venta.Sdv_CantUM1;
}
dt.Rows[dt.Rows.Count - 1]["Real-" + dtDatos.DefaultView[i]["Periodo"].ToString()] = valorReal;
}
//Sumar a Total
dt.Rows[dt.Rows.Count - 1]["Total Plan"] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1]["Total Plan"]) + valor;
dt.Rows[dt.Rows.Count - 1]["Total Real"] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1]["Total Real"]) + valorReal;
dt.Rows[dt.Rows.Count - 1]["Desvio Plan"] = 0;
if (Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1]["Total Plan"]) > 0)
{
dt.Rows[dt.Rows.Count - 1]["Desvio Plan"] = (Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1]["Total Real"]) / Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1]["Total Plan"]) - 1) * 100;
}
dt.AcceptChanges();
}
return dt;
}
public static DataSet FinancieroDs(string IdPeriodo, string TipoReporte, string ListaClientes, CedEntidades.Sesion Sesion, out List<CedForecastEntidades.Advertencia> Advertencias)
{
Advertencias = new List<CedForecastEntidades.Advertencia>();
//Validacion de parámetros
if (ListaClientes == String.Empty)
{
throw new Microsoft.ApplicationBlocks.ExceptionManagement.Validaciones.ValorNoInfo("Cliente(s)");
}
//Leer datos Forecast
CedForecastDB.Forecast db = new CedForecastDB.Forecast(Sesion);
DataSet ds = db.LeerDatosParaFinancieroDs(IdPeriodo, TipoReporte, ListaClientes);
DataTable dtZona = new DataTable();
switch (TipoReporte)
{
case "Zona-Cliente":
dtZona = ds.Tables[0].Copy();
break;
}
DataTable dtClientes = ds.Tables[1].Copy();
DataTable dtDatos = ds.Tables[2].Copy();
DataTable dtDatosT = ds.Tables[3].Copy();
//Creamos el DataSet con modificaciones de campos para la Grilla.
ds = new DataSet();
ds.Tables.Add(dtZona);
ds.Tables[0].TableName = "Finan1";
ds.Tables.Add(dtClientes);
ds.Tables[1].TableName = "Finan2";
//Leer datos Bejerman
List<CedForecastEntidades.Bejerman.Zona> zonas = new CedForecastDB.Bejerman.Zona(Sesion).LeerLista();
List<CedForecastEntidades.Bejerman.Clientes> clientes = new CedForecastDB.Bejerman.Clientes(Sesion).LeerLista();
DataTable dt = new DataTable();
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Zona"])); //Zona
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Cliente"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["TipoDato"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Descripcion"]));
dt.Columns.Add(ClonarColumna(dtDatos.Columns["FecVto"]));
DateTime fechaInicio = Convert.ToDateTime("01/" + IdPeriodo.Substring(4, 2) + "/" + IdPeriodo.Substring(0, 4));
DateTime periodoColumna = fechaInicio;
for (int i = 0; i < 12; i++)
{
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Saldo"], " " + periodoColumna.ToString("MM-yyyy"), " " + periodoColumna.ToString("MM-yyyy")));
periodoColumna = periodoColumna.AddMonths(1);
}
dt.Columns.Add(ClonarColumna(dtDatos.Columns["Saldo"], "Total Saldo", "Total Saldo"));
//Llenar crosstab
string claveAnterior = String.Empty;
for (int i = 0; i < dtDatos.Rows.Count; i++)
{
//Zona
DataRow dr = dt.NewRow();
CedForecastEntidades.Bejerman.Zona zona = zonas.Find(delegate(CedForecastEntidades.Bejerman.Zona c) { return c.Zon_Cod == Convert.ToString(dtDatos.Rows[i]["Zona"]); });
if (zona == null)
{
dr["Zona"] = Convert.ToString(dtDatos.Rows[i]["Zona"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-01", "Descripción no encontrada para la zona " + Convert.ToString(dtDatos.Rows[i]["Zona"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Zona"] = Convert.ToString(dtDatos.Rows[i]["Zona"]) + "-" + zona.Zon_Desc;
}
//Cliente
CedForecastEntidades.Bejerman.Clientes cliente = clientes.Find(delegate(CedForecastEntidades.Bejerman.Clientes c) { return c.Cli_Cod == Convert.ToString(dtDatos.Rows[i]["Cliente"]); });
if (cliente == null)
{
dr["Cliente"] = Convert.ToString(dtDatos.Rows[i]["Cliente"]) + "-<<<Desconocido>>>";
Advertencias.Add(new CedForecastEntidades.Advertencia("CTabAC-02", "Descripción no encontrada para el cliente " + Convert.ToString(dtDatos.Rows[i]["Cliente"]), CedForecastEntidades.Advertencia.TipoSeveridad.Advertencia));
}
else
{
dr["Cliente"] = Convert.ToString(dtDatos.Rows[i]["Cliente"]); // + "-" + cliente.Cli_RazSoc;
}
dr["FecVto"] = Convert.ToString(dtDatos.Rows[i]["FecVto"]);
dr["TipoDato"] = Convert.ToString(dtDatos.Rows[i]["TipoDato"]);
dr["Descripcion"] = Convert.ToString(dtDatos.Rows[i]["Descripcion"]);
dt.Rows.Add(dr);
decimal valor = Convert.ToDecimal(dtDatos.Rows[i]["Saldo"]);
string periodo = Convert.ToDateTime(dtDatos.Rows[i]["FecVto"]).ToString("MM-yyyy");
if (Convert.ToInt32(Convert.ToDateTime(dtDatos.Rows[i]["FecVto"]).ToString("yyyyMM")) < Convert.ToInt32(fechaInicio.ToString("yyyyMM")))
{
if (dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")] = "0";
}
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.ToString("MM-yyyy")]) + valor;
}
else if (Convert.ToInt32(Convert.ToDateTime(dtDatos.Rows[i]["FecVto"]).ToString("yyyyMM")) > Convert.ToInt32(fechaInicio.AddMonths(11).ToString("yyyyMM")))
{
if (dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")] = "0";
}
dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1][" " + fechaInicio.AddMonths(11).ToString("MM-yyyy")]) + valor;
}
else
{
if (dt.Rows[dt.Rows.Count - 1][" " + periodo].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1][" " + periodo] = "0";
}
dt.Rows[dt.Rows.Count - 1][" " + periodo] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1][" " + periodo]) + valor;
}
if (dt.Rows[dt.Rows.Count - 1]["Total Saldo"].ToString() == "")
{
dt.Rows[dt.Rows.Count - 1]["Total Saldo"] = "0";
}
dt.Rows[dt.Rows.Count - 1]["Total Saldo"] = Convert.ToDecimal(dt.Rows[dt.Rows.Count - 1]["Total Saldo"]) + valor;
dt.AcceptChanges();
}
ds.Tables.Add(dt);
ds.Tables[2].TableName = "Finan3";
//Agregar un fila por Zona / Cliente para informar el Forecast
DateTime fechaHasta = fechaInicio.AddMonths(12).AddDays(-1);
DataTable dtForecast = LeerDatosForecastParaFinancieroDS(fechaInicio.ToString("yyyyMM"), fechaHasta.ToString("yyyyMM"), ListaClientes, Advertencias, Sesion);
//Buscar Cliente, para agregar los datos del forecast para el TipoDato = 'CtaCte'.
for (int i = 0; i < dtForecast.Rows.Count; i++)
{
DataRow[] drFind = dt.Select("Zona = '" + dtForecast.Rows[i]["Zona"] + "' and Cliente = '" + dtForecast.Rows[i]["Cliente"] + "' and TipoDato = '" + "CtaCte" + "' and Descripcion = '" + "Forecast" + "'");
if (drFind.Length == 0)
{
DataRow nuevoRegistro = dt.NewRow();
nuevoRegistro["Zona"] = dtForecast.Rows[i]["Zona"];
nuevoRegistro["Cliente"] = dtForecast.Rows[i]["Cliente"];
nuevoRegistro["TipoDato"] = "CtaCte";
nuevoRegistro["Descripcion"] = "Forecast";
string periodo = dtForecast.Rows[i]["Periodo"].ToString().Substring(4, 2) + "-" + dtForecast.Rows[i]["Periodo"].ToString().Substring(0, 4);
nuevoRegistro[" " + periodo] = dtForecast.Rows[i]["Valor"];
dt.Rows.Add(nuevoRegistro);
//Buscar si existe la zona
DataRow[] drFindFinan1 = ds.Tables[0].Select("Zona = '" + dtForecast.Rows[i]["Zona"] + "'");
if (drFindFinan1.Length == 0)
{
DataRow nuevoRegistroFinan1 = ds.Tables[0].NewRow();
nuevoRegistroFinan1["Zona"] = dtForecast.Rows[i]["Zona"].ToString();
ds.Tables[0].Rows.Add(nuevoRegistroFinan1);
}
//Buscar si existe el zona / cliente
DataRow[] drFindFinan2 = ds.Tables[1].Select("Zona = '" + dtForecast.Rows[i]["Zona"] + "' and Cliente = '" + dtForecast.Rows[i]["Cliente"] + "'");
if (drFindFinan2.Length == 0)
{
DataRow nuevoRegistroFinan2 = ds.Tables[1].NewRow();
nuevoRegistroFinan2["Zona"] = dtForecast.Rows[i]["Zona"].ToString();
nuevoRegistroFinan2["Cliente"] = dtForecast.Rows[i]["Cliente"].ToString();
nuevoRegistroFinan2["Nombre"] = dtForecast.Rows[i]["Nombre"].ToString();
ds.Tables[1].Rows.Add(nuevoRegistroFinan2);
}
}
else if (drFind.Length == 1)
{
drFind[0]["Zona"] = dtForecast.Rows[i]["Zona"];
drFind[0]["Cliente"] = dtForecast.Rows[i]["Cliente"];
drFind[0]["TipoDato"] = "CtaCte";
drFind[0]["Descripcion"] = "Forecast";
string periodo = dtForecast.Rows[i]["Periodo"].ToString().Substring(4, 2) + "-" + dtForecast.Rows[i]["Periodo"].ToString().Substring(0, 4);
if (drFind[0][" " + periodo].ToString() != "")
{
drFind[0][" " + periodo] = Convert.ToDecimal(drFind[0][" " + periodo]) + Convert.ToDecimal(dtForecast.Rows[i]["Valor"]);
}
else
{
drFind[0][" " + periodo] = Convert.ToDecimal(dtForecast.Rows[i]["Valor"]);
}
dt.AcceptChanges();
}
}
DataTable dtCopy = ds.Tables[1].Copy();
DataRow[] drows = dtCopy.Select("", "CLIENTE ASC");
ds.Tables[1].Clear();
for (int i = 0; i < drows.Length; i++)
{
DataRow drow = ds.Tables[1].NewRow();
drow[0] = drows[i][0].ToString();
drow[1] = drows[i][1].ToString();
drow[2] = drows[i][2].ToString();
ds.Tables[1].Rows.Add(drow);
}
ds.Tables.Add(dtDatosT);
ds.Tables[3].TableName = "Finan4";
ds.Relations.Add("Finan1_Finan2", ds.Tables["Finan1"].Columns["Zona"], ds.Tables["Finan2"].Columns["Zona"]);
ds.Relations.Add("Finan2_Finan3", ds.Tables["Finan2"].Columns["Cliente"], ds.Tables["Finan3"].Columns["Cliente"]);
ds.Relations.Add("Finan2_Finan4", ds.Tables["Finan2"].Columns["Cliente"], ds.Tables["Finan4"].Columns["Cliente"]);
return ds;
}