Beispiel #1
0
 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);
     }
 }
Beispiel #2
0
 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);
     }
 }