コード例 #1
0
 private void Fecha_Pedido()
 {
     if ((BS_Pedido != null) && (BS_Pedido.Count > 0))
     {
         if (((BS_Pedido.Current as TRegistro_Pedido).ST_Pedido == "F") || ((BS_Pedido.Current as TRegistro_Pedido).ST_Pedido == "C"))
         {
             MessageBox.Show("Você não pode ENCERRRAR um PEDIDO já FECHADO ou CANCELADO!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1);
         }
         else
         {
             if (MessageBox.Show("Deseja Realmente ENCERRAR o PEDIDO :" + (BS_Pedido.Current as TRegistro_Pedido).Nr_Pedido.ToString(), "Mensagem",
                                 MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) ==
                 System.Windows.Forms.DialogResult.Yes)
             {
                 try
                 {
                     (BS_Pedido.Current as TRegistro_Pedido).ST_Pedido   = "P";
                     (BS_Pedido.Current as TRegistro_Pedido).ST_Registro = "P";
                     TCN_Pedido.Grava_Pedido(BS_Pedido.Current as TRegistro_Pedido, null, false, false);
                     cck_Fechado.Checked = true;
                     Busca_Pedidos();
                 }
                 catch (Exception ex)
                 {
                     MessageBox.Show("ERRO: Pedido não foi Encerrado! " + ex.Message);
                 }
             }
         }
     }
 }
コード例 #2
0
 private void Busca_Itens_Pedido()
 {
     TCN_Pedido.Busca_Pedido_Itens(BS_Pedido.Current as TRegistro_Pedido);
     TCN_Pedido.Totaliza_Itens(BS_Pedido.Current as TRegistro_Pedido);
     TCN_Pedido.Busca_Valores_Faturamento(BS_Pedido.Current as TRegistro_Pedido);
     BS_Pedido.ResetBindings(true);
 }
コード例 #3
0
 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
     };
 }
コード例 #4
0
 private void TotalizarPedido()
 {
     if (BS_Pedido.Current != null)
     {
         //Ratear frete
         TCN_Pedido.Rateia_Frete(BS_Pedido.Current as TRegistro_Pedido);
         VL_Desconto_Geral.Value = (BS_Pedido.Current as TRegistro_Pedido).Pedido_Itens.Sum(p => p.Vl_desc);
         VL_Comissao.Value       = (BS_Pedido.Current as TRegistro_Pedido).Pedido_Itens.Sum(p => p.Vl_comissao);
         Vl_Frete.Value          = (BS_Pedido.Current as TRegistro_Pedido).Pedido_Itens.Sum(p => p.Vl_freteitem);
     }
 }
コード例 #5
0
        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();
                    }
                }
            };
        }
コード例 #6
0
 private void AjustarDadosFinanceiros()
 {
     if (BS_Pedido.Current != null)
     {
         Habilita_Data_Financeiro();
         if (!(Parcelas_Entrada.Text.Trim() == "S"))
         {
             TCN_Pedido.Calcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido);
             BS_Pedido.ResetCurrentItem();
         }
     }
 }
コード例 #7
0
        private void VL_Entrada_Leave(object sender, EventArgs e)
        {
            decimal _VL_Entrada = VL_Entrada.Value;

            TCN_Pedido.Calcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido);

            for (int x = 0; x < (BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto.Count; x++)
            {
                (BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto[x].VL_Entrada = VL_Entrada.Value;
                if (x == 0)
                {
                    (BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto[x].VL_Parcela = VL_Entrada.Value;
                }
            }

            TCN_Pedido.Recalcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido, 0);
            BS_Pedido.ResetCurrentItem();
        }
コード例 #8
0
        private void BB_Gravar_Click(object sender, EventArgs e)
        {
            string ped;

            dataGridNavegador.Enabled = true;
            TRegistro_Pedido rgped = (bindingSource_PedidoCab.DataSource as TList_Pedido)[dataGridNavegador.CurrentRow.Index];

            if (TPModo == TTpModo.tm_Insert)
            {
                rgped.ST_Pedido = 'A';
            }
            rgped.ST_Registro = 'A';

            ped = TCN_Pedido.GravaPedido(rgped, null);
            HabilitarPaineis(false);

            Nr_Pedido.Value = Convert.ToDecimal(Querys.TDataQuery.getPubVariavel(ped, "@P_NR_PEDIDO"));
            PreparaBotoes(TTpModo.tm_Standby);
        }
コード例 #9
0
        public static string Gravar(TRegistro_Pedido rPed, TObjetoBanco banco)
        {
            bool st_transacao             = false;
            TCD_EntregaPedido qtb_entrega = new TCD_EntregaPedido();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_entrega.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_entrega.Banco_Dados = banco;
                }
                string retorno = Gravar(rPed.lEntregaPedido, qtb_entrega.Banco_Dados);
                //Alterar dados do pedido
                TCN_Pedido.Grava_Pedido(rPed, qtb_entrega.Banco_Dados);
                if (st_transacao)
                {
                    qtb_entrega.Banco_Dados.Commit_Tran();
                }
                return(retorno);
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_entrega.Banco_Dados.RollBack_Tran();
                }
                throw new Exception("Erro gravar entrega: " + ex.Message.Trim());
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_entrega.deletarBanco_Dados();
                }
            }
        }
コード例 #10
0
        public static void ProcessarEntregaPedido(TRegistro_Pedido rPed, BancoDados.TObjetoBanco banco)
        {
            bool st_transacao             = false;
            TCD_EntregaPedido qtb_entrega = new TCD_EntregaPedido();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_entrega.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_entrega.Banco_Dados = banco;
                }
                ProcessarEntregaPedido(rPed.lEntregaPedido, qtb_entrega.Banco_Dados);
                TCN_Pedido.Grava_Pedido(rPed, qtb_entrega.Banco_Dados);
                if (st_transacao)
                {
                    qtb_entrega.Banco_Dados.Commit_Tran();
                }
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_entrega.Banco_Dados.RollBack_Tran();
                }
                throw new Exception("Erro processar entrega: " + ex.Message.Trim());
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_entrega.deletarBanco_Dados();
                }
            }
        }
コード例 #11
0
        private void Busca_Pedidos()
        {
            Int64 NR_Pedido_Busca = 0;

            if (NR_Pedido.Text != "")
            {
                NR_Pedido_Busca = Convert.ToInt64(NR_Pedido.Text);
            }


            TList_Pedido List_Pedido = TCN_Pedido.Busca(CD_Empresa_Busca.Text, rb_Entrada.Checked,
                                                        rb_Saida.Checked, NR_Pedido_Busca, CD_Clifor_Busca.Text, "", "", "", "", CFG_Pedido_Busca.Text, cck_Cancelado.Checked, cck_Fechado.Checked, cck_Encerrado.Checked, cck_Ativo.Checked, DT_Inicial.Text, DT_Final.Text, "", 0, "");

            if ((List_Pedido != null) && (List_Pedido.Count > 0))
            {
                BS_Pedido.DataSource = List_Pedido;
                Busca_Itens_Pedido();
                Prepara_Botoes(true, false, false, false, false, true, true, true);
            }
            else
            {
                BS_Itens_Pedido.Clear();
            }
        }
コード例 #12
0
 public static TRegistro_LanFaturamento ProcessarAplicPsDiversos(List <TRegistro_PesagemDiversas> lTicket)
 {
     if (lTicket.Count > 0)
     {
         using (TFPedidoPsDiversa fPed = new TFPedidoPsDiversa())
         {
             fPed.pTp_movimento = lTicket[0].Tp_movimento;
             fPed.pCd_empresa   = lTicket[0].Cd_empresa;
             fPed.pNm_empresa   = lTicket[0].Nm_empresa;
             fPed.pCd_clifor    = lTicket[0].Cd_clifor;
             fPed.pNm_clifor    = lTicket[0].Nm_clifor;
             fPed.pCd_produto   = lTicket[0].Cd_produto;
             fPed.pDs_produto   = lTicket[0].Ds_produto;
             fPed.pCd_unidade   = lTicket[0].Cd_unidade;
             fPed.pSg_produto   = lTicket[0].Sg_produto;
             string und_balanca = CamadaNegocio.ConfigGer.TCN_CadParamGer.BuscaVL_String_Empresa("UND_BALANCA", lTicket[0].Cd_empresa);
             if (!string.IsNullOrEmpty(und_balanca))
             {
                 fPed.pQuantidade = TCN_CadConvUnidade.ConvertUnid(und_balanca, lTicket[0].Cd_unidade, lTicket.Sum(p => p.Ps_liquidobruto), 3, null);
             }
             else
             {
                 fPed.pQuantidade = lTicket.Sum(p => p.Ps_liquidobruto);
             }
             if (fPed.ShowDialog() == System.Windows.Forms.DialogResult.OK)
             {
                 CamadaDados.Faturamento.Pedido.TRegistro_Pedido rPed = new CamadaDados.Faturamento.Pedido.TRegistro_Pedido();
                 try
                 {
                     rPed.TP_Movimento = lTicket[0].Tp_movimento;
                     rPed.CD_Empresa   = fPed.pCd_empresa;
                     rPed.CFG_Pedido   = fPed.cfg_pedido;
                     rPed.CD_Clifor    = fPed.pCd_clifor;
                     rPed.CD_Endereco  = fPed.cd_endereco;
                     rPed.DT_Pedido    = CamadaDados.UtilData.Data_Servidor();
                     rPed.Pedido_Itens.Add(new CamadaDados.Faturamento.Pedido.TRegistro_LanPedido_Item()
                     {
                         Cd_produto       = fPed.pCd_produto,
                         Cd_unidade_valor = fPed.cd_unidade,
                         Cd_local         = fPed.cd_local,
                         Quantidade       = fPed.quantidade,
                         Vl_unitario      = fPed.vl_unitario,
                         Vl_subtotal      = fPed.vl_subtotal
                     });
                     CamadaNegocio.Faturamento.Pedido.TCN_Pedido.Grava_Pedido(rPed, null);
                     //Buscar pedido
                     rPed = TCN_Pedido.Busca_Registro_Pedido(rPed.Nr_pedido.ToString(), null);
                     //Buscar itens pedido
                     TCN_Pedido.Busca_Pedido_Itens(rPed, false, null);
                     TRegistro_LanFaturamento rNota = Proc_Commoditties.TProcessaPedFaturar.ProcessaPedFaturar(rPed, false, decimal.Zero);
                     rNota.Placaveiculo         = lTicket[0].Placacarreta;
                     rNota.Pesobruto            = lTicket.Sum(p => p.Ps_bruto);
                     rNota.Pesoliquido          = lTicket.Sum(p => p.Ps_liquidobruto);
                     rNota.Cd_transportadora    = lTicket[0].Cd_transp;
                     rNota.Nm_razaosocialtransp = lTicket[0].Nm_transp;
                     return(rNota);
                 }
                 catch (Exception ex)
                 {
                     TCN_Pedido.Deleta_Pedido(rPed, null);
                     throw new Exception(ex.Message.Trim());
                 }
             }
             else
             {
                 return(null);
             }
         }
     }
     else
     {
         return(null);
     }
 }
コード例 #13
0
 private void Vl_Frete_Leave(object sender, EventArgs e)
 {
     (BS_Pedido.Current as TRegistro_Pedido).Vl_frete = Vl_Frete.Value;
     TCN_Pedido.Rateia_Frete(BS_Pedido.Current as TRegistro_Pedido);
     this.TotalizarPedido();
 }
コード例 #14
0
 private void VL_Parcela_Leave(object sender, EventArgs e)
 {
     (BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto[BS_Parcelas.Position].VL_Parcela = VL_Parcela.Value;
     TCN_Pedido.Recalcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido, BS_Parcelas.Position);
     BS_Pedido.ResetCurrentItem();
 }
コード例 #15
0
 private void dt_vencto_Leave(object sender, EventArgs e)
 {
     TCN_Pedido.Valida_Datas(BS_Pedido.Current as TRegistro_Pedido, BS_Parcelas.Position);
     BS_Pedido.ResetCurrentItem();
 }
コード例 #16
0
        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;
                    }
                };
            }
        }
コード例 #17
0
 private void bb_gerarOrdemProd_Click(object sender, EventArgs e)
 {
     if (bsPRDProdutoEntregar.Current != null)
     {
         if (MessageBox.Show("Deseja gerar a ordem de produção para o produto " +
                             (bsPRDProdutoEntregar.Current as TRegistro_PRD_ProdutoEntregar).Cd_produto.Trim() + "-" +
                             (bsPRDProdutoEntregar.Current as TRegistro_PRD_ProdutoEntregar).Ds_produto.Trim() + "?", "Pergunta",
                             MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1)
             == DialogResult.Yes)
         {
             try
             {
                 //Buscar Pedido
                 TList_Pedido lPedido =
                     new TCD_Pedido().Select(
                         new Utils.TpBusca[]
                 {
                     new Utils.TpBusca()
                     {
                         vNM_Campo = "a.nr_pedido",
                         vOperador = "=",
                         vVL_Busca = (bsPRDProdutoEntregar.Current as TRegistro_PRD_ProdutoEntregar).Nr_pedido.ToString()
                     }
                 }, 1, string.Empty);
                 if (lPedido.Count > 0)
                 {
                     //Buscar Itens do Pedido
                     lPedido[0].Pedido_Itens =
                         new TCD_LanPedido_Item().Select(
                             new Utils.TpBusca[]
                     {
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.nr_pedido",
                             vOperador = "=",
                             vVL_Busca = lPedido[0].Nr_pedido.ToString()
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.id_pedidoitem",
                             vOperador = "=",
                             vVL_Busca = (bsPRDProdutoEntregar.Current as TRegistro_PRD_ProdutoEntregar).Id_item.ToString()
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.cd_produto",
                             vOperador = "=",
                             vVL_Busca = "'" + (bsPRDProdutoEntregar.Current as TRegistro_PRD_ProdutoEntregar).Cd_produto.Trim() + "'"
                         }
                     }, 0, string.Empty, string.Empty, string.Empty);
                     lPedido[0].Pedido_Itens.ForEach(x =>
                     {
                         if ((bsPRDProdutoEntregar.Current as TRegistro_PRD_ProdutoEntregar).Id_formulacao.HasValue)
                         {
                             //Buscar ficha tecnica da formula
                             TCN_FichaTec_MPrima.Buscar(cbEmpresa.SelectedValue.ToString(),
                                                        (bsPRDProdutoEntregar.Current as TRegistro_PRD_ProdutoEntregar).Id_formulacao.Value.ToString(),
                                                        string.Empty,
                                                        string.Empty,
                                                        string.Empty,
                                                        0,
                                                        string.Empty,
                                                        null).ForEach(v =>
                             {
                                 x.lFichaTec.Add(new TRegistro_FichaTecItemPed
                                 {
                                     Cd_item       = v.Cd_produto,
                                     Cd_local      = v.Cd_local,
                                     Cd_produto    = x.Cd_produto,
                                     Cd_unditem    = v.Cd_unid_produto,
                                     Id_pedidoitem = x.Id_pedidoitem,
                                     Nr_pedido     = x.Nr_pedido,
                                     Quantidade    = v.Qtd_produto
                                 });
                             });
                         }
                         else
                         {
                             //Buscar Ficha Técnica do Pedido Item
                             x.lFichaTec = new TCD_FichaTecItemPed().Select(
                                 new Utils.TpBusca[]
                             {
                                 new Utils.TpBusca()
                                 {
                                     vNM_Campo = "a.nr_pedido",
                                     vOperador = "=",
                                     vVL_Busca = x.Nr_pedido.ToString()
                                 },
                                 new Utils.TpBusca()
                                 {
                                     vNM_Campo = "a.cd_produto",
                                     vOperador = "=",
                                     vVL_Busca = "'" + x.Cd_produto.Trim() + "'"
                                 },
                                 new Utils.TpBusca()
                                 {
                                     vNM_Campo = "a.id_pedidoitem",
                                     vOperador = "=",
                                     vVL_Busca = x.Id_pedidoitem.ToString()
                                 }
                             }, 0, string.Empty);
                         }
                     });
                     //Verificar se existe item na ficha técnica sem cadastro
                     if (lPedido[0].Pedido_Itens[0].lFichaTec.Exists(p => string.IsNullOrEmpty(p.Cd_item)))
                     {
                         using (TFFichaTecItemPed fItem = new TFFichaTecItemPed())
                         {
                             fItem.rItem = lPedido[0].Pedido_Itens[0];
                             if (fItem.ShowDialog() == DialogResult.OK)
                             {
                                 if (fItem.rItem != null)
                                 {
                                     try
                                     {
                                         TCN_LanPedido_Item.GravaPedido_Item(fItem.rItem, null);
                                         MessageBox.Show("Itens alterados com sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                                         bb_gerarOrdemProd_Click(this, new EventArgs());
                                     }
                                     catch (Exception ex)
                                     { MessageBox.Show(ex.Message.Trim(), "erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
                                 }
                             }
                         }
                     }
                 }
                 TCN_Pedido.GerarOrdemProducao(lPedido[0], null);
                 MessageBox.Show("Ordem de Produção gerada com sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 bbBuscarOrdem_Click(this, new EventArgs());
             }
             catch (Exception ex)
             { MessageBox.Show(ex.Message.Trim(), "erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
         }
     }
 }
コード例 #18
0
 private void VL_Desconto_Geral_Leave(object sender, EventArgs e)
 {
     (BS_Pedido.Current as TRegistro_Pedido).Vl_descontogeral = VL_Desconto_Geral.Value;
     TCN_Pedido.Rateia_Desconto_Itens(BS_Pedido.Current as TRegistro_Pedido);
     this.TotalizarPedido();
 }
コード例 #19
0
 private void TFTrocarClienteProposta_Load(object sender, EventArgs e)
 {
     Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
     pDados.set_FormatZero();
     bsOrcamento.DataSource = new TList_Orcamento {
         Orcamento
     };
     //Buscar itens orcamento
     bsOrcamentoItem.DataSource = TCN_Orcamento_Item.Buscar(Orcamento.Nr_orcamentostr, false, false, null);
     //Buscar Pedidos
     bsPedidos.DataSource = TCN_Pedido.Busca(string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             false,
                                             false,
                                             false,
                                             false,
                                             false,
                                             false,
                                             false,
                                             false,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             string.Empty,
                                             decimal.Zero,
                                             decimal.Zero,
                                             Orcamento.Nr_orcamentostr,
                                             string.Empty,
                                             false,
                                             0,
                                             string.Empty,
                                             null);
     //Buscar Parcelas
     bsParcelas.DataSource = new TCD_LanParcela().Select(
         new Utils.TpBusca[]
     {
         new Utils.TpBusca
         {
             vNM_Campo = string.Empty,
             vOperador = "exists",
             vVL_Busca = "(select 1 from tb_fat_pedido_x_duplicata x " +
                         "inner join tb_fat_pedido_itens y " +
                         "on x.nr_pedido = y.nr_pedido " +
                         "and x.cd_empresa = a.cd_empresa " +
                         "and x.nr_lancto = a.nr_lancto " +
                         "and y.nr_orcamento = " + Orcamento.Nr_orcamentostr + ")"
         }
     }, 0, string.Empty, "a.dt_vencto", string.Empty);
 }
コード例 #20
0
 private void VL_Comissao_Leave(object sender, EventArgs e)
 {
     (BS_Pedido.Current as TRegistro_Pedido).VL_Comissao = VL_Comissao.Value;
     TCN_Pedido.Rateia_Comissao_Itens(BS_Pedido.Current as TRegistro_Pedido);
     this.TotalizarPedido();
 }