private void TFFechamentoPedido_Load(object sender, EventArgs e)
{
this.Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
TCN_Pedido.Consulta_Dados_Clifor(rpedido);
Pc_Comissao.Enabled = rpedido.St_comissaovendedorbool && (!TCN_Pedido.Busca_Comissao_Vendedor(BS_Pedido.Current as TRegistro_Pedido).Trim().ToUpper().Equals("P"));
VL_Comissao.Enabled = Pc_Comissao.Enabled;
BS_Pedido.DataSource = new TList_Pedido()
{
rpedido
};
}
private void InserirItem()
{
//Verificar se o pedido tem conferencia processada
object obj = new CamadaDados.Faturamento.Pedido.TCD_EntregaPedido().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = (BS_Pedido.Current as TRegistro_Pedido).Nr_pedido.ToString()
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "=",
vVL_Busca = "'P'"
}
}, "1");
if (obj != null)
{
if (obj.ToString().Trim().Equals("1"))
{
MessageBox.Show("Não é permitido adicionar item no pedido com conferência processada.",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
using (TFLan_Itens_Faturamento Lan_Itens = new TFLan_Itens_Faturamento())
{
Lan_Itens.st_servico = (BS_Pedido.Current as TRegistro_Pedido).St_servicobool;
Lan_Itens.st_valoresfixos = (BS_Pedido.Current as TRegistro_Pedido).St_valoresfixosbool;
Lan_Itens.CD_TabelaPreco = (BS_Pedido.Current as TRegistro_Pedido).Cd_tabelapreco;
Lan_Itens.CD_Empresa = CD_Empresa.Text;
Lan_Itens.st_Commodities = false;
Lan_Itens.Cfg_pedido = (BS_Pedido.Current as TRegistro_Pedido).CFG_Pedido;
Lan_Itens.Comissionar_pedido = (BS_Pedido.Current as TRegistro_Pedido).St_comissaovendedorbool;
Lan_Itens.Comissionar_Produto = TCN_Pedido.Busca_Comissao_Vendedor(BS_Pedido.Current as TRegistro_Pedido).Trim().ToUpper().Equals("P");
Lan_Itens.Pc_desconto = (BS_Pedido.Current as TRegistro_Pedido).Pc_descgeral;
Lan_Itens.pTp_movimento = (BS_Pedido.Current as TRegistro_Pedido).TP_Movimento;
if (Lan_Itens.ShowDialog() == DialogResult.OK)
{
if (Lan_Itens.rItem != null)
{
(BS_Pedido.Current as TRegistro_Pedido).Pedido_Itens.Add(Lan_Itens.rItem);
BS_Pedido.ResetCurrentItem();
this.TotalizarPedido();
}
}
};
}
private void AlterarItem()
{
if (BS_Itens.Current != null)
{
using (TFLan_Itens_Faturamento Lan_Itens = new TFLan_Itens_Faturamento())
{
//Verificar se o item tem conferencia processada
object obj = new CamadaDados.Faturamento.Pedido.TCD_EntregaPedido().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = (BS_Itens.Current as TRegistro_LanPedido_Item).Nr_PedidoString
},
new Utils.TpBusca()
{
vNM_Campo = "a.cd_produto",
vOperador = "=",
vVL_Busca = "'" + (BS_Itens.Current as TRegistro_LanPedido_Item).Cd_produto.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = "a.id_pedidoitem",
vOperador = "=",
vVL_Busca = (BS_Itens.Current as TRegistro_LanPedido_Item).Id_pedidoitem.ToString()
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "=",
vVL_Busca = "'P'"
}
}, "1");
if (obj != null)
{
if (obj.ToString().Trim().Equals("1"))
{
Lan_Itens.Quantidade.Enabled = false;
}
}
Lan_Itens.CD_Produto.Enabled = false;
Lan_Itens.BB_Produto.Enabled = false;
Lan_Itens.rItem = BS_Itens.Current as TRegistro_LanPedido_Item;
Lan_Itens.st_alterar = true;
Lan_Itens.st_servico = (BS_Pedido.Current as TRegistro_Pedido).St_servicobool;
Lan_Itens.st_valoresfixos = (BS_Pedido.Current as TRegistro_Pedido).St_valoresfixosbool;
Lan_Itens.CD_TabelaPreco = (BS_Pedido.Current as TRegistro_Pedido).Cd_tabelapreco;
Lan_Itens.CD_Empresa = CD_Empresa.Text;
Lan_Itens.Cfg_pedido = (BS_Pedido.Current as TRegistro_Pedido).CFG_Pedido;
Lan_Itens.Comissionar_pedido = (BS_Pedido.Current as TRegistro_Pedido).St_comissaovendedorbool;
Lan_Itens.Comissionar_Produto = TCN_Pedido.Busca_Comissao_Vendedor(BS_Pedido.Current as TRegistro_Pedido).Trim().ToUpper().Equals("P");
string _CD_Produto = (BS_Itens.Current as TRegistro_LanPedido_Item).Cd_produto;
string _DS_Produto = (BS_Itens.Current as TRegistro_LanPedido_Item).Ds_produto;
string _CD_Variedade = (BS_Itens.Current as TRegistro_LanPedido_Item).Cd_variedade;
string _DS_Variedade = (BS_Itens.Current as TRegistro_LanPedido_Item).Ds_variedade;
string _CD_Unidade = (BS_Itens.Current as TRegistro_LanPedido_Item).Cd_unidade_valor;
string _DS_Unidade = (BS_Itens.Current as TRegistro_LanPedido_Item).Ds_unidade_valor;
string _SG_UniQTD = (BS_Itens.Current as TRegistro_LanPedido_Item).Sg_unidade_valor;
string _CD_Local = (BS_Itens.Current as TRegistro_LanPedido_Item).Cd_local;
string _DS_Local = (BS_Itens.Current as TRegistro_LanPedido_Item).Ds_local;
string _DS_Acondicionamento = (BS_Itens.Current as TRegistro_LanPedido_Item).Ds_acondicionamento;
string _DS_Observacao = (BS_Itens.Current as TRegistro_LanPedido_Item).Ds_observacaoitem;
decimal _Quantidade = (BS_Itens.Current as TRegistro_LanPedido_Item).Quantidade;
decimal _Vl_Unitario = (BS_Itens.Current as TRegistro_LanPedido_Item).Vl_unitario;
decimal _Sub_Total = (BS_Itens.Current as TRegistro_LanPedido_Item).Vl_subtotal;
decimal _Frete_Item = (BS_Itens.Current as TRegistro_LanPedido_Item).Vl_freteitem;
decimal _Pc_ComissaoItem = (BS_Itens.Current as TRegistro_LanPedido_Item).Pc_comissao;
decimal _VL_Comissao = (BS_Itens.Current as TRegistro_LanPedido_Item).Vl_comissao;
decimal _Pc_DescontoItem = (BS_Itens.Current as TRegistro_LanPedido_Item).Pc_desc;
decimal _VL_Desconto = (BS_Itens.Current as TRegistro_LanPedido_Item).Vl_desc;
Lan_Itens.pTp_movimento = (BS_Pedido.Current as TRegistro_Pedido).TP_Movimento;
if (Lan_Itens.ShowDialog() == DialogResult.OK)
{
BS_Itens.ResetCurrentItem();
this.TotalizarPedido();
}
else
{
(BS_Itens.Current as TRegistro_LanPedido_Item).Cd_produto = _CD_Produto;
(BS_Itens.Current as TRegistro_LanPedido_Item).Ds_produto = _DS_Produto;
(BS_Itens.Current as TRegistro_LanPedido_Item).Cd_variedade = _CD_Variedade;
(BS_Itens.Current as TRegistro_LanPedido_Item).Ds_variedade = _DS_Variedade;
(BS_Itens.Current as TRegistro_LanPedido_Item).Cd_unidade_valor = _CD_Unidade;
(BS_Itens.Current as TRegistro_LanPedido_Item).Ds_unidade_valor = _DS_Unidade;
(BS_Itens.Current as TRegistro_LanPedido_Item).Sg_unidade_valor = _SG_UniQTD;
(BS_Itens.Current as TRegistro_LanPedido_Item).Cd_local = _CD_Local;
(BS_Itens.Current as TRegistro_LanPedido_Item).Ds_local = _DS_Local;
(BS_Itens.Current as TRegistro_LanPedido_Item).Ds_acondicionamento = _DS_Acondicionamento;
(BS_Itens.Current as TRegistro_LanPedido_Item).Ds_observacaoitem = _DS_Observacao;
(BS_Itens.Current as TRegistro_LanPedido_Item).Quantidade = _Quantidade;
(BS_Itens.Current as TRegistro_LanPedido_Item).Vl_unitario = _Vl_Unitario;
(BS_Itens.Current as TRegistro_LanPedido_Item).Vl_subtotal = _Sub_Total;
(BS_Itens.Current as TRegistro_LanPedido_Item).Vl_freteitem = _Frete_Item;
(BS_Itens.Current as TRegistro_LanPedido_Item).Pc_comissao = _Pc_ComissaoItem;
(BS_Itens.Current as TRegistro_LanPedido_Item).Vl_comissao = _VL_Comissao;
(BS_Itens.Current as TRegistro_LanPedido_Item).Pc_desc = _Pc_DescontoItem;
(BS_Itens.Current as TRegistro_LanPedido_Item).Vl_desc = _VL_Desconto;
}
};
}
}