public SilviculturaSilvicultVM(SilviculturaSilvicult caracterizacao, List <Lista> tipoCultivo, List <Lista> tipoGeometria, bool isVisualizar = false)
{
Caracterizacao = caracterizacao;
IsVisualizar = isVisualizar;
TipoCultura = ViewModelHelper.CriarSelectList(tipoCultivo, true, true);
GeometriaTipo = ViewModelHelper.CriarSelectList(tipoGeometria, true, true, caracterizacao.GeometriaTipo.ToString());
}
public Silvicultura MergiarGeo(Silvicultura caracterizacaoAtual)
{
Silvicultura dadosGeo = ObterDadosGeo(caracterizacaoAtual.EmpreendimentoId);
caracterizacaoAtual.Dependencias = _busCaracterizacao.ObterDependenciasAtual(caracterizacaoAtual.EmpreendimentoId, eCaracterizacao.Silvicultura, eCaracterizacaoDependenciaTipo.Caracterizacao);
caracterizacaoAtual.Areas = dadosGeo.Areas;
foreach (SilviculturaSilvicult silvicultura in dadosGeo.Silviculturas)
{
if (!caracterizacaoAtual.Silviculturas.Exists(x => x.Identificacao == silvicultura.Identificacao))
{
caracterizacaoAtual.Silviculturas.Add(silvicultura);
}
}
List <SilviculturaSilvicult> silviculturasRemover = new List <SilviculturaSilvicult>();
foreach (SilviculturaSilvicult silvicultura in caracterizacaoAtual.Silviculturas)
{
if (!dadosGeo.Silviculturas.Exists(x => x.Identificacao == silvicultura.Identificacao))
{
silviculturasRemover.Add(silvicultura);
continue;
}
else
{
SilviculturaSilvicult silviculturaAux = dadosGeo.Silviculturas.SingleOrDefault(x => x.Identificacao == silvicultura.Identificacao) ?? new SilviculturaSilvicult();
silvicultura.Identificacao = silviculturaAux.Identificacao;
silvicultura.AreaCroqui = silviculturaAux.AreaCroqui;
silvicultura.AreaCroquiHa = silviculturaAux.AreaCroquiHa;
silvicultura.GeometriaTipo = silviculturaAux.GeometriaTipo;
silvicultura.GeometriaTipoTexto = silviculturaAux.GeometriaTipoTexto;
}
}
foreach (SilviculturaSilvicult silvicultura in silviculturasRemover)
{
caracterizacaoAtual.Silviculturas.Remove(silvicultura);
}
return(caracterizacaoAtual);
}
private Silvicultura ObterHistorico(int id, BancoDeDados banco = null, string tid = null, bool simplificado = false)
{
Silvicultura caracterizacao = new Silvicultura();
int hst = 0;
int hstCaracterizacao = 0;
using (BancoDeDados bancoDeDados = BancoDeDados.ObterInstancia(banco))
{
#region Silvicultura
Comando comando = bancoDeDados.CriarComando(@"select c.id, c.empreendimento_id, c.tid
from {0}hst_crt_silvicultura c where c.caracterizacao = :id and c.tid = :tid" , EsquemaBanco);
comando.AdicionarParametroEntrada("id", id, DbType.Int32);
comando.AdicionarParametroEntrada("tid", DbType.String, 36, tid);
using (IDataReader reader = bancoDeDados.ExecutarReader(comando))
{
if (reader.Read())
{
hst = Convert.ToInt32(reader["id"]);
hstCaracterizacao = hst;
caracterizacao.Id = id;
caracterizacao.EmpreendimentoId = Convert.ToInt32(reader["empreendimento_id"]);
caracterizacao.Tid = reader["tid"].ToString();
}
reader.Close();
}
#endregion
if (caracterizacao.Id <= 0 || simplificado)
{
return(caracterizacao);
}
#region Silviculturas
comando = bancoDeDados.CriarComando(@"select c.id, c.silvicultura_silv_id, c.identificacao, c.area_croqui, c.geometria_id, c.geometria_texto, c.tid
from {0}hst_crt_silvicultura_silv c where c.id_hst = :id" , EsquemaBanco);
comando.AdicionarParametroEntrada("id", hst, DbType.Int32);
using (IDataReader reader = bancoDeDados.ExecutarReader(comando))
{
SilviculturaSilvicult silvicultura = null;
while (reader.Read())
{
hst = Convert.ToInt32(reader["id"]);
silvicultura = new SilviculturaSilvicult();
silvicultura.Id = Convert.ToInt32(reader["silvicultura_silv_id"]);
silvicultura.Tid = reader["tid"].ToString();
silvicultura.Identificacao = reader["identificacao"].ToString();
silvicultura.AreaCroqui = reader.GetValue <Decimal>("area_croqui");
silvicultura.GeometriaTipo = Convert.ToInt32(reader["geometria_id"]);
silvicultura.GeometriaTipoTexto = reader["geometria_texto"].ToString();
#region Culturas Florestais
comando = bancoDeDados.CriarComando(@"select c.silvicultura_cult_id id, c.cultura_id, c.cultura_texto,
c.area, c.especificar, c.tid from {0}hst_crt_silvicultura_cult c
where c.id_hst = :id" , EsquemaBanco);
comando.AdicionarParametroEntrada("id", hst, DbType.Int32);
using (IDataReader readerAux = bancoDeDados.ExecutarReader(comando))
{
CulturaFlorestal cultura = null;
while (readerAux.Read())
{
cultura = new CulturaFlorestal();
cultura.Id = Convert.ToInt32(readerAux["id"]);
cultura.CulturaTipo = Convert.ToInt32(readerAux["cultura_id"]);
cultura.CulturaTipoTexto = readerAux["cultura_texto"].ToString();
cultura.Tid = readerAux["tid"].ToString();
if (readerAux["especificar"] != null && !Convert.IsDBNull(readerAux["especificar"]))
{
cultura.EspecificarTexto = readerAux["especificar"].ToString();
cultura.CulturaTipoTexto = cultura.EspecificarTexto;
}
silvicultura.Culturas.Add(cultura);
}
readerAux.Close();
}
#endregion
caracterizacao.Silviculturas.Add(silvicultura);
}
reader.Close();
}
#endregion
#region Áreas
comando = bancoDeDados.CriarComando(@"select a.silvicultura_area_id, a.tipo_id, a.tipo_texto, a.valor, a.tid
from {0}hst_crt_silvicultura_areas a
where a.id_hst = :hst_caracterizacao" , EsquemaBanco);
comando.AdicionarParametroEntrada("hst_caracterizacao", hstCaracterizacao, DbType.Int32);
using (IDataReader readerAux2 = bancoDeDados.ExecutarReader(comando))
{
SilviculturaArea item;
while (readerAux2.Read())
{
item = new SilviculturaArea();
item.Id = Convert.ToInt32(readerAux2["silvicultura_area_id"]);
item.Tid = readerAux2["tid"].ToString();
item.Tipo = Convert.ToInt32(readerAux2["tipo_id"]);
item.TipoTexto = readerAux2["tipo_texto"].ToString();
item.Valor = readerAux2.GetValue <Decimal>("valor");
caracterizacao.Areas.Add(item);
}
readerAux2.Close();
}
#endregion
}
return(caracterizacao);
}
internal Silvicultura ObterDadosGeo(int empreendimento, BancoDeDados banco = null)
{
Silvicultura caracterizacao = new Silvicultura();
caracterizacao.EmpreendimentoId = empreendimento;
using (BancoDeDados bancoDeDados = BancoDeDados.ObterInstancia(banco))
{
#region Dados Geo
Comando comando = bancoDeDados.CriarComando(@"
select a.atividade,
a.codigo identificacao,
3 geometria_tipo,
a.area_m2 area_croqui
from {1}geo_aativ a,
{0}crt_projeto_geo g,
{0}lov_caracterizacao_tipo lc
where a.atividade = lc.texto
and a.projeto = g.id
and lc.id = :caracterizacao
and g.empreendimento = :empreendimento
and g.caracterizacao = :caracterizacao
union all
select a.atividade,
a.codigo identificacao,
2 geometria_tipo,
null area_croqui
from {1}geo_lativ a,
{0}crt_projeto_geo g,
{0}lov_caracterizacao_tipo lc
where a.atividade = lc.texto
and a.projeto = g.id
and lc.id = :caracterizacao
and g.empreendimento = :empreendimento
and g.caracterizacao = :caracterizacao
union all
select a.atividade,
a.codigo identificacao,
1 geometria_tipo,
null area_croqui
from {1}geo_pativ a,
{0}crt_projeto_geo g,
{0}lov_caracterizacao_tipo lc
where a.atividade = lc.texto
and a.projeto = g.id
and lc.id = :caracterizacao
and g.empreendimento = :empreendimento
and g.caracterizacao = :caracterizacao
union all
select a.atividade,
a.codigo identificacao,
3 geometria_tipo,
a.area_m2 area_croqui
from {1}geo_aiativ a,
{0}crt_projeto_geo g,
{0}lov_caracterizacao_tipo lc
where a.atividade = lc.texto
and a.projeto = g.id
and lc.id = :caracterizacao
and g.empreendimento = :empreendimento
and g.caracterizacao = :caracterizacao" , EsquemaBanco, EsquemaBancoGeo);
comando.AdicionarParametroEntrada("empreendimento", empreendimento, DbType.Int32);
comando.AdicionarParametroEntrada("caracterizacao", (int)eCaracterizacao.Silvicultura, DbType.Int32);
using (IDataReader reader = bancoDeDados.ExecutarReader(comando))
{
SilviculturaSilvicult silvicultura = null;
while (reader.Read())
{
silvicultura = new SilviculturaSilvicult();
silvicultura.Identificacao = reader["identificacao"].ToString();
silvicultura.GeometriaTipo = Convert.ToInt32(reader["geometria_tipo"]);
silvicultura.AreaCroqui = reader.GetValue <Decimal>("area_croqui");
silvicultura.AreaCroquiHa = silvicultura.AreaCroqui.Convert(eMetrica.M2ToHa);
silvicultura.GeometriaTipoTexto = _caracterizacaoConfig.Obter <List <Lista> >(ConfiguracaoCaracterizacao.KeyCaracterizacaoGeometriaTipo).
SingleOrDefault(x => x.Id == (silvicultura.GeometriaTipo).ToString()).Texto;
caracterizacao.Silviculturas.Add(silvicultura);
}
reader.Close();
}
#endregion
#region Areas
int projetoDomId = 0;
comando = bancoDeDados.CriarComando(@"select g.id from {0}crt_projeto_geo g where g.empreendimento = :empreendimento and g.caracterizacao = :caracterizacao_dom", EsquemaBanco, EsquemaBancoGeo);
comando.AdicionarParametroEntrada("empreendimento", empreendimento, DbType.Int32);
comando.AdicionarParametroEntrada("caracterizacao_dom", (int)eCaracterizacao.Dominialidade, DbType.Int32);
projetoDomId = Convert.ToInt32(bancoDeDados.ExecutarScalar(comando));
comando = bancoDeDados.CriarComando(@"(select sum(t.area_m2) area, 'ATP_CROQUI' area_tipo from {1}geo_atp t where t.projeto = :projetoDominialidade)
union all
(select sum(t.area_m2) area, 'AVN' area_tipo from {1}geo_avn t where t.projeto = :projetoDominialidade)
union all
(select sum(t.area_m2) area, 'AA_FLORESTA_PLANTADA' area_tipo from {1}geo_aa t where t.projeto = :projetoDominialidade and t.vegetacao = 'FLORESTA-PLANTADA' )
union all
(select sum(t.area_m2) area, t.tipo area_tipo from {1}geo_areas_calculadas t where t.projeto = :projetoDominialidade and t.tipo in ('APP_AVN', 'APP_AA_USO', 'APP_AA_REC' ) group by t.tipo)
union all
(select sum(t.area_m2) area, 'APP' area_tipo from {1}geo_areas_calculadas t where t.projeto = :projetoDominialidade and t.tipo = 'APP_APMP' group by t.tipo)
union all
(select sum(t.area_m2) area, 'ARL_'||t.situacao area_tipo from {1}geo_arl t where t.projeto = :projetoDominialidade and t.situacao in ('PRESERV', 'USO', 'REC', 'D' ) group by t.situacao)" , EsquemaBanco, EsquemaBancoGeo);
comando.AdicionarParametroEntrada("projetoDominialidade", projetoDomId, DbType.Int32);
using (IDataReader reader = bancoDeDados.ExecutarReader(comando))
{
while (reader.Read())
{
caracterizacao.Areas.Add(new SilviculturaArea()
{
Tipo = (int)ObterEnumeSilviculturaArea(reader["area_tipo"].ToString()),
Valor = reader.GetValue <Decimal>("area")
});
}
reader.Close();
}
}
#endregion
return(caracterizacao);
}
internal Silvicultura Obter(int id, BancoDeDados banco = null, bool simplificado = false)
{
Silvicultura caracterizacao = new Silvicultura();
using (BancoDeDados bancoDeDados = BancoDeDados.ObterInstancia(banco))
{
#region Silvicultura
Comando comando = bancoDeDados.CriarComando(@"select c.empreendimento, c.tid from {0}crt_silvicultura c where c.id = :id", EsquemaBanco);
comando.AdicionarParametroEntrada("id", id, DbType.Int32);
using (IDataReader reader = bancoDeDados.ExecutarReader(comando))
{
if (reader.Read())
{
caracterizacao.Id = id;
caracterizacao.EmpreendimentoId = Convert.ToInt32(reader["empreendimento"]);
caracterizacao.Tid = reader["tid"].ToString();
}
reader.Close();
}
#endregion
if (caracterizacao.Id <= 0 || simplificado)
{
return(caracterizacao);
}
#region Silviculturas
comando = bancoDeDados.CriarComando(@"select c.id, c.identificacao, lv.id geometria, lv.texto geometria_texto, c.area_croqui, c.tid
from {0}crt_silvicultura_silv c, lov_crt_geometria_tipo lv
where c.caracterizacao = :id and c.geometria = lv.id order by c.id" , EsquemaBanco);
comando.AdicionarParametroEntrada("id", id, DbType.Int32);
using (IDataReader reader = bancoDeDados.ExecutarReader(comando))
{
SilviculturaSilvicult silvicultura = null;
while (reader.Read())
{
silvicultura = new SilviculturaSilvicult();
silvicultura.Id = Convert.ToInt32(reader["id"]);
silvicultura.Tid = reader["tid"].ToString();
silvicultura.Identificacao = reader["identificacao"].ToString();
silvicultura.AreaCroqui = reader.GetValue <Decimal>("area_croqui");
silvicultura.GeometriaTipo = Convert.ToInt32(reader["geometria"]);
silvicultura.GeometriaTipoTexto = reader["geometria_texto"].ToString();
silvicultura.AreaCroquiHa = silvicultura.AreaCroqui.Convert(eMetrica.M2ToHa);
#region Culturas Florestais
comando = bancoDeDados.CriarComando(@"select c.id, lc.id cultura, lc.texto cultura_texto, c.area, c.especificar, c.tid
from {0}crt_silvicultura_cult c, {0}lov_crt_silvicultura_cult_fl lc where c.cultura = lc.id
and c.silvicultura_id = :silvicultura" , EsquemaBanco);
comando.AdicionarParametroEntrada("silvicultura", silvicultura.Id, DbType.Int32);
using (IDataReader readerAux = bancoDeDados.ExecutarReader(comando))
{
CulturaFlorestal cultura = null;
while (readerAux.Read())
{
cultura = new CulturaFlorestal();
cultura.Id = Convert.ToInt32(readerAux["id"]);
cultura.Tid = readerAux["tid"].ToString();
cultura.CulturaTipo = Convert.ToInt32(readerAux["cultura"]);
cultura.CulturaTipoTexto = readerAux["cultura_texto"].ToString();
cultura.AreaCulturaHa = readerAux.GetValue <Decimal>("area").Convert(eMetrica.M2ToHa);
cultura.AreaCulturaTexto = cultura.AreaCulturaHa.ToStringTrunc(4);
if (readerAux["especificar"] != null && !Convert.IsDBNull(readerAux["especificar"]))
{
cultura.EspecificarTexto = readerAux["especificar"].ToString();
cultura.CulturaTipoTexto = cultura.EspecificarTexto;
}
silvicultura.Culturas.Add(cultura);
}
readerAux.Close();
}
#endregion
caracterizacao.Silviculturas.Add(silvicultura);
}
reader.Close();
}
#endregion
#region Áreas
comando = bancoDeDados.CriarComando(@"select a.id, a.tipo, la.texto tipo_texto, a.valor, a.tid from {0}crt_silvicultura_areas a, {0}lov_crt_silvicultura_area la
where a.tipo = la.id and a.caracterizacao = :caracterizacao" , EsquemaBanco);
comando.AdicionarParametroEntrada("caracterizacao", caracterizacao.Id, DbType.Int32);
using (IDataReader readerAux2 = bancoDeDados.ExecutarReader(comando))
{
SilviculturaArea item;
while (readerAux2.Read())
{
item = new SilviculturaArea();
item.Id = Convert.ToInt32(readerAux2["id"]);
item.Tid = readerAux2["tid"].ToString();
item.Tipo = Convert.ToInt32(readerAux2["tipo"]);
item.TipoTexto = readerAux2["tipo_texto"].ToString();
item.Valor = readerAux2.GetValue <Decimal>("valor");
caracterizacao.Areas.Add(item);
}
readerAux2.Close();
}
#endregion
}
return(caracterizacao);
}
