private void AlterarDesdobro()
{
if (bsDesdobroEspecial.Current != null)
{
using (TFDesdobro fDesdobro = new TFDesdobro())
{
fDesdobro.Text = "ALTERANDO DESDOBRO";
fDesdobro.pCd_produto = (bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).Cd_produto;
CamadaDados.Graos.TRegistro_ContratoItem_X_DesdEspecial Copia = (bsDesdobroEspecial.Current as CamadaDados.Graos.TRegistro_ContratoItem_X_DesdEspecial).Copy();
fDesdobro.rDesd = Copia;
if (fDesdobro.ShowDialog() == DialogResult.OK)
{
if (fDesdobro.rDesd != null)
{
(bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).lDesdEspecial[bsItensContrato.Position] = Copia;
bsItensContrato.ResetCurrentItem();
}
}
}
}
else
{
MessageBox.Show("Obrigatorio selecionar desdobro para alterar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
private void InserirDesdobro()
{
if (bsItensContrato.Current != null)
{
//Verificar se o tipo de pedido do item permite transferencia e se e deposito
object obj = new CamadaDados.Faturamento.Cadastros.TCD_CadCFGPedido().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.ST_PermiteTransf, 'N')",
vOperador = "=",
vVL_Busca = "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.ST_Deposito, 'N')",
vOperador = "=",
vVL_Busca = "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fat_pedido x " +
"where x.cfg_pedido = a.cfg_pedido " +
"and x.nr_pediddo = " + (bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).Nr_pedidostr + ")"
}
}, "a.cfg_pedido");
if (obj != null)
{
MessageBox.Show("Necessario configurar tipo de pedido " + obj.ToString() + " para permitir transferencia e/ou ser do tipo DEPOSITO.",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
using (TFDesdobro fDesdobro = new TFDesdobro())
{
fDesdobro.Text = "NOVO DESDOBRO";
fDesdobro.pCd_produto = (bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).Cd_produto;
if (fDesdobro.ShowDialog() == DialogResult.OK)
{
if (fDesdobro.rDesd != null)
{
if ((bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).lDesdEspecial.Exists(p =>
p.Id_tpdesdobrostr.Trim().Equals(fDesdobro.rDesd.Id_tpdesdobrostr.Trim()) &&
p.Nr_pedidodest.Value.Equals(fDesdobro.rDesd.Nr_pedidodest.Value) &&
p.Cd_produtodest.Trim().Equals(fDesdobro.rDesd.Cd_produtodest.Trim()) &&
p.Id_pedidoitemdest.Value.Equals(fDesdobro.rDesd.Id_pedidoitemdest.Value)))
{
(bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).lDesdEspecial.Find(p =>
p.Id_tpdesdobrostr.Trim().Equals(fDesdobro.rDesd.Id_tpdesdobrostr.Trim()) &&
p.Nr_pedidodest.Value.Equals(fDesdobro.rDesd.Nr_pedidodest.Value) &&
p.Cd_produtodest.Trim().Equals(fDesdobro.rDesd.Cd_produtodest.Trim()) &&
p.Id_pedidoitemdest.Value.Equals(fDesdobro.rDesd.Id_pedidoitemdest.Value)).Pc_desdobro = fDesdobro.rDesd.Pc_desdobro;
(bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).lDesdEspecial.Find(p =>
p.Id_tpdesdobrostr.Trim().Equals(fDesdobro.rDesd.Id_tpdesdobrostr.Trim()) &&
p.Nr_pedidodest.Value.Equals(fDesdobro.rDesd.Nr_pedidodest.Value) &&
p.Cd_produtodest.Trim().Equals(fDesdobro.rDesd.Cd_produtodest.Trim()) &&
p.Id_pedidoitemdest.Value.Equals(fDesdobro.rDesd.Id_pedidoitemdest.Value)).Peso_desdobro = fDesdobro.rDesd.Peso_desdobro;
}
else
{
(bsItensContrato.Current as CamadaDados.Graos.TRegistro_CadContratoxPedidoItem).lDesdEspecial.Add(fDesdobro.rDesd);
}
bsItensContrato.ResetCurrentItem();
}
}
}
}
else
{
MessageBox.Show("Obrigatorio selecionar item do contrato para inserir desdobro.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
