public Listar_Datos_Formulario_Form(FORMULARIO form, int selectIndex)
{
InitializeComponent();
specie = new SpeciesBL(Program.ContextData);
quality = new QualityBL(Program.ContextData);
state = new StateBL(Program.ContextData);
notimberLine = new NonTimberLineBL(Program.ContextData);
inventoryLine = new InventoryLineBL (Program.ContextData);
regenerationLine = new RegenerationLineBL(Program.ContextData);
this.form = form;
especieBS.DataSource = specie.GetSpecies();
calidadBS.DataSource = quality.GetQualities();
estadoSanitarioBS.DataSource = state.GetStates();
lineaInventarioBS.DataSource = form.LINEAINVENTARIO.Count == 0 ? new List<LINEAINVENTARIO>() : form.LINEAINVENTARIO;
lineaInventarioDGW.DataSource = lineaInventarioBS;
regeneracionBS.DataSource = form.LINEAREGENERACION.Count == 0 ? new List<LINEAREGENERACION>() : form.LINEAREGENERACION;
regeneracionDGW.DataSource = regeneracionBS;
noMaderablesBS.DataSource = form.LINEANOMADERABLES.Count == 0 ? new List<LINEANOMADERABLES>() : form.LINEANOMADERABLES;
noMaderablesDGW.DataSource = noMaderablesBS;
criterioInvCbx.SelectedIndex = 0;
criterioNoMaderCbx.SelectedIndex = 0;
criterioRegenCbx.SelectedIndex = 0;
lineasTab.SelectedIndex = selectIndex;
}
public Crear_Editar_Formulario_Form(FORMULARIO f)
{
InitializeComponent();
modified = false;
if (f == null) newForm = new FORMULARIO();
else newForm = f;
project = new ProjectBL(Program.ContextData);
species = new SpeciesBL(Program.ContextData);
stratums = new StratumBL(Program.ContextData);
quality = new QualityBL(Program.ContextData);
state = new StateBL(Program.ContextData);
form = new FormBL(Program.ContextData);
lineInv = new InventoryLineBL(Program.ContextData);
lineRegen = new RegenerationLineBL(Program.ContextData);
lineNonTimber = new NonTimberLineBL(Program.ContextData);
typeUses = new TypeUseBL(Program.ContextData);
int countEspecies = ((PROYECTO)Program.Cache.Get("project")).ESPECIE.ToList().Count;
if (countEspecies != 0) especieBS.DataSource = ((PROYECTO)Program.Cache.Get("project")).ESPECIE.ToList().OrderBy(e => e.NOMCOMUN);
else
{
MessageBox.Show("No existen especies asociadas a este proyecto, seleccione uno o mas especies.", "Parametros insuficiente.", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.Close();
}
List<ESTRATO> listStratums = new List<ESTRATO>();
foreach(LISTADODEESTRATOS list in ((PROYECTO)Program.Cache.Get("project")).LISTADODEESTRATOS)
{
listStratums.Add(list.ESTRATO);
}
estratoBS.DataSource =listStratums;
if (estratoBS.Count != 0) estratoCbx.SelectedItem = (ESTRATO)estratoBS.Current;
else estratoBS.Add(new ESTRATO() { DESCRIPESTRATO = "Diseño muestral simple." });
calidadBS.DataSource = quality.GetQualities();
estadoSanitarioBS.DataSource = state.GetStates();
tipoUsoBS.DataSource=typeUses.GetTypeUse();
tipoDeUsosLbc.DataSource = tipoUsoBS;
tipoDeUsosLbc.DisplayMember ="DESCRIPCION";
tipoDeUsosLbc.ValueMember = "NOMBRETIPOUSO";
List<KeyValuePair<string, string>> data = new List<KeyValuePair<string, string>>();
data.Add(new KeyValuePair<string, string>("BFB", "Bifurcacion Abajo de la A.P."));
data.Add(new KeyValuePair<string, string>("NBF", "Ninguna Bifurcacion"));
tipoArbolCbx.DataSource = data;
tipoArbolCbx.DisplayMember = "Value";
tipoArbolCbx.ValueMember = "Key";
tipoArbolCbx.SelectedValue = "NBF";
newLineNoTimber = new LINEANOMADERABLES();
if (f == null)
{
noMaderableBS.DataSource = new List<LINEANOMADERABLES>();
regeneracionBS.DataSource = new List<LINEAREGENERACION>();
lineaInvBS.DataSource = new List<LINEAINVENTARIO>();
USUARIO user = (USUARIO)Program.Cache.Get("user");
PROYECTO p = (PROYECTO)Program.Cache.Get("project");
responsableTxt.Text = user.NOMBRES + " " + user.APELLIDOS;
proyectoTxt.Text = p.LUGAR;
}
else
{
noMaderableBS.DataSource = newForm.LINEANOMADERABLES.ToList();
regeneracionBS.DataSource = newForm.LINEAREGENERACION.ToList();
lineaInvBS.DataSource = newForm.LINEAINVENTARIO.ToList();
responsableTxt.Text = f.USUARIO.NOMBRES + " " + f.USUARIO.APELLIDOS;
proyectoTxt.Text = f.PROYECTO.LUGAR;
datosTabControl.Enabled = true;
guardarformularioBtn.Text = "Actualizar formulario";
finalDpk.Enabled = true;
finalDpk.Value = (System.DateTime)newForm.HORAFINAL;
inicioDpk.Enabled = false;
this.Text = "Editando formulario e introduciendo datos";
lineaInvBS.AddNew();
regeneracionBS.AddNew();
noMaderableBS.AddNew();
}
PROYECTO py = (PROYECTO)Program.Cache.Get("project");
if (py.TIPODISENOMUESTRAL.NOMTIPODISEMUEST.ToString() == "SI")
{
estratoCbx.Enabled = false;
}
if(f!=null)formularioBS.DataSource = f;
else formularioBS.DataSource = newForm;
modified = true;
}
public void importarExcelFuncional(ToolStripProgressBar bar)
{
try
{
bar.Visible = true;
OpenFileDialog fichero = new OpenFileDialog();
fichero.Filter = "Excel (*.xls)|*.xls;*.xlsx";
//ArrayList lstDatos = new ArrayList(); ;
stratum = new ESTRATO();
ProjectBL pyBl = new ProjectBL(Program.ContextData);
FormBL formBl = new FormBL(Program.ContextData);
InventoryLineBL lineInvBl = new InventoryLineBL(Program.ContextData);
listStratumsAdded = new ArrayList();
USUARIO user = (USUARIO)Program.Cache.Get("user");
if (user != null)
{
try
{
if (fichero.ShowDialog() == System.Windows.Forms.DialogResult.OK)
{
//PROYECTO project;
//PROYECTO py = pyBl.GetProject(project.NROPROY);
bar.Visible = true;
bar.Value = 0;
//declaramos las variables que necesitamos para poder abrir un archivo excel
excel.Application aplicacion;
excel.Workbook libros_trabajo;
excel.Worksheet hojas_trabajo;
excel.Range exlRange;
aplicacion = new excel.Application();
//Asignamos el libro que sera abierot
libros_trabajo = aplicacion.Workbooks.Open(fichero.FileName, 0, true, 5, "", "", true, excel.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);
hojas_trabajo = (excel.Worksheet)libros_trabajo.Worksheets.get_Item(3);
exlRange = hojas_trabajo.UsedRange;
//Recorremos el archivo excel como si fuera una matriz
//leemos los proyectos que se encuentran en la hoja
bar.Maximum = exlRange.Rows.Count - 2;
for (int i = 2; i <= exlRange.Rows.Count; i++)
{
string lugar = "" + (exlRange.Cells[i, 1] as excel.Range).Value + "";
string tamanioParcela = "" + (exlRange.Cells[i, 2] as excel.Range).Value + "";
string tamanioSupTotal = "" + (exlRange.Cells[i, 3] as excel.Range).Value + "";
string areaderegeneracion = "" + (exlRange.Cells[i, 4] as excel.Range).Value + "";
string factorForma = "" + (exlRange.Cells[i, 5] as excel.Range).Value + "";
//string numeroEtapas = "" + (exlRange.Cells[i, 6] as excel.Range).Value + "";
string descripcion = "" + (exlRange.Cells[i, 7] as excel.Range).Value + "";
string TipoDisenio = "" + (exlRange.Cells[i, 8] as excel.Range).Value + "";
string Objetivo = "" + (exlRange.Cells[i, 9] as excel.Range).Value + "";
string confianza = "" + (exlRange.Cells[i, 10] as excel.Range).Value + "";
if (pyBl.GetProjectByPlace(lugar) == null)
{
// area muestreada = multiplicar el numero de parcelas por el tamaño de la parcela
// intensidad de muestreo = dividir el area muestreada entre el tamaño total del area a muestrear
PROYECTO py = new PROYECTO();
py.NROPROY = Guid.NewGuid();
py.LUGAR = lugar;
decimal tam = 0, factor = 0, tamSupTotal = 0, conf = 0;
int areaReg = 0;
decimal.TryParse(tamanioParcela.Replace(".", ","), out tam);
py.TAMANO = tam;
decimal.TryParse(tamanioSupTotal.Replace(".", ","), out tamSupTotal);
py.SUPTOT = tamSupTotal;
int.TryParse(areaderegeneracion, out areaReg);
py.AREAFUSTALESPORPARCELA = areaReg;
decimal.TryParse(factorForma.Replace(".", ","), out factor);
py.FACTORDEFORMA = factor;
py.ETAPA = 0;
py.DESCRIPCION = descripcion;
decimal.TryParse(confianza.Replace(".", ","), out conf);
py.CONFIANZA = conf;
TypeSampleDesignBl desingType = new TypeSampleDesignBl(Program.ContextData);
ObjectiveInventoryBL objInvBl = new ObjectiveInventoryBL(Program.ContextData);
if (TipoDisenio.Equals("Estratificado")) py.NOMTIPODISEMUEST = "ES";
else if (TipoDisenio.Equals("Simple")) py.NOMTIPODISEMUEST = "SI";
if (Objetivo.Equals("Maderable")) py.NOMBRETIPOINV = "MD";
else if (Objetivo.Equals("No Maderable")) py.NOMBRETIPOINV = "NM";
py.FECHA = DateTime.Now;
py.TIPOPROYECTO = "CR";
py.NROFORMULA = Guid.Parse("ED52569E-5CFD-454F-9F8B-9429A47C829F");
py.SUPMUE = 0;
py.INTMUE = 0;
py.LIMITINFDAP = 10;
py.USUARIO = user;
py.NROUSUARIO = user.NROUSUARIO;
pyBl.InsertProject(py);
string result = pyBl.SaveChanges();
if (!result.Equals(""))
{
Error_Form errorForm = new Error_Form(result);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
return;
}
bar.Increment(1);
}
}
exlRange = hojas_trabajo.UsedRange;
this.loadSpecies(bar, 2);
//recorremos el archivo para leer las lineas de inventario que estan en el libro
hojas_trabajo = (excel.Worksheet)libros_trabajo.Worksheets.get_Item(1);
//Definimos el el rango de celdas que seran leidas
exlRange = hojas_trabajo.UsedRange;
int posStratum = 0, posBloque = 0, posNomCom = 0, posFam = 0, posNomCien = 0, posParcela = 0, posCodCal = 0, posNumArb = 0;
//Recorremos el archivo excel como si fuera una matriz
string sValor = "";
posBloque = 1;
posStratum = 2;
posParcela = 3;
posNumArb = 4;
posNomCom = 5;
posNomCien = 6;
posFam = 7;
posCodCal = 11;
sValor = "" + (exlRange.Cells[3, posParcela] as excel.Range).Value + "";
int Numparcera = int.Parse(sValor); // se obtiene el numero de la parcela inicial
//fijar el valor maximo con el numero de registros a insertar en la barra de progreso
bar.Value = 0;
bar.Maximum = exlRange.Rows.Count - 3;
PROYECTO project = new PROYECTO();
form = new FORMULARIO();
string bloque = "" + (exlRange.Cells[3, posBloque] as excel.Range).Value + ""; // obtenemos el numero o nombre del bloque inicial
project = pyBl.GetProjectByPlace(bloque); // obtenermos el proyecto que tiene asociado ese bloque
FormBL FBl = new FormBL(Program.ContextData); //Creamos el BL del formulario
int numParcelas = 0; // operador que se utiliza para contabilizar cuantas parcelas tiene asociadas el proyecto
for (int i = 3; i <= exlRange.Rows.Count; i++)
{
//obtenemos los datos correspodientes a linea de inventario y formulario
string numPar = "" + (exlRange.Cells[i, posParcela] as excel.Range).Value + ""; //obtenemos el numero de la parcela
string nomEst = "" + (exlRange.Cells[i, posStratum] as excel.Range).Value + ""; //obtenermos el nombre del estrato
string numBloque = "" + (exlRange.Cells[i, posBloque] as excel.Range).Value + ""; //obtenermos obtenemos el numero de bloque
//stratum.DESCRIPESTRATO = "" + (exlRange.Cells[i, posStratum] as excel.Range).Value + "";
stratum = new ESTRATO(); // creamos una instancia de estrato
stratum = stratumBl.GetStratumByDescription(nomEst); // fijamos el estrato obtenido de la base de datos con el nomEst
//sql1 = "INSERT INTO FORMULARIO ( NROFORMULARIO, NROUSUARIO, NROPROY, FECHACREACION, LINEA, CODEST, PARCELA) VALUES ( NEWID()," +user.NROUSUARIO+"," +project.NROPROY+"," + +","+linea+",";
//Validamos si estamos en el mismo bloque esto para si se cambio de bloque o proyecto guardarle a este el numero de parcelas, intensidad de muestreo
// y superficie muestreada, al igual que abrir el siguiente proyecto con el valor del bloque
if (!bloque.Equals(numBloque))
{
bloque = numBloque; // fijamos la operador bloque en el bloque en el que se esta ahora
project.SUPMUE = numParcelas * project.TAMANO;
project.INTMUE = (project.SUPMUE / project.SUPTOT) * 100;
pyBl.UpdateProject(project);
string result = pyBl.SaveChanges();
if (!result.Equals(""))
{
Error_Form errorForm = new Error_Form(result);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
return;
}
numParcelas = 0;
project = pyBl.GetProjectByPlace(bloque);
}
//stratum = Program.ContextData.ESTRATO.;
if (stratum == null && nomEst != "" && nomEst != "Estrato simple")
{
stratum = new ESTRATO();
stratum.CODEST = (stratumBl.GetStratums()).Count<ESTRATO>() + 1;
stratum.DESCRIPESTRATO = nomEst;
//stratumBl.InsertStratum(stratum);
}
if (Numparcera != int.Parse(numPar) || i == 3) // se valida si se ha cambiado de numero de parcela esto para crear un nuevo formulario o si se esta en la primera linea para crear el primer formulario
{
numParcelas++;
Numparcera = int.Parse(numPar);
form = new FORMULARIO();
form.NROFORMULARIO = Guid.NewGuid();
form.NROUSUARIO = user.NROUSUARIO;
form.NROPROY = project.NROPROY;
form.FECHACREACION = DateTime.Now;
form.LINEA = int.Parse(numBloque);
form.PARCELA = int.Parse(numPar);
if (stratum == null) form.CODEST = null;
else form.CODEST = stratum.CODEST;
//FBl.InsertForm(form);
}
else
{ // si esta en la misma parcela ahora hay que validar si el estrato esta en null para crearlo
// se valida si se trata de un estrato diferente en la misma parcela entonces se crea un nuevo formulario con ese estrato
if (project.NOMTIPODISEMUEST == "ES")
{
if (form.CODEST != stratum.CODEST)
{
form = new FORMULARIO();
form.NROFORMULARIO = Guid.NewGuid();
form.NROUSUARIO = user.NROUSUARIO;
form.NROPROY = project.NROPROY;
form.FECHACREACION = DateTime.Now;
form.LINEA = int.Parse(numBloque);
form.PARCELA = int.Parse(numPar);
if (stratum == null) form.CODEST = null;
else form.CODEST = stratum.CODEST;
//FBl.InsertForm(form);
}
}
}
project.FORMULARIO.Add(form);// asociammos el formulario a el proyecto
if (project.NOMTIPODISEMUEST == "ES")
{
//Se va asociar el estrato a la lista de estratos del proyecto, validando si este estrato ya se encuentra en la lista entonces no hace nada si no lo agregamos
if (existStratum(stratum, project) == -1)
{
LISTADODEESTRATOS lS = new LISTADODEESTRATOS();
lS.ESTRATO = stratum;
lS.CODEST = stratum.CODEST;
lS.NROPROY = project.NROPROY;
lS.PROYECTO = project;
lS.PESO = this.returnweight(stratum.DESCRIPESTRATO,3); // se lee el excel para saber cual es el peso para ese estrato en ese proyecto
project.LISTADODEESTRATOS.Add(lS);
if (project.LISTADODEESTRATOS.Count >= 2) // cambiamos el tipo de diseño si se tiene en la lista de estratos 2 o mas
{
project.NOMTIPODISEMUEST = "ES";
}
//pyBl.UpdateProject(project);
}
}
// se debe cargar el codigo de la especie por eso se leen los datos de nombre cientifico y comun
string familia = "" + (exlRange.Cells[i, posFam] as excel.Range).Value + "";
string nomCom = "" + (exlRange.Cells[i, posNomCom] as excel.Range).Value + "";
string nomCien = "" + (exlRange.Cells[i, posNomCien] as excel.Range).Value + "";
specie = new ESPECIE();
//se busca la especie por nombre cientifico y nombre comun si no se encuentra una especie se crea con los valores
specie = specieBl.GetSpecieByComNameAndScienName(nomCom, nomCien);
if (specie == null)
{
specie = new ESPECIE();
specie.CODESP = Guid.NewGuid();
//specie.DIAMMINCORTE = 0;
specie.FAMILIA = familia;
specie.GRUPOCOM = "SV";
specie.NOMCIENTIFICO = nomCien;
specie.NOMCOMUN = nomCom;
//specieBl.InsertSpecie(specie);
}
//Se verifica el listado de las especies asociadas a el proyecto si la especie ya esta en la list no se hace nada si no esta se agrega
if (!project.ESPECIE.Contains(specie))
{
project.ESPECIE.Add(specie);
//pyBl.UpdateProject(project);// se manda a actualizar el proyecto porque se modifico la lista de especies
}
//Se van a cargar los datos de la linea de inventario
string numArb = "" + (exlRange.Cells[i, posNumArb] as excel.Range).Value + "";
LINEAINVENTARIO lineInv = new LINEAINVENTARIO();
lineInv.LINEAINV = Guid.NewGuid();
lineInv.NROFORMULARIO = form.NROFORMULARIO;
lineInv.CODESP = specie.CODESP;
lineInv.ESTADO = "AS";
int numArbol = -1;
bool band = int.TryParse(numArb, out numArbol);
if (int.TryParse(numArb, out numArbol))
{
lineInv.NROARB = numArbol;
lineInv.TIPOARBOL = "NBF";
}
else
{
int.TryParse(numArb.Remove(numArb.Length - 1), out numArbol);
lineInv.NROARB = numArbol;
lineInv.TIPOARBOL = "BFB";
}
int j = 8;
decimal cap = 0, altCom = 0, altTot = 0;
if (Decimal.TryParse(((exlRange.Cells[i, j] as excel.Range).Value + "").Replace(".", ","), out cap)) lineInv.CAP = cap;
if (Decimal.TryParse(((exlRange.Cells[i, j + 1] as excel.Range).Value + "").Replace(".", ","), out altTot)) lineInv.ALTTOT_M = altTot;
if (Decimal.TryParse(((exlRange.Cells[i, j + 2] as excel.Range).Value + "").Replace(".", ","), out altCom)) lineInv.ALTCOMER_M = altCom;
QualityBL quality = new QualityBL(Program.ContextData);
lineInv.CODCALIDAD = (quality.getQualityByDescription("Regular")).CODCALIDAD; // si no se especifica la calidad se la coloca por defecto en regular,
if (("" + (exlRange.Cells[i, j + 3] as excel.Range).Value + "").Equals("x")) lineInv.CODCALIDAD = (quality.getQualityByDescription("Bueno")).CODCALIDAD; //si la calidad es buena
else
if (("" + (exlRange.Cells[i, j + 5] as excel.Range).Value + "").Equals("x")) lineInv.CODCALIDAD = (quality.getQualityByDescription("Malo")).CODCALIDAD;//si la calidad es mala
if (("" + (exlRange.Cells[i, j + 6] as excel.Range).Value + "").Equals("x")) //si la una linea maderable y el uso pertenece a alimenticia
{
LINEANOMADERABLES lineInvNM = new LINEANOMADERABLES();
NonTimberLineBL lineInvNMBl = new NonTimberLineBL(Program.ContextData);
TypeUseBL typeUseBl = new TypeUseBL(Program.ContextData);
lineInvNM.LINEANMAD = Guid.NewGuid();
lineInvNM.NROFORMULARIO = form.NROPROY;
lineInvNM.OBSERVACIONES = "" + (exlRange.Cells[i, j + 9] as excel.Range).Value + "";
form.LINEANOMADERABLES.Add(lineInvNM);
lineInvNM.TIPODEUSO.Add(typeUseBl.GetTypeUse("AL"));
form.LINEANOMADERABLES.Add(lineInvNM);
//lineInvNMBl.InsertNonTimberLine(lineInvNM);
//formBl.UpdateForm(form);
}
else
{
if (("" + (exlRange.Cells[i, j + 7] as excel.Range).Value + "").Equals("x")) //si la una linea maderable y el uso pertenece a artesanal
{
LINEANOMADERABLES lineInvNM = new LINEANOMADERABLES();
NonTimberLineBL lineInvNMBl = new NonTimberLineBL(Program.ContextData);
TypeUseBL typeUseBl = new TypeUseBL(Program.ContextData);
lineInvNM.LINEANMAD = Guid.NewGuid();
lineInvNM.NROFORMULARIO = form.NROPROY;
lineInvNM.OBSERVACIONES = (exlRange.Cells[i, j + 9] as excel.Range).Value + "";
form.LINEANOMADERABLES.Add(lineInvNM);
lineInvNM.TIPODEUSO.Add(typeUseBl.GetTypeUse("AR"));
form.LINEANOMADERABLES.Add(lineInvNM);
//lineInvNMBl.InsertNonTimberLine(lineInvNM);
//formBl.UpdateForm(form);
}
else
{
if (("" + (exlRange.Cells[i, j + 8] as excel.Range).Value + "").Equals("x")) //si la una linea maderable y el uso pertenece a medicinal
{
LINEANOMADERABLES lineInvNM = new LINEANOMADERABLES();
NonTimberLineBL lineInvNMBl = new NonTimberLineBL(Program.ContextData);
TypeUseBL typeUseBl = new TypeUseBL(Program.ContextData);
lineInvNM.LINEANMAD = Guid.NewGuid();
lineInvNM.NROFORMULARIO = form.NROPROY;
lineInvNM.OBSERVACIONES = (exlRange.Cells[i, j + 9] as excel.Range).Value + "";
form.LINEANOMADERABLES.Add(lineInvNM);
lineInvNM.TIPODEUSO.Add(typeUseBl.GetTypeUse("MD"));
form.LINEANOMADERABLES.Add(lineInvNM);
//lineInvNMBl.InsertNonTimberLine(lineInvNM);
//formBl.UpdateForm(form);
}
}
}
lineInv.DAP = lineInv.CAP / Convert.ToDecimal(Math.PI);
lineInv.AREABASAL = (lineInv.DAP * lineInv.DAP) * (Convert.ToDecimal(Math.PI) / 4);
lineInv.VOLTOT = (lineInv.ALTTOT_M * lineInv.AREABASAL * project.FACTORDEFORMA);
lineInv.VOLCOM = (lineInv.ALTCOMER_M * lineInv.AREABASAL * project.FACTORDEFORMA);
form.LINEAINVENTARIO.Add(lineInv);
string result1 = lineInvBl.SaveChanges();
if (!result1.Equals(""))
{
Error_Form errorForm = new Error_Form(result1);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
return;
}
//lineInvBl.InsertInventoryLine(lineInv);
//lineInvBl.SaveChanges();
bar.Increment(1);
//sql = "INSERT INTO LINEAINVENTARIO ( LINEAINV, NROFORMULARIO, CODCALIDAD, ESTADO, CODESP, NROARB, ALTCOMER_M, ALTTOT_M, AREABASAL, VOLCOM, VOLTOT, CAP, DAP, TIPOARBOL) VALUES ( NEWID(), '";
}
if (numParcelas > 0)
{
project.SUPMUE = numParcelas * project.TAMANO;
project.INTMUE = (project.SUPMUE / project.SUPTOT) * 100;
pyBl.UpdateProject(project);
string result = pyBl.SaveChanges();
if (!result.Equals(""))
{
Error_Form errorForm = new Error_Form(result);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
return;
}
numParcelas = 0;
}
MessageBox.Show("Los datos se importaron correctamente", "Operacion exitosa", MessageBoxButtons.OK, MessageBoxIcon.Information);
bar.Visible = false;
//cerramos el libro y la aplicacion
libros_trabajo.Close();
aplicacion.Quit();
}
bar.Visible = false;
}
catch (Exception ex)
{
bar.Visible = false;
Error_Form errorForm = new Error_Form(ex.Message);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
}
}
else MessageBox.Show("Ningun usuario ha iniciado sesion. Por favor inicie session.", "Operacion invalida", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
catch (Exception ex)
{
bar.Visible = false;
Error_Form errorForm = new Error_Form(ex.Message);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
}
}
private void loadInventoryData(ToolStripProgressBar bar, int p)
{
bar.Visible = true;
//recorremos el archivo para leer las lineas de inventario que estan en el libro
hojas_trabajo = (excel.Worksheet)libros_trabajo.Worksheets.get_Item(p);
//Definimos el el rango de celdas que seran leidas
exlRange = hojas_trabajo.UsedRange;
int posStratum = 0, posNomCom = 0, posFam = 0, posNomCien = 0, posParcela = 0, posCodCal = 0, posNumArb = 0;
//Recorremos el archivo excel como si fuera una matriz
string sValor = "";
posStratum = 1;
posParcela = 2;
posNumArb = 3;
posNomCom = 4;
posNomCien = 5;
posFam = 6;
posCodCal = 10;
sValor = "" + (exlRange.Cells[3, posParcela] as excel.Range).Value + "";
int NumParcela = int.Parse(sValor); // se obtiene el numero de la parcela inicial
//fijar el valor maximo con el numero de registros a insertar en la barra de progreso
bar.Value = 0;
bar.Maximum = exlRange.Rows.Count - 2;
form = new FORMULARIO();
FormBL FBl = new FormBL(Program.ContextData); //Creamos el BL del formulario
InventoryLineBL lineInvBl = new InventoryLineBL(Program.ContextData);
int numParcelas = 0; // operador que se utiliza para contabilizar cuantas parcelas tiene asociadas el proyecto
for (int i = 3; i <= exlRange.Rows.Count; i++)
{
//obtenemos los datos correspodientes a linea de inventario y formulario
string numPar = "" + (exlRange.Cells[i, posParcela] as excel.Range).Value + ""; //obtenemos el numero de la parcela
string nomEst = "" + (exlRange.Cells[i, posStratum] as excel.Range).Value + ""; //obtenermos el nombre del estrato
//stratum.DESCRIPESTRATO = "" + (exlRange.Cells[i, posStratum] as excel.Range).Value + "";
stratum = new ESTRATO(); // creamos una instancia de estrato
stratum = stratumBl.GetStratumByDescription(nomEst); // fijamos el estrato obtenido de la base de datos con el nomEst
//sql1 = "INSERT INTO FORMULARIO ( NROFORMULARIO, NROUSUARIO, NROPROY, FECHACREACION, LINEA, CODEST, PARCELA) VALUES ( NEWID()," +user.NROUSUARIO+"," +project.NROPROY+"," + +","+linea+",";
//Validamos si estamos en el mismo bloque esto para si se cambio de bloque o proyecto guardarle a este el numero de parcelas, intensidad de muestreo
// y superficie muestreada, al igual que abrir el siguiente proyecto con el valor del bloque
//stratum = Program.ContextData.ESTRATO.;
if (stratum == null && nomEst != "" && nomEst != "Estrato simple")
{
stratum = new ESTRATO();
stratum.CODEST = (stratumBl.GetStratums()).Count<ESTRATO>() + 1;
stratum.DESCRIPESTRATO = nomEst;
//stratumBl.InsertStratum(stratum);
}
if (NumParcela != int.Parse(numPar) || i == 3) // se valida si se ha cambiado de numero de parcela esto para crear un nuevo formulario o si se esta en la primera linea para crear el primer formulario
{
numParcelas++;
NumParcela = int.Parse(numPar);
form = new FORMULARIO();
form.NROFORMULARIO = Guid.NewGuid();
form.NROUSUARIO = user.NROUSUARIO;
form.NROPROY = newProject.NROPROY;
form.FECHACREACION = DateTime.Now;
form.LINEA = NumParcela;
form.PARCELA = int.Parse(numPar);
if (stratum == null) form.CODEST = null;
else form.CODEST = stratum.CODEST;
}
else
{ // si esta en la misma parcela ahora hay que validar si el estrato esta en null para crearlo
// se valida si se trata de un estrato diferente en la misma parcela entonces se crea un nuevo formulario con ese estrato
if (newProject.NOMTIPODISEMUEST == "ES")
{
if (form.CODEST != stratum.CODEST)
{
form = new FORMULARIO();
form.NROFORMULARIO = Guid.NewGuid();
form.NROUSUARIO = user.NROUSUARIO;
form.NROPROY = newProject.NROPROY;
form.FECHACREACION = DateTime.Now;
form.LINEA = NumParcela;
form.PARCELA = int.Parse(numPar);
if (stratum == null) form.CODEST = null;
else form.CODEST = stratum.CODEST;
}
}
}
newProject.FORMULARIO.Add(form);// asociammos el formulario a el proyecto
if (newProject.NOMTIPODISEMUEST == "ES")
{
//Se va asociar el estrato a la lista de estratos del proyecto, validando si este estrato ya se encuentra en la lista entonces no hace nada si no lo agregamos
if (existStratum(stratum, newProject) == -1)
{
LISTADODEESTRATOS lS = new LISTADODEESTRATOS();
lS.ESTRATO = stratum;
lS.CODEST = stratum.CODEST;
lS.NROPROY = newProject.NROPROY;
lS.PROYECTO = newProject;
lS.TAMANOMUESTRA = this.returnweight(stratum.DESCRIPESTRATO, 3); // se lee el excel para saber cual es el peso para ese estrato en ese proyecto
newProject.LISTADODEESTRATOS.Add(lS);
if (newProject.LISTADODEESTRATOS.Count > 1) // cambiamos el tipo de diseño si se tiene en la lista de estratos 2 o mas
{
newProject.NOMTIPODISEMUEST = "ES";
}
//pyBl.UpdateProject(project);
}
}
// se debe cargar el codigo de la especie por eso se leen los datos de nombre cientifico y comun
string familia = "" + (exlRange.Cells[i, posFam] as excel.Range).Value + "";
string nomCom = "" + (exlRange.Cells[i, posNomCom] as excel.Range).Value + "";
string nomCien = "" + (exlRange.Cells[i, posNomCien] as excel.Range).Value + "";
specie = new ESPECIE();
//se busca la especie por nombre cientifico y nombre comun si no se encuentra una especie se crea con los valores
specie = specieBl.GetSpecieByComNameAndScienName(nomCom, nomCien);
if (specie == null)
{
specie = new ESPECIE();
specie.CODESP = Guid.NewGuid();
//specie.DIAMMINCORTE = 0;
specie.FAMILIA = familia;
specie.GRUPOCOM = "SV";
specie.NOMCIENTIFICO = nomCien;
specie.NOMCOMUN = nomCom;
//specieBl.InsertSpecie(specie);
}
//Se verifica el listado de las especies asociadas a el proyecto si la especie ya esta en la list no se hace nada si no esta se agrega
if (!newProject.ESPECIE.Contains(specie))
{
newProject.ESPECIE.Add(specie);
//pyBl.UpdateProject(project);// se manda a actualizar el proyecto porque se modifico la lista de especies
}
//Se van a cargar los datos de la linea de inventario
string numArb = "" + (exlRange.Cells[i, posNumArb] as excel.Range).Value + "";
LINEAINVENTARIO lineInv = new LINEAINVENTARIO();
lineInv.LINEAINV = Guid.NewGuid();
lineInv.NROFORMULARIO = form.NROFORMULARIO;
lineInv.CODESP = specie.CODESP;
lineInv.ESTADO = "AS";
int numArbol = -1;
bool band = int.TryParse(numArb, out numArbol);
if (int.TryParse(numArb, out numArbol))
{
lineInv.NROARB = numArbol;
lineInv.TIPOARBOL = "NBF";
}
else
{
int.TryParse(numArb.Remove(numArb.Length - 1), out numArbol);
lineInv.NROARB = numArbol;
lineInv.TIPOARBOL = "BFB";
}
int j = 7;
decimal cap = 0, altCom = 0, altTot = 0;
if (Decimal.TryParse(((exlRange.Cells[i, j] as excel.Range).Value + "").Replace(".", ","), out cap)) lineInv.CAP = cap;
if (Decimal.TryParse(((exlRange.Cells[i, j + 1] as excel.Range).Value + "").Replace(".", ","), out altTot)) lineInv.ALTTOT_M = altTot;
if (Decimal.TryParse(((exlRange.Cells[i, j + 2] as excel.Range).Value + "").Replace(".", ","), out altCom)) lineInv.ALTCOMER_M = altCom;
QualityBL quality = new QualityBL(Program.ContextData);
lineInv.CODCALIDAD = (quality.getQualityByDescription("Regular")).CODCALIDAD; // si no se especifica la calidad se la coloca por defecto en regular,
if (("" + (exlRange.Cells[i, j + 3] as excel.Range).Value + "").Equals("x")) lineInv.CODCALIDAD = (quality.getQualityByDescription("Bueno")).CODCALIDAD; //si la calidad es buena
else
if (("" + (exlRange.Cells[i, j + 5] as excel.Range).Value + "").Equals("x")) lineInv.CODCALIDAD = (quality.getQualityByDescription("Malo")).CODCALIDAD;//si la calidad es mala
if (("" + (exlRange.Cells[i, j + 6] as excel.Range).Value + "").Equals("x")) //si la una linea maderable y el uso pertenece a alimenticia
{
LINEANOMADERABLES lineInvNM = new LINEANOMADERABLES();
NonTimberLineBL lineInvNMBl = new NonTimberLineBL(Program.ContextData);
TypeUseBL typeUseBl = new TypeUseBL(Program.ContextData);
lineInvNM.LINEANMAD = Guid.NewGuid();
lineInvNM.NROFORMULARIO = form.NROPROY;
lineInvNM.OBSERVACIONES = "" + (exlRange.Cells[i, j + 9] as excel.Range).Value + "";
form.LINEANOMADERABLES.Add(lineInvNM);
lineInvNM.TIPODEUSO.Add(typeUseBl.GetTypeUse("AL"));
form.LINEANOMADERABLES.Add(lineInvNM);
//lineInvNMBl.InsertNonTimberLine(lineInvNM);
//formBl.UpdateForm(form);
}
else
{
if (("" + (exlRange.Cells[i, j + 7] as excel.Range).Value + "").Equals("x")) //si la una linea maderable y el uso pertenece a artesanal
{
LINEANOMADERABLES lineInvNM = new LINEANOMADERABLES();
NonTimberLineBL lineInvNMBl = new NonTimberLineBL(Program.ContextData);
TypeUseBL typeUseBl = new TypeUseBL(Program.ContextData);
lineInvNM.LINEANMAD = Guid.NewGuid();
lineInvNM.NROFORMULARIO = form.NROPROY;
lineInvNM.OBSERVACIONES = (exlRange.Cells[i, j + 9] as excel.Range).Value + "";
form.LINEANOMADERABLES.Add(lineInvNM);
lineInvNM.TIPODEUSO.Add(typeUseBl.GetTypeUse("AR"));
form.LINEANOMADERABLES.Add(lineInvNM);
//lineInvNMBl.InsertNonTimberLine(lineInvNM);
//formBl.UpdateForm(form);
}
else
{
if (("" + (exlRange.Cells[i, j + 8] as excel.Range).Value + "").Equals("x")) //si la una linea maderable y el uso pertenece a medicinal
{
LINEANOMADERABLES lineInvNM = new LINEANOMADERABLES();
NonTimberLineBL lineInvNMBl = new NonTimberLineBL(Program.ContextData);
TypeUseBL typeUseBl = new TypeUseBL(Program.ContextData);
lineInvNM.LINEANMAD = Guid.NewGuid();
lineInvNM.NROFORMULARIO = form.NROPROY;
lineInvNM.OBSERVACIONES = (exlRange.Cells[i, j + 9] as excel.Range).Value + "";
form.LINEANOMADERABLES.Add(lineInvNM);
lineInvNM.TIPODEUSO.Add(typeUseBl.GetTypeUse("MD"));
form.LINEANOMADERABLES.Add(lineInvNM);
//lineInvNMBl.InsertNonTimberLine(lineInvNM);
//formBl.UpdateForm(form);
}
}
}
lineInv.DAP = lineInv.CAP / Convert.ToDecimal(Math.PI);
lineInv.AREABASAL = (lineInv.DAP * lineInv.DAP) * (Convert.ToDecimal(Math.PI) / 4);
lineInv.VOLTOT = (lineInv.ALTTOT_M * lineInv.AREABASAL * newProject.FACTORDEFORMA);
lineInv.VOLCOM = (lineInv.ALTCOMER_M * lineInv.AREABASAL * newProject.FACTORDEFORMA);
form.LINEAINVENTARIO.Add(lineInv);
string result1 = lineInvBl.SaveChanges();
if (!result1.Equals(""))
{
Error_Form errorForm = new Error_Form(result1);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
return;
}
//lineInvBl.InsertInventoryLine(lineInv);
//lineInvBl.SaveChanges();
bar.Increment(1);
}
if (numParcelas > 0)
{
newProject.SUPMUE = numParcelas * newProject.TAMANO;
newProject.INTMUE = (newProject.SUPMUE / newProject.SUPTOT) * 100;
pyBl.UpdateProject(newProject);
string result = pyBl.SaveChanges();
if (!result.Equals(""))
{
Error_Form errorForm = new Error_Form(result);
ToolStrip menu = bar.GetCurrentParent();
Principal_Form parent = (Principal_Form)menu.Parent;
errorForm.MdiParent = (Form)parent;
errorForm.Show();
return;
}
numParcelas = 0;
}
MessageBox.Show("Los datos se importaron correctamente", "Operacion exitosa", MessageBoxButtons.OK, MessageBoxIcon.Information);
bar.Visible = false;
}