Exemplo n.º 1
0
        private void PreencherFicha(TRegistro_FormulaApontamento rFormula)
        {
            //Buscar Ficha Formula
            TList_FichaTec_MPrima lFicha =
                CamadaNegocio.Producao.Producao.TCN_FichaTec_MPrima.Buscar(rFormula.Cd_empresa,
                                                                           rFormula.Id_formulacaostr,
                                                                           string.Empty,
                                                                           string.Empty,
                                                                           string.Empty,
                                                                           0,
                                                                           string.Empty,
                                                                           null);

            lFicha.ForEach(p =>
            {
                lficha.Add(
                    new TRegistro_FichaTecOrcItem()
                {
                    Nr_orcamento = pNr_orcamento,
                    Id_item      = pId_item,
                    Cd_item      = p.Cd_produto,
                    Ds_item      = p.Ds_produto,
                    Cd_local     = p.Cd_local,
                    Ds_local     = p.Ds_local,
                    Sg_unditem   = p.Sigla_unidade,
                    Cd_unditem   = p.Cd_unidade,
                    Ds_unditem   = p.Ds_unidade,
                    Quantidade   = p.Qtd_produto,
                    SaldoEstoque = TCN_LanEstoque.Busca_Saldo_Local(pCd_empresa, p.Cd_produto, p.Cd_local, null),
                });
            });
            bsFichaTec.DataSource = lficha;
            bsFichaTec.ResetBindings(true);
        }
Exemplo n.º 2
0
 private void PreencherFicha(string pCd_produto)
 {
     //Buscar Ficha Formula
     CamadaDados.Estoque.Cadastros.TList_FichaTecProduto lFichaTec =
         CamadaNegocio.Estoque.Cadastros.TCN_FichaTecProduto.Buscar(pCd_produto, string.Empty, null);
     if (lFichaTec.Exists(p => string.IsNullOrEmpty(p.Cd_local)))
     {
         string vColunas = "a.ds_local|Local Armazenagem|150;" +
                           "a.cd_local|Código|50";
         string vParam = "|exists|(select 1 from tb_est_empresa_x_localarm x " +
                         "           where x.cd_local = a.cd_local and x.cd_empresa = '" + (bsItensOrcamento.Current as TRegistro_Orcamento_Item).Cd_empresa.Trim() + "')";
         DataRowView linha = FormBusca.UtilPesquisa.BTN_BUSCA(vColunas, null,
                                                              new CamadaDados.Estoque.Cadastros.TCD_CadLocalArm(), vParam);
         try
         {
             if (linha != null)
             {
                 lFichaTec.ForEach(p =>
                 {
                     p.Cd_local = string.IsNullOrEmpty(p.Cd_local) ? linha["cd_local"].ToString() : p.Cd_local;
                     CamadaNegocio.Estoque.Cadastros.TCN_FichaTecProduto.Gravar(p, null);
                 });
             }
             else
             {
                 PreencherFicha(pCd_produto);
             }
         }
         catch { }
     }
     lFichaTec.ForEach(p =>
     {
         (bsItensOrcamento.Current as TRegistro_Orcamento_Item).lFichaTec.Add(
             new TRegistro_FichaTecOrcItem()
         {
             Nr_orcamento    = (bsItensOrcamento.Current as TRegistro_Orcamento_Item).Nr_orcamento,
             Id_item         = (bsItensOrcamento.Current as TRegistro_Orcamento_Item).Id_item,
             Cd_item         = p.Cd_item,
             Ds_item         = p.Ds_item,
             Cd_local        = p.Cd_local,
             Ds_local        = p.Ds_local,
             Sg_unditem      = p.Sg_unditem,
             Cd_unditem      = p.Cd_unditem,
             Ds_unditem      = p.Ds_unditem,
             Quantidade      = p.Quantidade,
             SaldoEstoque    = TCN_LanEstoque.Busca_Saldo_Local((bsItensOrcamento.Current as TRegistro_Orcamento_Item).Cd_empresa, p.Cd_item, p.Cd_local, null),
             Vl_custo        = TCN_LanEstoque.BuscarVlEstoqueUltimaCompra((bsItensOrcamento.Current as TRegistro_Orcamento_Item).Cd_empresa, p.Cd_produto, null),
             Vl_ultimacompra = TCN_LanEstoque.BuscarVlUltimaCompra((bsItensOrcamento.Current as TRegistro_Orcamento_Item).Cd_empresa, p.Cd_produto, null)
         });
     });
     bsItensOrcamento.ResetCurrentItem();
 }
Exemplo n.º 3
0
 private void bbAdd_Click(object sender, EventArgs e)
 {
     using (TFItensFichaTec fItens = new TFItensFichaTec())
     {
         if (fItens.ShowDialog() == DialogResult.OK)
         {
             if (fItens.rFicha != null)
             {
                 fItens.rFicha.Nr_orcamento = pNr_orcamento;
                 fItens.rFicha.Id_item      = pId_item;
                 fItens.rFicha.SaldoEstoque = TCN_LanEstoque.Busca_Saldo_Local(pCd_empresa, fItens.rFicha.Cd_item, fItens.rFicha.Cd_local, null);
                 lficha.Add(fItens.rFicha);
                 AtualizarFicha();
             }
         }
     }
 }
Exemplo n.º 4
0
 private void bbAdd_Click(object sender, EventArgs e)
 {
     if (bsItensOrcamento.Current != null)
     {
         using (TFItensFichaTec fItens = new TFItensFichaTec())
         {
             if (fItens.ShowDialog() == DialogResult.OK)
             {
                 if (fItens.rFicha != null)
                 {
                     fItens.rFicha.Nr_orcamento = (bsItensOrcamento.Current as TRegistro_Orcamento_Item).Nr_orcamento;
                     fItens.rFicha.Id_item      = (bsItensOrcamento.Current as TRegistro_Orcamento_Item).Id_item;
                     fItens.rFicha.SaldoEstoque = TCN_LanEstoque.Busca_Saldo_Local((bsItensOrcamento.Current as TRegistro_Orcamento_Item).Cd_empresa, fItens.rFicha.Cd_item, fItens.rFicha.Cd_local, null);
                     (bsFichaTec.List as TList_FichaTecOrcItem).Add(fItens.rFicha);
                     bsFichaTec.ResetBindings(true);
                 }
             }
         }
     }
 }
Exemplo n.º 5
0
 private void bbAdd_Click(object sender, EventArgs e)
 {
     if (string.IsNullOrEmpty(CD_Empresa.Text))
     {
         MessageBox.Show("Obrigatório informar empresa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         return;
     }
     using (TFOrdem_MPrima fOrdem = new TFOrdem_MPrima())
     {
         fOrdem.pCd_empresa = CD_Empresa.Text;
         if (fOrdem.ShowDialog() == DialogResult.OK)
         {
             if (fOrdem.ROrdem_MPrima != null)
             {
                 fOrdem.ROrdem_MPrima.SaldoEstoque     = TCN_LanEstoque.Busca_Saldo_Local(CD_Empresa.Text, fOrdem.ROrdem_MPrima.Cd_produto, fOrdem.ROrdem_MPrima.Cd_local, null);
                 fOrdem.ROrdem_MPrima.Qtd_produto_calc = fOrdem.ROrdem_MPrima.Qtd_produto;
                 (bsOrdemProducao.Current as TRegistro_OrdemProducao).lOrdem_MPrima.Add(fOrdem.ROrdem_MPrima);
                 bsOrdemProducao.ResetCurrentItem();
             }
         }
     }
 }
Exemplo n.º 6
0
 private void PreencherFicha()
 {
     //Buscar Ficha do Cadastro de Produto
     CamadaDados.Estoque.Cadastros.TList_FichaTecProduto lFicha =
         TCN_FichaTecProduto.Buscar(cd_produto.Text,
                                    string.Empty,
                                    null);
     if (lFicha.Count > 0)
     {
         if (lFicha.Exists(p => string.IsNullOrEmpty(p.Cd_local)))
         {
             string vColunas = "a.ds_local|Local Armazenagem|150;" +
                               "a.cd_local|Código|50";
             string vParam = "|exists|(select 1 from tb_est_empresa_x_localarm x " +
                             "           where x.cd_local = a.cd_local and x.cd_empresa = '" + CD_Empresa.Text.Trim() + "')";
             DataRowView linha = FormBusca.UtilPesquisa.BTN_BUSCA(vColunas, null,
                                                                  new CamadaDados.Estoque.Cadastros.TCD_CadLocalArm(), vParam);
             try
             {
                 if (linha != null)
                 {
                     lFicha.ForEach(p =>
                     {
                         p.Cd_local = string.IsNullOrEmpty(p.Cd_local) ? linha["cd_local"].ToString() : p.Cd_local;
                         TCN_FichaTecProduto.Gravar(p, null);
                     });
                 }
                 else
                 {
                     PreencherFicha();
                 }
             }
             catch { }
         }
         lFicha.ForEach(p =>
         {
             (bsOrdemProducao.Current as TRegistro_OrdemProducao).lOrdem_MPrima.Add(
                 new TRegistro_Ordem_MPrima
             {
                 Cd_produto       = p.Cd_item,
                 Ds_produto       = p.Ds_item,
                 Cd_unidade       = p.Cd_unditem,
                 Ds_unidade       = p.Ds_unditem,
                 Sigla_unidade    = p.Sg_unditem,
                 Cd_local         = p.Cd_local,
                 Ds_local         = p.Ds_local,
                 Qtd_produto      = p.Quantidade,
                 Qtd_produto_calc = p.Quantidade,
                 SaldoEstoque     = TCN_LanEstoque.Busca_Saldo_Local(CD_Empresa.Text, p.Cd_item, p.Cd_local, null)
             });
         });
     }
     else
     {
         //Verificar ficha tecnica produção
         TList_FormulaApontamento lFormula =
             CamadaNegocio.Producao.Producao.TCN_FormulaApontamento.Buscar(CD_Empresa.Text,
                                                                           string.Empty,
                                                                           string.Empty,
                                                                           string.Empty,
                                                                           string.Empty,
                                                                           cd_produto.Text,
                                                                           string.Empty,
                                                                           0,
                                                                           string.Empty,
                                                                           null);
         TRegistro_FormulaApontamento rFormula = null;
         if (lFormula.Count > 1)
         {
             using (TFListFormula fList = new TFListFormula())
             {
                 fList.lFormula = lFormula;
                 if (fList.ShowDialog() == DialogResult.OK)
                 {
                     rFormula = fList.rFormula;
                     (bsOrdemProducao.Current as TRegistro_OrdemProducao).Qt_produto = rFormula.Qt_produto;
                 }
                 else
                 {
                     MessageBox.Show("Obrigatório selecionar formula.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Error);
                     return;
                 }
             }
         }
         else if (lFormula.Count.Equals(1))
         {
             rFormula = lFormula[0];
         }
         if (rFormula != null)
         {
             (bsOrdemProducao.Current as TRegistro_OrdemProducao).Qt_produto = rFormula.Qt_produto;
             (bsOrdemProducao.Current as TRegistro_OrdemProducao).Cd_local   = rFormula.Cd_local;
             (bsOrdemProducao.Current as TRegistro_OrdemProducao).Ds_local   = rFormula.Ds_local;
             //Buscar ficha tecnica da formula selecionada
             TList_FichaTec_MPrima lFichaP =
                 CamadaNegocio.Producao.Producao.TCN_FichaTec_MPrima.Buscar(rFormula.Cd_empresa,
                                                                            rFormula.Id_formulacaostr,
                                                                            string.Empty,
                                                                            string.Empty,
                                                                            string.Empty,
                                                                            0,
                                                                            string.Empty,
                                                                            null);
             lFichaP.ForEach(p =>
             {
                 (bsOrdemProducao.Current as TRegistro_OrdemProducao).lOrdem_MPrima.Add(
                     new TRegistro_Ordem_MPrima
                 {
                     CD_Empresa           = p.Cd_empresa,
                     ID_Formulacao_MPrima = p.Id_formulacao_mprima,
                     Cd_produto           = p.Cd_produto,
                     Ds_produto           = p.Ds_produto,
                     Cd_unidade           = p.Cd_unidade,
                     Ds_unidade           = p.Ds_unidade,
                     Sigla_unidade        = p.Sigla_unidade,
                     Cd_local             = p.Cd_local,
                     Ds_local             = p.Ds_local,
                     Qtd_produto          = p.Qtd_produto,
                     Qtd_produto_calc     = p.Qtd_produto,
                     SaldoEstoque         = TCN_LanEstoque.Busca_Saldo_Local(CD_Empresa.Text, p.Cd_produto, p.Cd_local, null)
                 });
             });
             (bsOrdemProducao.Current as TRegistro_OrdemProducao).Id_formulacao = rFormula.Id_formulacao;
         }
     }
     bsOrdemMP.ResetCurrentItem();
     bsOrdemProducao.ResetCurrentItem();
 }
Exemplo n.º 7
0
 private decimal BuscarSaldoLocal(string Cd_empresa, string Cd_produto, string Cd_local)
 {
     return(TCN_LanEstoque.Busca_Saldo_Local(Cd_empresa, Cd_produto, Cd_local));
 }