private void TFItensExpedicao_Load(object sender, EventArgs e)
{
Icon = ResourcesUtils.TecnoAliance_ICO;
bsExpedicao.AddNew();
Obs_Pedido.Text = Ds_obs;
lbNumPedido.Text = "OBSERVAÇÃO DO PEDIDO Nº " + Nr_pedido;
//Buscar Itens Pedido
CamadaDados.Faturamento.Pedido.TList_RegLanPedido_Item lItem =
new CamadaDados.Faturamento.Pedido.TCD_LanPedido_Item().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = Nr_pedido
},
new TpBusca()
{
vNM_Campo = "a.quantidade - a.qtd_expedida + a.qtd_devolvida",
vOperador = ">",
vVL_Busca = "0"
}
}, 0, string.Empty, string.Empty, string.Empty);
lItem.ForEach(p =>
{
if (!p.St_exigirserie)
{
(bsExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_Expedicao).lItens.Add(
new CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao()
{
Cd_empresa = p.Cd_Empresa,
Nr_pedido = p.Nr_pedido,
Cd_produto = p.Cd_produto,
Ds_produto = p.Ds_produto,
Id_pedidoitem = p.Id_pedidoitem,
PS_Unitario = p.Ps_unitario,
SaldoCarregar = p.SaldoCarregar,
St_exigirserie = p.St_exigirserie
});
}
else
{
for (int i = 0; p.SaldoCarregar > i; i++)
{
(bsExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_Expedicao).lItens.Add(
new CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao()
{
Cd_empresa = p.Cd_Empresa,
Nr_pedido = p.Nr_pedido,
Cd_produto = p.Cd_produto,
Ds_produto = p.Ds_produto,
Id_pedidoitem = p.Id_pedidoitem,
Quantidade = 1,
PS_Unitario = p.Ps_unitario,
SaldoCarregar = p.SaldoCarregar,
St_exigirserie = p.St_exigirserie
});
}
}
});
//Buscar Acessórios Pedido
CamadaDados.Faturamento.Pedido.TList_AcessoriosPed lAcessorios =
new CamadaDados.Faturamento.Pedido.TCD_AcessoriosPed().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = Nr_pedido
},
new TpBusca()
{
vNM_Campo = "a.quantidade - a.qtd_expedida",
vOperador = ">",
vVL_Busca = "0"
}
}, 0, string.Empty);
lAcessorios.ForEach(p =>
{
(bsExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_Expedicao).lItens.Add(
new CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao()
{
Nr_pedido = p.Nr_pedido,
Id_acessorio = p.Id_acessorio,
Cd_produto = p.Cd_produto,
Ds_produto = p.Ds_produto,
SaldoCarregar = p.SaldoCarregar,
St_exigirserie = false
});
});
bsExpedicao.ResetCurrentItem();
}
