Exemple #1
0
 private void AprovarNegociacao()
 {
     if (bsNegociacao.Current != null)
     {
         if ((bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).St_registro.Trim().ToUpper().Equals("F"))
         {
             using (TFListaFornecedor fLista = new TFListaFornecedor())
             {
                 fLista.lItens = (bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).lItens;
                 if (fLista.ShowDialog() == DialogResult.OK)
                 {
                     //Pedir autenticacao de um usuario com acesso a fazer conferencia
                     using (Parametros.Diversos.TFRegraUsuario fUser = new Parametros.Diversos.TFRegraUsuario())
                     {
                         fUser.Ds_regraespecial = "PERMITIR APROVAR NEGOCIACAO";
                         if (fUser.ShowDialog() == DialogResult.OK)
                         {
                             (bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).Loginaprovareprova = fUser.Login;
                             try
                             {
                                 CamadaNegocio.Compra.Lancamento.TCN_Negociacao.ProcessarNegociacao(bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao, null);
                                 MessageBox.Show("Negociação Processada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                                 this.LimparFiltros();
                                 id_negociacao.Text = (bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).Id_negociacao.Value.ToString();
                                 this.afterBusca();
                             }
                             catch (Exception ex)
                             {
                                 MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
                             }
                         }
                     }
                 }
             }
         }
         else
         {
             MessageBox.Show("Permitido aprovar somente negociação com status <FECHADA>.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         }
     }
 }
Exemple #2
0
 private void afterNovo()
 {
     using (TFRequisicao fReq = new TFRequisicao())
     {
         if (fReq.ShowDialog() == DialogResult.OK)
         {
             if (fReq.rReq != null)
             {
                 try
                 {
                     if (fReq.rReq.Tp_requisicao.Trim().ToUpper().Equals("E"))
                     {
                         //Verificar se existe alguma negociacao aprovada para este produto
                         CamadaDados.Compra.Lancamento.TList_NegociacaoItem lNegociacao =
                             new CamadaDados.Compra.Lancamento.TCD_NegociacaoItem().Select(
                                 new Utils.TpBusca[]
                         {
                             new Utils.TpBusca()
                             {
                                 vNM_Campo = "isnull(d.st_registro, 'A')",
                                 vOperador = "=",
                                 vVL_Busca = "'P'"
                             },
                             new Utils.TpBusca()
                             {
                                 vNM_Campo = "isnull(a.st_registro, 'A')",
                                 vOperador = "=",
                                 vVL_Busca = "'V'"
                             },
                             //Dentro do prazo de vigencia
                             new Utils.TpBusca()
                             {
                                 vNM_Campo = string.Empty,
                                 vOperador = string.Empty,
                                 vVL_Busca = "(case when a.NR_DiasVigencia = 0 then CONVERT(DATETIME,FLOOR(CONVERT(NUMERIC(30,10), GETDATE()))) else " +
                                             "CONVERT(DATETIME,FLOOR(CONVERT(NUMERIC(30,10), d.dt_fechnegociacao)) + a.NR_DiasVigencia) end " +
                                             ") >= " +
                                             "CONVERT(DATETIME,FLOOR(CONVERT(NUMERIC(30,10), GETDATE()))) "
                             },
                             new Utils.TpBusca()
                             {
                                 vNM_Campo = string.Empty,
                                 vOperador = string.Empty,
                                 vVL_Busca = "((d.cd_produto = '" + fReq.rReq.Cd_produto.Trim() + "') or (" +
                                             "exists(select 1 from tb_est_produto x " +
                                             "where x.cd_grupo = d.cd_grupo " +
                                             "and x.cd_produto = '" + fReq.rReq.Cd_produto.Trim() + "' " +
                                             "and isnull(d.cd_produto, '') = '')))"
                             }
                         }, 0, string.Empty, string.Empty);
                         if (lNegociacao.Count > 0)
                         {
                             //Chamar tela de negociacao
                             using (TFListaFornecedor fFornec = new TFListaFornecedor())
                             {
                                 CamadaDados.Compra.TList_CFGCompra lCfg =
                                     CamadaNegocio.Compra.TCN_CFGCompra.Buscar(cd_empresa.Text,
                                                                               string.Empty,
                                                                               string.Empty,
                                                                               string.Empty,
                                                                               string.Empty,
                                                                               0,
                                                                               string.Empty,
                                                                               null);
                                 if (lCfg.Count > 0)
                                 {
                                     fFornec.Qtd_negociacao = lCfg[0].Qtd_min_negociacao;
                                 }
                                 fFornec.lItens        = lNegociacao;
                                 fFornec.St_requisicao = true;
                                 fFornec.Text          = "Lista de Negociação em vigencia do produto " + cd_produto.Text.Trim();
                                 if (fFornec.ShowDialog() == DialogResult.OK)
                                 {
                                     //Montar lista de negociacao selecionada
                                     fFornec.lItens.ForEach(p =>
                                     {
                                         if (p.St_processar)
                                         {
                                             fReq.rReq.lReqneg.Add(
                                                 new CamadaDados.Compra.Lancamento.TRegistro_Requisicao_X_Negociacao()
                                             {
                                                 Id_negociacao = p.Id_negociacao,
                                                 Id_item       = p.Id_item
                                             });
                                         }
                                     });
                                     //Mudar status da ordem para Aguardando Aprovacao
                                     fReq.rReq.St_requisicao = "AA";
                                     lNegociacao.ForEach(p =>
                                     {
                                         fReq.rReq.lCotacoes.Add(new CamadaDados.Compra.Lancamento.TRegistro_Cotacao()
                                         {
                                             Cd_empresa         = fReq.rReq.Cd_empresa,
                                             Cd_fornecedor      = p.Cd_fornecedor,
                                             Cd_endfornecedor   = p.Cd_endfornecedor,
                                             Cd_condpgto        = p.Cd_condpgto,
                                             Cd_moeda           = p.Cd_moeda,
                                             Cd_portador        = p.Cd_portador,
                                             Nm_vendedor        = p.Nm_vendedor,
                                             Emailvendedor      = p.Email_vendedor,
                                             Fonefax            = p.FoneFax,
                                             Qtd_atendida       = fReq.rReq.Quantidade,
                                             Vl_unitario_cotado = p.Vl_unitario_negociado,
                                             Dt_cotacao         = CamadaDados.UtilData.Data_Servidor(),
                                             Ds_observacao      = p.Ds_observacao,
                                             Nr_diasvigencia    = p.Nr_diasvigencia,
                                             St_registro        = "A"
                                         });
                                     });
                                 }
                             }
                         }
                     }
                     else
                     {
                         fReq.rReq.St_requisicao = "AP";//Requisicao INTERNA ja entra como APROVADA
                         fReq.rReq.Qtd_aprovada  = fReq.rReq.Quantidade;
                     }
                     //Verificar se existe requisicao com o mesmo o produto sem cotacoes lancadas
                     CamadaDados.Compra.Lancamento.TList_Requisicao lReq =
                         new CamadaDados.Compra.Lancamento.TCD_Requisicao().Select(
                             new Utils.TpBusca[]
                     {
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.cd_empresa",
                             vOperador = "=",
                             vVL_Busca = "'" + fReq.rReq.Cd_empresa.Trim() + "'"
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.cd_produto",
                             vOperador = "=",
                             vVL_Busca = "'" + fReq.rReq.Cd_produto.Trim() + "'"
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.CD_Clifor_Requisitante",
                             vOperador = "=",
                             vVL_Busca = "'" + fReq.rReq.Cd_clifor_requisitante.Trim() + "'"
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.id_tprequisicao",
                             vOperador = "=",
                             vVL_Busca = fReq.rReq.Id_tprequisicaostr
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "a.cd_local",
                             vOperador = "=",
                             vVL_Busca = "'" + fReq.rReq.Cd_local + "'"
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = "isnull(a.ST_Requisicao, 'AC')",
                             vOperador = "=",
                             vVL_Busca = "'AC'"
                         },
                         new Utils.TpBusca()
                         {
                             vNM_Campo = string.Empty,
                             vOperador = "not exists",
                             vVL_Busca = "(select 1 from tb_cmp_cotacao x " +
                                         "where a.cd_empresa = x.cd_empresa " +
                                         "and a.id_requisicao = x.id_requisicao) "
                         }
                     }, 1, string.Empty, string.Empty);
                     if (lReq.Count > 0)
                     {
                         if (MessageBox.Show("A requisição Nº" + lReq[0].Id_requisicao.ToString() + " com data " + lReq[0].Dt_requisicaostr + ".\r\n" +
                                             "Ainda não possui cotações lançadas.\r\n" +
                                             "Deseja adicionar a QTD lançada para esta requisição?", "Pergunta",
                                             MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.Yes)
                         {
                             fReq.rReq.Id_requisicao = lReq[0].Id_requisicao;
                             fReq.rReq.Quantidade    = fReq.rReq.Quantidade + lReq[0].Quantidade;
                             fReq.rReq.Ds_observacao = lReq[0].Ds_observacao + "\r\n" + fReq.rReq.Ds_observacao;
                         }
                     }
                     CamadaNegocio.Compra.Lancamento.TCN_Requisicao.GravarRequisicao(fReq.rReq, null);
                     MessageBox.Show("Requisição gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                     afterBusca();
                 }
                 catch (Exception ex)
                 {
                     MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 }
             }
         }
     }
 }