Exemple #1
0
        private void Btn_Reprova_Click(object sender, EventArgs e)
        {
            if (CD_Clifor_Aprovador.Text != "")
            {
                if (((BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Requisicao == "AA") ||
                    ((BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Requisicao == "AP"))

                {
                    TRegistro_LanCMP_Requisicao LanRep = new TRegistro_LanCMP_Requisicao();
                    LanRep.ID_Requisicao          = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ID_Requisicao.Value;
                    LanRep.CD_Empresa             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Empresa;
                    LanRep.NM_Empresa             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).NM_Empresa;
                    LanRep.CD_CCusto              = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_CCusto;
                    LanRep.DS_CCusto              = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_CCusto;
                    LanRep.CD_Clifor_Requisitante = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Clifor_Requisitante;
                    LanRep.DS_Clifor_Requisitante = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Clifor_Requisitante;
                    LanRep.CD_Clifor_Aprovador    = CD_Clifor_Aprovador.Text;
                    LanRep.DS_Clifor_Aprovador    = DS_Clifor_Aprovador.Text;
                    LanRep.DS_Clifor_Comprador    = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Clifor_Comprador;
                    LanRep.CD_Clifor_Comprador    = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Clifor_Comprador;
                    LanRep.CD_Produto             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Produto;
                    LanRep.DS_Produto             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Produto;
                    LanRep.Dt_EntregaSolicitada   = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Dt_EntregaSolicitada;
                    LanRep.Dt_Requisicao          = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Dt_Requisicao;
                    LanRep.ST_Prioridade          = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Prioridade;
                    LanRep.TP_Aplicacao           = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).TP_Aplicacao;
                    LanRep.Quantidade             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Quantidade;
                    LanRep.DS_Marca      = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Marca;
                    LanRep.DS_Observacao = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Observacao;
                    LanRep.ST_Requisicao = "RE";
                    LanRep.QTD_Aprovada  = 0;
                    LanRep.Quantidade    = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Quantidade;

                    TCN_LanCMP_Requisicao.Grava_LanCMP_Requisicao(LanRep, null);

                    (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Requisicao       = "RE";
                    (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).QTD_Aprovada        = 0;
                    (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Clifor_Aprovador = CD_Clifor_Aprovador.Text;
                    (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Clifor_Aprovador = DS_Clifor_Aprovador.Text;
                    BS_Requisicao.ResetCurrentItem();
                    MessageBox.Show("Requisição Reprovada!");
                }
                else
                {
                    MessageBox.Show("Status deve estar como \"Aguardando Aprovação\" ou \"Aprovado\" !");
                }
            }
            else
            {
                MessageBox.Show("Aprovador Deve ser Preenchido!");
            }
        }
Exemple #2
0
        public static string Grava_LanCMP_Requisicao(TRegistro_LanCMP_Requisicao val, BancoDados.TObjetoBanco banco)
        {
            bool pode_comitar        = false;
            TCD_LanCMP_Requisicao cd = new TCD_LanCMP_Requisicao();

            try
            {
                if (banco == null)
                {
                    cd.CriarBanco_Dados(true);
                    pode_comitar = true;
                }
                else
                {
                    cd.Banco_Dados = banco;
                }

                //Grava requisicao
                string retreq = cd.Grava(val);
                for (int x = 0; x < val.lDetalheRequisicao.Count; x++)
                {
                    val.lDetalheRequisicao[x].Id_Requisicao = Convert.ToDecimal(Querys.TDataQuery.getPubVariavel(retreq, "@P_ID_REQUISICAO"));
                    TCN_LanDetalheRequisicao.Grava_LanDetalheRequisicao(val.lDetalheRequisicao[x], cd.Banco_Dados);
                }
                if (pode_comitar)
                {
                    cd.Banco_Dados.Commit_Tran();
                }
                return(retreq);
            }
            catch (System.Data.SqlClient.SqlException ex)
            {
                if (pode_comitar)
                {
                    cd.Banco_Dados.RollBack_Tran();
                }
                else
                {
                    throw new Exception(ex.Message);
                }
                return("");
            }
            finally
            {
                if (pode_comitar)
                {
                    cd.deletarBanco_Dados();
                }
            }
        }
Exemple #3
0
        public static void Deleta_LanCMP_Requisicao(TRegistro_LanCMP_Requisicao val)
        {
            TCD_LanCMP_Requisicao cd = new TCD_LanCMP_Requisicao();

            cd.Deleta(val);
        }
Exemple #4
0
        private void Btn_Aprova_Click(object sender, EventArgs e)
        {
            if (((BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Requisicao == "AA") ||
                ((BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Requisicao == "RE") ||
                ((BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Requisicao == "AP"))
            {
                if (CD_Clifor_Aprovador.Text != "")
                {
                    if (QTD_Aprovada.Value > 0)
                    {
                        if (QTD_Aprovada.Value <= (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Quantidade)
                        {
                            {
                                TRegistro_LanCMP_Requisicao LanAp = new TRegistro_LanCMP_Requisicao();
                                LanAp.ID_Requisicao          = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ID_Requisicao.Value;
                                LanAp.CD_Empresa             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Empresa;
                                LanAp.NM_Empresa             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).NM_Empresa;
                                LanAp.CD_CCusto              = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_CCusto;
                                LanAp.DS_CCusto              = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_CCusto;
                                LanAp.CD_Clifor_Requisitante = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Clifor_Requisitante;
                                LanAp.DS_Clifor_Requisitante = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Clifor_Requisitante;
                                LanAp.CD_Clifor_Aprovador    = CD_Clifor_Aprovador.Text;
                                LanAp.DS_Clifor_Aprovador    = DS_Clifor_Aprovador.Text;
                                LanAp.DS_Clifor_Comprador    = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Clifor_Comprador;
                                LanAp.CD_Clifor_Comprador    = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Clifor_Comprador;
                                LanAp.CD_Produto             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Produto;
                                LanAp.DS_Produto             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Produto;
                                LanAp.Dt_EntregaSolicitada   = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Dt_EntregaSolicitada;
                                LanAp.Dt_Requisicao          = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Dt_Requisicao;
                                LanAp.ST_Prioridade          = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Prioridade;
                                LanAp.TP_Aplicacao           = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).TP_Aplicacao;
                                LanAp.Quantidade             = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).Quantidade;
                                LanAp.DS_Marca      = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Marca;
                                LanAp.DS_Observacao = (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Observacao;
                                LanAp.ST_Requisicao = "AP";
                                LanAp.QTD_Aprovada  = QTD_Aprovada.Value;
                                TCN_LanCMP_Requisicao.Grava_LanCMP_Requisicao(LanAp, null);

                                (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).ST_Requisicao       = "AP";
                                (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).QTD_Aprovada        = QTD_Aprovada.Value;
                                (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).CD_Clifor_Aprovador = CD_Clifor_Aprovador.Text;
                                (BS_Requisicao.Current as TRegistro_LanCMP_Requisicao).DS_Clifor_Aprovador = DS_Clifor_Aprovador.Text;
                                BS_Requisicao.ResetCurrentItem();
                                MessageBox.Show("Requisição Aprovada Com Sucesso!");
                            }
                        }
                        else
                        {
                            MessageBox.Show("Quantidade APROVADA Não Pode Ser Maior que a Quantidade SOLICITADA!");
                            QTD_Aprovada.Focus();
                        }
                    }
                    else
                    {
                        MessageBox.Show("Quantidade Aprovada Não Pode Ser Igual a 0");
                        QTD_Aprovada.Focus();
                    }
                }
                else
                {
                    MessageBox.Show("Campo Aprovador Deve Ser Preenchido!");
                    CD_Clifor_Aprovador.Focus();
                }
            }
            else
            {
                MessageBox.Show("O Status deve estar como \"Reprovado\" ou \"Aguardando Aprovação\" !");
            }
        }