private void BuscarProduto()
{
CamadaDados.Estoque.Cadastros.TRegistro_CadProduto rProd = null;
if (string.IsNullOrEmpty(CD_Produto.Text))
{
rProd = FormBusca.UtilPesquisa.BuscarProduto(string.Empty,
string.Empty,
string.Empty,
string.Empty,
new Componentes.EditDefault[] { CD_Produto, DS_Produto },
null);
}
else if (CD_Produto.Text.SoNumero().Trim().Length != CD_Produto.Text.Trim().Length)
{
rProd = FormBusca.UtilPesquisa.BuscarProduto(CD_Produto.Text,
string.Empty,
string.Empty,
string.Empty,
new Componentes.EditDefault[] { CD_Produto, DS_Produto },
null);
}
else
{
CamadaDados.Estoque.Cadastros.TList_CadProduto lProd =
new CamadaDados.Estoque.Cadastros.TCD_CadProduto().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'C'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = string.Empty,
vVL_Busca = "(a.cd_produto like '%" + CD_Produto.Text.Trim() + "') or " +
"(a.Codigo_Alternativo = '" + (CD_Produto.TextOld != null ? CD_Produto.TextOld.ToString() : CD_Produto.Text.Trim()) + "') or " +
"(exists(select 1 from tb_est_codbarra x " +
" where x.cd_produto = a.cd_produto " +
" and x.cd_codbarra = '" + CD_Produto.Text.Trim() + "'))"
}
}, 0, string.Empty, string.Empty, string.Empty);
if (lProd.Count > 0)
{
rProd = lProd[0];
}
}
if (rProd != null)
{
CD_Produto.Text = rProd.CD_Produto;
DS_Produto.Text = rProd.DS_Produto;
}
else
{
CD_Produto.Clear();
CD_Produto.Focus();
}
}
private void LimpaCampos()
{
DT_Inicial.Clear();
DT_Final.Clear();
id_lanctoestoque.Clear();
cd_empresa.Clear();
CD_Produto.Clear();
CD_Local.Clear();
}
private void BuscarProduto()
{
if (bsItens.Current != null)
{
decimal tot_faturado = decimal.Zero;
if (bsItensFat.Count > 0)
{
tot_faturado = (bsItensFat.List as CamadaDados.Faturamento.Pedido.TList_RegLanPedido_Item).Sum(p => p.Vl_subtotal);
}
if ((bsItens.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento_Item).Vl_faturar - tot_faturado > decimal.Zero)
{
Utils.TpBusca[] filtro = new Utils.TpBusca[1];
filtro[0].vNM_Campo = "isnull(e.st_servico, 'N')";
filtro[0].vOperador = (bsItens.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento_Item).St_servicobool ? "=" : "<>";
filtro[0].vVL_Busca = "'S'";
if (string.IsNullOrEmpty(CD_Produto.Text))
{
FormBusca.UtilPesquisa.BuscarProduto(string.Empty,
(bsOrcamento.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento).Cd_empresa,
(bsOrcamento.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento).Nm_empresa,
(bsOrcamento.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento).Cd_tabelapreco,
new Componentes.EditDefault[] { CD_Produto },
filtro);
}
else if (CD_Produto.Text.SoNumero().Trim().Length != CD_Produto.Text.Trim().Length)
{
FormBusca.UtilPesquisa.BuscarProduto(CD_Produto.Text,
(bsOrcamento.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento).Cd_empresa,
(bsOrcamento.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento).Nm_empresa,
(bsOrcamento.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento).Cd_tabelapreco,
new Componentes.EditDefault[] { CD_Produto },
null);
}
}
else
{
MessageBox.Show("Item orçamento não possui mais saldo disponivel para faturar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (BuscarItens())
{
CD_Produto.Clear();
Quantidade.Focus();
}
else
{
MessageBox.Show("Produto inexistente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_Produto.Clear();
CD_Produto.Focus();
}
}
}
private void bb_gravar_Click(object sender, EventArgs e)
{
if (pc_atualizacao.Focused)
{
pc_atualizacao_Leave(this, new EventArgs());
}
if (string.IsNullOrEmpty(CD_Empresa.Text))
{
MessageBox.Show("Obrigatorio informar empresa!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (!(bsItensNf.List as TList_RegLanFaturamento_Item).Exists(p => p.St_atualizaprecovenda))
{
MessageBox.Show("Obrigatorio selecionar item venda para atualizar preço.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (string.IsNullOrEmpty(CD_TabelaPreco.Text))
{
MessageBox.Show("Obrigatorio informar tabela de preço para atualizar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_TabelaPreco.Focus();
return;
}
if (vl_novopreco.Value.Equals(decimal.Zero))
{
MessageBox.Show("Obrigatorio informar novo preço venda para atualizar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
vl_novopreco.Focus();
return;
}
if (string.IsNullOrEmpty(dt_inivigencia.Text.SoNumero()))
{
MessageBox.Show("Obrigatório informar data inicial vigência do preço.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
dt_inivigencia.Focus();
return;
}
try
{
CamadaNegocio.Estoque.Cadastros.TCN_LanPrecoItem.Grava_LanPrecoItem(
new TRegistro_LanPrecoItem()
{
CD_Empresa = CD_Empresa.Text,
CD_Produto = CD_Produto.Text,
CD_TabelaPreco = CD_TabelaPreco.Text,
Dt_preco = Convert.ToDateTime(dt_inivigencia.Text),
Vl_NovoPreco = vl_novopreco.Value
}, null);
MessageBox.Show("Preço de venda atualizado com sucesso.", "Mensagem", MessageBoxButtons.YesNo, MessageBoxIcon.Information);
bsItensNf.RemoveCurrent();
CD_Empresa.Clear();
NM_Empresa.Clear();
CD_Produto.Clear();
DS_Produto.Clear();
vl_penultimacompra.Value = decimal.Zero;
vl_ultimacompra.Value = decimal.Zero;
vl_custoproduto.Value = decimal.Zero;
VL_PrecoVenda.Value = decimal.Zero;
vl_novopreco.Value = decimal.Zero;
pc_aumentodesconto.Value = decimal.Zero;
pc_atualizacao.Value = decimal.Zero;
dt_inivigencia.Text = DateTime.Now.ToString("dd/MM/yyyy");
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
private void BuscarProduto()
{
TpBusca[] filtro = new TpBusca[0];
if (string.IsNullOrEmpty(CD_Produto.Text))
{
if (UtilPesquisa.BuscarProduto(string.Empty,
string.Empty,
string.Empty,
string.Empty,
new Componentes.EditDefault[] { CD_Produto, DS_Produto },
null) == null)
{
MessageBox.Show("Produto não encontrado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_Produto.Clear();
CD_Produto.Focus();
return;
}
}
else if (CD_Produto.Text.SoNumero().Trim().Length != CD_Produto.Text.Trim().Length)
{
if (UtilPesquisa.BuscarProduto(CD_Produto.Text,
string.Empty,
string.Empty,
string.Empty,
new Componentes.EditDefault[] { CD_Produto, DS_Produto },
null) == null)
{
MessageBox.Show("Produto não encontrado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_Produto.Clear();
CD_Produto.Focus();
return;
}
}
else
{
Array.Resize(ref filtro, filtro.Length + 2);
filtro[filtro.Length - 2].vNM_Campo = "isnull(a.st_registro, 'A')";
filtro[filtro.Length - 2].vOperador = "<>";
filtro[filtro.Length - 2].vVL_Busca = "'C'";
filtro[filtro.Length - 1].vNM_Campo = string.Empty;
filtro[filtro.Length - 1].vOperador = string.Empty;
filtro[filtro.Length - 1].vVL_Busca = "(a.cd_produto like '%" + CD_Produto.Text.Trim() + "') or " +
"(a.Codigo_Alternativo = '" + (CD_Produto.TextOld != null ? CD_Produto.TextOld.ToString() : CD_Produto.Text.Trim()) + "') or " +
"(exists(select 1 from tb_est_codbarra x " +
" where x.cd_produto = a.cd_produto " +
" and x.cd_codbarra = '" + CD_Produto.Text.Trim() + "'))";
TList_CadProduto lProd = new TCD_CadProduto().Select(filtro, 0, string.Empty, string.Empty, string.Empty);
if (lProd.Count > 0)
{
CD_Produto.Text = lProd[0].CD_Produto;
DS_Produto.Text = lProd[0].DS_Produto;
}
}
if (!string.IsNullOrEmpty(CD_Produto.Text))
{
if (!string.IsNullOrEmpty(CD_Local.Text))
{
Quantidade.Focus();
}
else
{
CD_Local.Focus();
}
}
}
private void nr_contrato_origem_Leave(object sender, EventArgs e)
{
DataRow linha = UtilPesquisa.EDIT_LEAVE("a.nr_contrato|=|" + nr_contrato_origem.Text + ";" +
// O Tipo De pedido tem que permitir transferência
"cfgped.ST_PermiteTransf|=|'S';" +
//Contrato de Deposito ou a Fixar
"||isnull(cfgped.ST_Deposito, 'N') = 'S' or isnull(cfgped.ST_ValoresFixos, 'N') <> 'S';" +
"isnull(a.st_registro, 'A')|=|'A';" + //Contrato Aberto
//Usuario tem que ter acesso a empresa
"|EXISTS|(select 1 from Tb_div_usuario_X_empresa x where x.cd_empresa = a.cd_empresa " +
"and ((x.login = '******') or " +
"(exists(select 1 from tb_div_usuario_x_grupos y " +
" where y.logingrp = x.login and y.loginusr = '******'))));" +
//Usuario tem que ter acesso ao tipo de pedido
"|EXISTS|(select 1 from tb_div_usuario_x_cfgpedido x " +
"where x.cfg_pedido = a.cfg_pedido " +
"and ((x.login = '******') or " +
"(exists(select 1 from tb_div_usuario_x_grupos y " +
" where y.logingrp = x.login and y.loginusr = '******'))));" +
// Configuracao fiscal de devolucao
"|EXISTS|(select 1 from TB_FAT_CFG_PedFiscal x " +
"where x.cfg_pedido = cfgped.cfg_pedido and x.TP_Fiscal = 'TF') "
, new Componentes.EditDefault[] {
nr_contrato_origem,
dt_contrato_origem,
TP_Movimento,
CD_Empresa,
NM_Empresa,
CD_Clifor,
NM_Clifor,
CPF,
DS_Endereco,
DS_Cidade,
UF,
CD_Produto,
DS_Produto,
VL_Unitario,
QTD_Origem
}, new CamadaDados.Graos.TCD_CadContrato());
if (linha != null)
{
CD_Unidade_Origem_Est.Text = linha["cd_unid_produto"].ToString();
CD_Unidade_Origem_VL.Text = linha["CD_Unidade"].ToString();
Unidade_Origem_Est.Text = linha["sigla_unid_produto"].ToString();
Unidade_Origem_VL.Text = linha["Sigla_Unidade"].ToString();
(BS_Transf_Origem.Current as CamadaDados.Graos.TRegistro_Transf_X_Contrato).Nr_pedido = decimal.Parse(linha["nr_pedido"].ToString());
(BS_Transf_Origem.Current as CamadaDados.Graos.TRegistro_Transf_X_Contrato).Id_pedidoitem = decimal.Parse(linha["id_pedidoitem"].ToString());
(BS_Transf_Origem.Current as CamadaDados.Graos.TRegistro_Transf_X_Contrato).Cd_condfiscal_produto = linha["cd_condfiscal_produto"].ToString();
}
if (string.IsNullOrEmpty(nr_contrato_origem.Text))
{
nr_contrato_origem.Clear();
dt_contrato_origem.Clear();
TP_Movimento.Clear();
CD_Empresa.Clear();
NM_Empresa.Clear();
CD_Clifor.Clear();
NM_Clifor.Clear();
CPF.Clear();
DS_Endereco.Clear();
DS_Cidade.Clear();
UF.Clear();
CD_Produto.Clear();
DS_Produto.Clear();
VL_Unitario.Clear();
VL_Sub_Total_Origem.Value = decimal.Zero;
VL_Unitario_Transf.Value = decimal.Zero;
QTD_Transferir.Value = decimal.Zero;
QTD_Origem.Clear();
CD_Unidade_Origem_Est.Clear();
CD_Unidade_Origem_VL.Clear();
Unidade_Origem_Est.Clear();
Unidade_Origem_VL.Clear();
}
else
{
Busca_Saldo_Contrato_Origem();
if (string.IsNullOrEmpty(Saldo_Contrato_Origem.Text) ? false : decimal.Parse(Saldo_Contrato_Origem.Text) > decimal.Zero)
{
try
{
QTD_Transferir.Value = decimal.Parse(Saldo_Contrato_Origem.Text);
}
catch { }
}
else
{
MessageBox.Show("Contrato origem não possui saldo disponivel para realizar transferência.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
nr_contrato_origem.Clear();
nr_contrato_origem.Focus();
}
if (string.IsNullOrEmpty(VL_Unitario.Text) ? false : decimal.Parse(VL_Unitario.Text) > decimal.Zero)
{
try
{
VL_Unitario_Transf.Value = decimal.Parse(VL_Unitario.Text);
if (CD_Unidade_Origem_Est.Text.Trim() != CD_Unidade_Origem_VL.Text.Trim())
{
VL_Sub_Total_Origem.Value = CamadaNegocio.Estoque.Cadastros.TCN_CadConvUnidade.ConvertUnid(CD_Unidade_Origem_Est.Text, CD_Unidade_Origem_VL.Text, QTD_Transferir.Value * VL_Unitario_Transf.Value, 2, null);
}
else
{
VL_Sub_Total_Origem.Value = (QTD_Transferir.Value * VL_Unitario_Transf.Value);
}
}
catch { }
}
nr_contrato_destino.Clear();
DT_Contrato_Destino.Clear();
TP_Movimento_Destino.Clear();
CD_Empresa_Destino.Clear();
NM_Empresa_Destino.Clear();
CD_Clifor_Destino.Clear();
NM_Clifor_Destino.Clear();
CPF_Destino.Clear();
DS_Endereco_Destino.Clear();
DS_Cidade_Destino.Clear();
UF_Destino.Clear();
CD_Produto_Destino.Clear();
DS_Produto_Destino.Clear();
VL_Unitario_Destino.Clear();
VL_Sub_Total_Destino.Value = decimal.Zero;
VL_Unitario_Destino_Transf.Value = decimal.Zero;
QTD_Destino.Clear();
CD_Unidade_Destino_Est.Clear();
CD_Unidade_Destino_VL.Clear();
Unidade_Destino_Est.Clear();
Unidade_Destino_VL.Clear();
}
}
private void BuscarItens()
{
if (string.IsNullOrEmpty(CD_Produto.Text))
{
UtilPesquisa.BuscarProduto(string.Empty,
CD_Empresa.Text,
NM_Empresa.Text,
string.Empty,
new Componentes.EditDefault[] { CD_Produto, DS_Produto, Nr_patrimonio },
null);
}
else if (CD_Produto.Text.SoNumero().Trim().Length != CD_Produto.Text.Trim().Length)
{
UtilPesquisa.BuscarProduto(CD_Produto.Text,
CD_Empresa.Text,
NM_Empresa.Text,
string.Empty,
new Componentes.EditDefault[] { CD_Produto, DS_Produto, Nr_patrimonio },
null);
}
if (!string.IsNullOrEmpty(CD_Produto.Text))
{
if (new TCD_LanServico().BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.CD_ProdutoOS",
vOperador = "=",
vVL_Busca = "'" + CD_Produto.Text.Trim() + "'"
},
new TpBusca()
{
vNM_Campo = "a.dt_finalizada",
vOperador = "is",
vVL_Busca = "null"
},
new TpBusca()
{
vNM_Campo = "isnull(a.st_os, 'AB')",
vOperador = "<>",
vVL_Busca = "'CA'"
},
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "not exists",
vVL_Busca = "(select 1 from TB_EST_Patrimonio x " +
"where x.cd_patrimonio = a.CD_ProdutoOS " +
"and x.quantidade > 1 ) "
}
}, "1") != null)
{
MessageBox.Show("Existem manutenções não finalizadas para este Patrimônio!\r\n" +
"Consulte a tela de Ordem de serviço e verifique para continuar!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_Produto.Clear();
DS_Produto.Clear();
CD_Produto.Focus();
return;
}
if (new CamadaDados.Locacao.TCD_ItensLocacao().BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from VTB_LOC_LOCACAO x " +
"where a.cd_empresa = x.cd_empresa " +
"and a.id_locacao = x.ID_Locacao " +
"and x.Status in ('DEVOLUCAO EXPIRADA', 'ENTREGUE', 'ENTREGA PARCIAL')) "
},
new TpBusca()
{
vNM_Campo = "a.DT_Devolucao",
vOperador = "is",
vVL_Busca = "null"
},
new TpBusca()
{
vNM_Campo = "isnull(loc.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'C'"
},
new TpBusca()
{
vNM_Campo = "a.cd_produto",
vOperador = "=",
vVL_Busca = "'" + CD_Produto.Text.Trim() + "'"
},
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "not exists",
vVL_Busca = "(select 1 from TB_EST_Patrimonio x " +
"where x.cd_patrimonio = a.cd_produto " +
"and x.quantidade > 1 ) "
}
}, "1") != null)
{
MessageBox.Show("Item está em locação!",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_Produto.Clear();
DS_Produto.Clear();
CD_Produto.Focus();
return;
}
if (new TCD_CadPatrimonio().BuscarEscalar(
new TpBusca[]
{
new TpBusca {
vNM_Campo = "a.cd_patrimonio", vOperador = "=", vVL_Busca = "'" + CD_Produto.Text.Trim() + "'"
},
new TpBusca {
vNM_Campo = "isnull(a.st_controlehora, 'N')", vOperador = "=", vVL_Busca = "'S'"
}
}, "1") != null)
{
gbHorimetro.Visible = true;
horimetro.Value = 0;
}
else
{
gbHorimetro.Visible = false;
horimetro.Value = 0;
}
if (!string.IsNullOrEmpty(CD_Produto.Text))
{
//Buscar lengt cd_produto
TList_CadParamSys lParam =
TCN_CadParamSys.Busca("CD_PRODUTO",
string.Empty,
decimal.Zero,
null);
if (lParam.Count > 0)
{
if (CD_Produto.Text.Trim().Length < lParam[0].Tamanho)
{
CD_Produto.Text = CD_Produto.Text.Trim().PadLeft(Convert.ToInt32(lParam[0].Tamanho), '0');
}
}
}
}
}
