private void id_almox_Leave(object sender, EventArgs e)
{
string vParam = "a.id_almox|=|" + id_almox.Text + ";" +
"|exists|(select 1 from tb_amx_almox_x_empresa x " +
" where x.id_almox = a.id_almox " +
" and x.cd_empresa = '" + Cd_empresa.Trim() + "');" +
"|exists|(select 1 from tb_amx_itens y " +
" where y.id_almox = a.id_almox " +
" and y.cd_produto = '" + Cd_produto.Trim() + "')";
FormBusca.UtilPesquisa.EDIT_LEAVE(vParam, new Componentes.EditDefault[] { id_almox, ds_almoxarifado },
new CamadaDados.Almoxarifado.TCD_CadAlmoxarifado());
this.BuscarAlocacao();
}
private void bb_almox_Click(object sender, EventArgs e)
{
string vColunas = "a.ds_almoxarifado|Almoxarifado|150;" +
"a.id_almox|Id. Almox.|80";
string vParam = "|exists|(select 1 from tb_amx_almox_x_empresa x " +
" where x.id_almox = a.id_almox " +
" and x.cd_empresa = '" + Cd_empresa.Trim() + "');" +
"|exists|(select 1 from tb_amx_itens y " +
" where y.id_almox = a.id_almox " +
" and y.cd_produto = '" + Cd_produto.Trim() + "')";
FormBusca.UtilPesquisa.BTN_BUSCA(vColunas, new Componentes.EditDefault[] { id_almox, ds_almoxarifado },
new CamadaDados.Almoxarifado.TCD_CadAlmoxarifado(), vParam);
this.BuscarAlocacao();
}
private void TFTermoLMC_Load(object sender, EventArgs e)
{
Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
pDados.set_FormatZero();
if (dt_ref.HasValue)
{
dt_referencia.Value = dt_ref.Value;
}
CD_Empresa.Text = Cd_empresa;
NM_Empresa.Text = Nm_empresa;
//Buscar combustivel
bsProduto.DataSource = new CamadaDados.Estoque.Cadastros.TCD_CadProduto().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(e.st_combustivel, 'N')",
vOperador = "=",
vVL_Busca = "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_pdc_tanque x " +
"where x.cd_produto = a.cd_produto)"
}
}, 0, string.Empty, string.Empty, string.Empty);
if ((bsProduto.Count > 0) && (!string.IsNullOrEmpty(Cd_produto)))
{
if ((bsProduto.List as CamadaDados.Estoque.Cadastros.TList_CadProduto).Exists(p => p.CD_Produto.Trim().Equals(Cd_produto.Trim())))
{
(bsProduto.List as CamadaDados.Estoque.Cadastros.TList_CadProduto).Find(p => p.CD_Produto.Trim().Equals(Cd_produto.Trim())).St_processar = true;
bsProduto.ResetBindings(true);
}
}
}
private void TFSaldoLoteSemente_Load(object sender, EventArgs e)
{
Utils.ShapeGrid.RestoreShape(this, gLoteSemente);
Utils.ShapeGrid.RestoreShape(this, gGridNf);
if (!string.IsNullOrEmpty(Utils.Parametros.pubCultura))
{
Idioma.TIdioma.AjustaCultura(this);
}
Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
pDadosLote.set_FormatZero();
qtd_totalnf.Value = Qtd_nota;
rbVenda.Checked = !St_devolucao;
rbDevVenda.Checked = St_devolucao;
rbDevVenda.Text = St_devolucao ? Tp_mov.Trim().ToUpper().Equals("E") ? "Devolução Venda" : "Devolução Compra" : "Devolução";
//Buscar lista de lotes disponiveis
//Empresa
TpBusca[] filtro = new TpBusca[3];
filtro[0].vNM_Campo = "a.cd_empresa";
filtro[0].vOperador = "=";
filtro[0].vVL_Busca = "'" + Cd_empresa.Trim() + "'";
//Produto
filtro[1].vNM_Campo = "a.cd_produto";
filtro[1].vOperador = "=";
filtro[1].vVL_Busca = "'" + Cd_produto.Trim() + "'";
//Lote Aprovado
filtro[2].vNM_Campo = "isnull(a.st_registro, 'A')";
filtro[2].vOperador = "=";
filtro[2].vVL_Busca = "'P'";
if (St_devolucao && Tp_mov.Trim().ToUpper().Equals("S"))
{
Array.Resize(ref filtro, filtro.Length + 1);
filtro[filtro.Length - 1].vNM_Campo = "a.tp_lote";
filtro[filtro.Length - 1].vOperador = "=";
filtro[filtro.Length - 1].vVL_Busca = "'T'";
}
if (Tp_mov.Trim().ToUpper().Equals("S") && !St_devolucao)
{
Array.Resize(ref filtro, filtro.Length + 2);
//Lote a vencer
filtro[filtro.Length - 2].vNM_Campo = "CONVERT(DATETIME,FLOOR(CONVERT(NUMERIC(30,10),a.dt_valgerminacao)))";
filtro[filtro.Length - 2].vOperador = ">=";
filtro[filtro.Length - 2].vVL_Busca = "CONVERT(DATETIME,FLOOR(CONVERT(NUMERIC(30,10),getdate())))";
//Lote com saldo
filtro[filtro.Length - 1].vNM_Campo = "((isnull(dbo.F_CONVERTE_UNID(f.cd_unidade, d.cd_unidade, a.qtd_lote), a.qtd_lote) - " +
//Notas Vendas
"isnull((select sum(isnull(x.quantidade, 0)) " +
" from tb_sem_lotesemente_x_nfitem x " +
" inner join tb_fat_notafiscal_item y " +
" on x.cd_empresa = y.cd_empresa " +
" and x.nr_lanctofiscal = y.nr_lanctofiscal " +
" and x.id_nfitem = y.id_nfitem " +
" inner join tb_fat_notafiscal z " +
" on y.cd_empresa = z.cd_empresa " +
" and y.nr_lanctofiscal = z.nr_lanctofiscal " +
" inner join tb_fat_notafiscal_cmi cmi " +
" on z.cd_empresa = cmi.cd_empresa " +
" and z.nr_lanctofiscal = cmi.nr_lanctofiscal " +
" where z.tp_movimento = 'S' " +
" and x.tp_movimento = 'D' " +
" and isnull(cmi.st_devolucao, 'N') = 'S' " +
" and isnull(z.st_registro, 'A') <> 'C' " +
" and x.id_lote = a.id_lote), 0)) - " +
//Devolucao Compra
"(isnull((select sum(isnull(x.quantidade, 0)) " +
" from tb_sem_lotesemente_x_nfitem x " +
" inner join tb_fat_notafiscal_item y " +
" on x.cd_empresa = y.cd_empresa " +
" and x.nr_lanctofiscal = y.nr_lanctofiscal " +
" and x.id_nfitem = y.id_nfitem " +
" inner join tb_fat_notafiscal z " +
" on y.cd_empresa = z.cd_empresa " +
" and y.nr_lanctofiscal = z.nr_lanctofiscal " +
" inner join tb_fat_notafiscal_cmi cmi " +
" on z.cd_empresa = cmi.cd_empresa " +
" and z.nr_lanctofiscal = cmi.nr_lanctofiscal " +
" where z.tp_movimento = 'S' " +
" and isnull(z.st_registro, 'A') <> 'C' " +
" and x.tp_movimento = 'V' " +
" and isnull(cmi.st_devolucao, 'N') <> 'S' " +
" and x.id_lote = a.id_lote ), 0) - " +
//Devolucao Venda
"isnull((select sum(isnull(x.quantidade, 0)) " +
" from tb_sem_lotesemente_x_nfitem x " +
" inner join tb_fat_notafiscal_item y " +
" on x.cd_empresa = y.cd_empresa " +
" and x.nr_lanctofiscal = y.nr_lanctofiscal " +
" and x.id_nfitem = y.id_nfitem " +
" inner join tb_fat_notafiscal z " +
" on y.cd_empresa = z.cd_empresa " +
" and y.nr_lanctofiscal = z.nr_lanctofiscal " +
" inner join tb_fat_notafiscal_cmi cmi " +
" on z.cd_empresa = cmi.cd_empresa " +
" and z.nr_lanctofiscal = cmi.nr_lanctofiscal " +
" where z.tp_movimento = 'E' " +
" and x.tp_movimento = 'D' " +
" and isnull(cmi.st_devolucao, 'N') = 'S' " +
" and isnull(z.st_registro, 'A') <> 'C' " +
" and x.id_lote = a.id_lote), 0))) ";
filtro[filtro.Length - 1].vOperador = ">";
filtro[filtro.Length - 1].vVL_Busca = "0";
}
bsLoteSemente.DataSource = new CamadaDados.Sementes.TCD_LoteSemente().Select(filtro, 0, string.Empty);
}