Example #1
0
        public void GravarDados()
        {
            string    sSQL     = "";
            ArrayList Nm_param = new ArrayList();
            ArrayList Vr_param = new ArrayList();

            if (IdPromocao > 0)
            {
                sSQL = "UPDATE PromocaoProdutos SET Id_Promocao=@Id,Descricao=@Descricao,DtInicio=Convert(DateTime,@DtInicio,103),DtFinal=Convert(DateTime,@DtFinal,103)," +
                       "Autorizado=@Autorizado,Observacao=@Observacao,Ativo=@Ativo,Segunda=@Segunda,Terca=@Terca,Quarta=@Quarta,Quinta=@Quinta,Sexta=@Sexta,Sabado=@Sabado," +
                       "Domingo=@Domingo,Id_Servidor=@IdServidor,QtdeTotal=@QtdeTotal,QtdeItem=@QtdeItem,PDesc=@PDesc,TipoPromocao=@TipoPromocao,PComissao=@PComissao," +
                       "VlrPedido=@VlrPedido,TipoCliente=@TipoCliente,Id_Produto=@IdProduto,DescSegUnd=@DescSegUnd,QtdeSen=@QtdeSen,QtdeEsp=@QtdeEsp,QtdeVar=@QtdeVar,QtdeMin=@QtdeMin,QtdeAta=@QtdeAta,PorUsuario=@PorUsuario Where Id_Promocao=@Chave";
                Nm_param.Add("@Chave"); Vr_param.Add(IdPromocao);
            }
            else
            {
                IdPromocao = Controle.ProximoID("PROMOCAOPRODUTOS");
                sSQL       = "INSERT INTO PromocaoProdutos (Id_Promocao,Descricao,DtInicio,DtFinal,Autorizado,Observacao,Ativo,Segunda,Terca,Quarta,Quinta,Sexta,Sabado,Domingo,Id_Servidor," +
                             "QtdeTotal,QtdeItem,PDesc,TipoPromocao,PComissao,VlrPedido,TipoCliente,Id_Produto,DescSegUnd,QtdeSen,QtdeEsp,QtdeVar,QtdeMin,QtdeAta,PorUsuario) " +
                             " VALUES (@Id,@Descricao,Convert(DateTime,@DtInicio,103),Convert(DateTime,@DtFinal,103),@Autorizado,@Observacao,@Ativo,@Segunda,@Terca,@Quarta,@Quinta,@Sexta,@Sabado,@Domingo,@IdServidor," +
                             "@QtdeTotal,@QtdeItem,@PDesc,@TipoPromocao,@PComissao,@VlrPedido,@TipoCliente,@IdProduto,@DescSegUnd,@QtdeSen,@QtdeEsp,@QtdeVar,@QtdeMin,@QtdeAta,@PorUsuario)";
            }
            if (sSQL != "")
            {
                Nm_param.Add("@Id");           Vr_param.Add(IdPromocao);
                Nm_param.Add("@Descricao");    Vr_param.Add(Descricao);
                Nm_param.Add("@DtInicio");     Vr_param.Add(DtInicio.ToShortDateString());
                Nm_param.Add("@DtFinal");      Vr_param.Add(DtFinal.ToShortDateString());
                Nm_param.Add("@Autorizado");   Vr_param.Add(Autorizado);
                Nm_param.Add("@Observacao");   Vr_param.Add(Observacao);
                Nm_param.Add("@Ativo");        Vr_param.Add(Ativo);
                Nm_param.Add("@Segunda");      Vr_param.Add(Segunda);
                Nm_param.Add("@Terca");        Vr_param.Add(Terca);
                Nm_param.Add("@Quarta");       Vr_param.Add(Quarta);
                Nm_param.Add("@Quinta");       Vr_param.Add(Quinta);
                Nm_param.Add("@Sexta");        Vr_param.Add(Sexta);
                Nm_param.Add("@Sabado");       Vr_param.Add(Sabado);
                Nm_param.Add("@Domingo");      Vr_param.Add(Domingo);
                Nm_param.Add("@IdServidor");   Vr_param.Add(IdServidor);
                Nm_param.Add("@QtdeTotal");    Vr_param.Add(QtdeTotal);
                Nm_param.Add("@QtdeItem");     Vr_param.Add(QtdeItem);
                Nm_param.Add("@PDesc");        Vr_param.Add(PDesc);
                Nm_param.Add("@TipoPromocao"); Vr_param.Add(TipoPromocao);
                Nm_param.Add("@PComissao");    Vr_param.Add(Controle.FloatToStr(PComissao, 2));
                Nm_param.Add("@VlrPedido");    Vr_param.Add(Controle.FloatToStr(VlrPedido, 2));
                Nm_param.Add("@TipoCliente");  Vr_param.Add(TipoCliente);
                Nm_param.Add("@IdProduto");    Vr_param.Add(IdProduto);
                Nm_param.Add("@DescSegUnd");   Vr_param.Add(DescSegUnd);
                Nm_param.Add("@QtdeSen");      Vr_param.Add(QtdeSen);
                Nm_param.Add("@QtdeEsp");      Vr_param.Add(QtdeEsp);
                Nm_param.Add("@QtdeVar");      Vr_param.Add(QtdeVar);
                Nm_param.Add("@QtdeMin");      Vr_param.Add(QtdeMin);
                Nm_param.Add("@QtdeAta");      Vr_param.Add(QtdeAta);
                Nm_param.Add("@PorUsuario");   Vr_param.Add(PorUsuario);
                Controle.ExecutaSQL(sSQL, Nm_param, Vr_param);
            }
        }
Example #2
0
        public void GravarDados()
        {
            string    sSQL     = "";
            ArrayList Nm_param = new ArrayList();
            ArrayList Vr_param = new ArrayList();

            if (IdLanc > 0)
            {
                sSQL = "UPDATE Promocoes SET Id_Lanc=@Id,Id_Produto=@IdProduto,DtInicio=Convert(DateTime,@DtInicio,103),DtFinal=Convert(DateTime,@DtFinal,103),VerifSldGeral=@VerifSldGeral,Qtde=@Qtde," +
                       "PrcVarejo=@PrcVarejo,PrcMinimo=@PrcMinimo,PrcAtacado=@PrcAtacado,PrcEspecial=@PrcEspecial,CodPromocao=@CodPromocao,Distribuidor=@Distribuidor,Observacao=@Observacao Where Id_Lanc=@Chave";
                Nm_param.Add("@Chave"); Vr_param.Add(IdLanc);
            }
            else
            {
                IdLanc = Controle.ProximoID("PROMOCOES");
                sSQL   = "INSERT INTO Promocoes (Id_Lanc,Id_Produto,DtInicio,DtFinal,VerifSldGeral,Qtde,PrcVarejo,PrcMinimo,PrcAtacado,PrcEspecial,CodPromocao,QtdeVenda,Distribuidor,Observacao) " +
                         " VALUES (@Id,@IdProduto,Convert(DateTime,@DtInicio,103),Convert(DateTime,@DtFinal,103),@VerifSldGeral,@Qtde,@PrcVarejo,@PrcMinimo,@PrcAtacado,@PrcEspecial,@CodPromocao,0,@Distribuidor,@Observacao)";
            }
            if (sSQL != "")
            {
                Nm_param.Add("@Id");            Vr_param.Add(IdLanc);
                Nm_param.Add("@IdProduto");     Vr_param.Add(IdProduto);
                Nm_param.Add("@DtInicio");      Vr_param.Add(DtInicio.ToShortDateString());
                Nm_param.Add("@DtFinal");       Vr_param.Add(DtFinal.ToShortDateString());
                Nm_param.Add("@VerifSldGeral"); Vr_param.Add(VerifSldGeral);
                Nm_param.Add("@Qtde");          Vr_param.Add(Controle.FloatToStr(Qtde));
                Nm_param.Add("@PrcVarejo");     Vr_param.Add(Controle.FloatToStr(PrcVarejo, 2));
                Nm_param.Add("@PrcMinimo");     Vr_param.Add(Controle.FloatToStr(PrcMinimo, 2));
                Nm_param.Add("@PrcAtacado");    Vr_param.Add(Controle.FloatToStr(PrcAtacado, 2));
                Nm_param.Add("@PrcEspecial");   Vr_param.Add(Controle.FloatToStr(PrcEspecial, 2));
                Nm_param.Add("@CodPromocao");   Vr_param.Add(CodPromocao);
                Nm_param.Add("@Distribuidor");  Vr_param.Add(Distribuidor);
                Nm_param.Add("@Observacao");    Vr_param.Add(Observacao);
                Controle.ExecutaSQL(sSQL, Nm_param, Vr_param);
            }
        }