コード例 #1
0
        private void GridVenda_CellEndEdit(object sender, DataGridViewCellEventArgs e)
        {
            int IdEntregador = 0;

            if (e.ColumnIndex == 7)
            {
                IdEntregador = int.Parse(GridVenda.CurrentRow.Cells[7].Value.ToString());
                GridVenda.CurrentRow.Cells[9].Value = DateTime.Now.Date.ToShortDateString();
            }
            else if (e.ColumnIndex == 8)
            {
                IdEntregador = int.Parse(GridVenda.CurrentRow.Cells[8].Value.ToString());
                GridVenda.CurrentRow.Cells[9].Value = DateTime.Now.Date.ToShortDateString();
            }
            else if (e.ColumnIndex == 9)
            {
                IdEntregador = int.Parse(GridVenda.CurrentRow.Cells[7].Value.ToString());
                DateTime Dt   = DateTime.Parse(GridVenda.CurrentCell.Value.ToString());
                DateTime DtVd = DateTime.Parse(GridVenda.CurrentRow.Cells[2].Value.ToString());
                if (Dt.Date < DtVd.Date)
                {
                    MessageBox.Show("Previsão de Entrega não pode ser inferior a data da venda", "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Information);
                    Source_Venda.CancelEdit();
                    IdEntregador = 0;
                }
                else if (IdEntregador == 0)
                {
                    MessageBox.Show("Entregador não informado", "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Information);
                    Source_Venda.CancelEdit();
                    IdEntregador = 0;
                }
            }
            Controles.Verificar ExisteEntregador = new Controles.Verificar();
            ExisteEntregador.Controle = Controle;
            DateTime DtEntrega = DateTime.Parse(GridVenda.CurrentRow.Cells[9].Value.ToString());

            if (ExisteEntregador.Verificar_ExisteCadastro("Id_Entregador", "SELECT * FROM ENTREGADORES WHERE ID_ENTREGADOR=" + IdEntregador.ToString()) > 0 || IdEntregador == 0)
            {
                Controle.ExecutaSQL("Update MvVenda set Id_Entregador=" + IdEntregador.ToString() + ",PREVENTREGA=Convert(DateTime,'" + DtEntrega.ToShortDateString() + "',103)  Where Id_Venda=" + GridVenda.CurrentRow.Cells[0].Value.ToString());
                GridVenda.CurrentRow.Cells[7].Value = IdEntregador.ToString();
                GridVenda.CurrentRow.Cells[8].Value = IdEntregador.ToString();
                //Registrando Movimento de Auditoria
                if (IdEntregador > 0)
                {
                    FrmPrincipal.RegistrarAuditoria(this.Text, int.Parse(GridVenda.CurrentRow.Cells[0].Value.ToString()), GridVenda.CurrentRow.Cells[3].Value.ToString(), 7, "Mapa do Entregador: " + IdEntregador.ToString() + " Prev.Entrega" + DtEntrega.ToShortDateString());
                }
                else
                {
                    FrmPrincipal.RegistrarAuditoria(this.Text, int.Parse(GridVenda.CurrentRow.Cells[0].Value.ToString()), GridVenda.CurrentRow.Cells[3].Value.ToString(), 7, "Retirando do Mapa de Entrega");
                }
            }
            else
            {
                MessageBox.Show("Código do entregador não existe", "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Information);
            }
            //PopularGridVenda();
            GridVenda.CurrentCell = GridVenda.CurrentRow.Cells[e.ColumnIndex];
        }
コード例 #2
0
        private int VerificarCaixa()
        {
            //Verificar se tem caixa Aberto
            int IdCaixa = 0;

            Controles.Verificar VerifCx = new Controles.Verificar();
            VerifCx.Controle = Controle;
            IdCaixa          = VerifCx.Verificar_ExisteCadastro("Id_Caixa", "SELECT T1.ID_CAIXA FROM CAIXABALCAO T1 WHERE T1.STATUS=0 AND T1.ID_Usuario=" + FrmPrincipal.Perfil_Usuario.IdUsuario.ToString());
            return(IdCaixa);
        }
コード例 #3
0
        private void CalcAberturaCX()
        {
            Controles.Verificar BuscaTab = new Controles.Verificar();
            BuscaTab.Controle = Controle;
            int IdUsu = FrmPrincipal.Perfil_Usuario.IdUsuario;
            int IdCx  = BuscaTab.Verificar_ExisteCadastro("Id_Caixa", "SELECT TOP 1 ID_CAIXA FROM CAIXABALCAO WHERE STATUS=1 AND ID_USUARIO=" + IdUsu.ToString() + " ORDER BY DATA DESC");

            //Totalizando o Lanç do Caixa
            decimal TotCaixa = 0;

            SqlDataReader Tab;
            string        sSQL = "SELECT * FROM MvCaixaBalcao WHERE Status=1 and Id_Caixa=" + IdCx.ToString();

            Tab = Controle.ConsultaSQL(sSQL);
            if (Tab.HasRows)
            {
                while (Tab.Read())
                {
                    if (int.Parse(Tab["Tipo"].ToString()) == 0)
                    {
                        TotCaixa = TotCaixa - decimal.Parse(Tab["Valor"].ToString());
                    }
                    else
                    {
                        TotCaixa = TotCaixa + decimal.Parse(Tab["Valor"].ToString());
                    }
                }
            }
            //Totalizando o Movimentos
            sSQL = "SELECT ISNULL(SUM(T2.VLRORIGINAL),0) AS VALOR" +
                   " FROM MVVENDA T1" +
                   " JOIN LANCFINANCEIRO T2 ON (T2.ID_VENDA=T1.ID_VENDA) " +
                   " LEFT JOIN TIPODOCUMENTO T3 ON (T3.ID_DOCUMENTO=T2.ID_TIPODOCUMENTO) " +
                   " WHERE T1.ID_CAIXA=" + IdCx.ToString() +
                   " AND T1.ID_CAIXA<>0" +
                   " AND T1.TPVENDA IN ('PV','TROCA','VF') " +
                   " AND T1.VLRTOTAL > 0 " +
                   " AND T3.RESUMOCX=1 " +
                   " AND T1.STATUS=3 ";
            Tab = Controle.ConsultaSQL(sSQL);

            if (Tab.HasRows)
            {
                while (Tab.Read())
                {
                    TotCaixa = TotCaixa + decimal.Parse(Tab["Valor"].ToString());
                }
            }
            TxtVlrInicial.Value = TotCaixa;
        }
コード例 #4
0
        public bool EstoqueCliente(SqlDataReader Tab, int TpMov, int Opcao, int IdPessoa)
        {
            //TpMov 1-Entrada 2-Said
            //Opcoes 1-Normal 2-Cancela
            Verificar Ficha = new Verificar();

            Ficha.Controle = Controle;
            try
            {
                while (Tab.Read())
                {
                    if (Ficha.Verificar_ExisteCadastro("ID_PESSOA", "SELECT ID_PESSOA FROM SaldoPrdCliente WHERE ID_PRODUTO=" + Tab["ID_PRODUTO"].ToString() + " AND ID_PESSOA=" + IdPessoa.ToString()) == 0)
                    {
                        Controle.ExecutaSQL("INSERT INTO SALDOPRDCLIENTE(ID_PESSOA,ID_PRODUTO,SALDO) VALUES(" + IdPessoa.ToString() + "," + Tab["ID_PRODUTO"].ToString() + "," + Controle.FloatToStr(decimal.Parse(Tab["Qtde"].ToString())) + ")");
                    }
                    else
                    {
                        if (TpMov == 1)
                        {
                            if (Opcao == 1)
                            {
                                Controle.ExecutaSQL("Update SaldoPrdCliente set Saldo=Saldo+" + Controle.FloatToStr(decimal.Parse(Tab["Qtde"].ToString())) + " WHERE ID_PRODUTO=" + Tab["ID_PRODUTO"].ToString() + " AND ID_PESSOA=" + IdPessoa.ToString());
                            }
                            else
                            {
                                Controle.ExecutaSQL("Update SaldoPrdCliente set Saldo=Saldo-" + Controle.FloatToStr(decimal.Parse(Tab["Qtde"].ToString())) + " WHERE ID_PRODUTO=" + Tab["ID_PRODUTO"].ToString() + " AND ID_PESSOA=" + IdPessoa.ToString());
                            }
                        }
                        else if (TpMov == 2)
                        {
                            if (Opcao == 1)
                            {
                                Controle.ExecutaSQL("Update SaldoPrdCliente set Saldo=Saldo-" + Controle.FloatToStr(decimal.Parse(Tab["Qtde"].ToString())) + " WHERE ID_PRODUTO=" + Tab["ID_PRODUTO"].ToString() + " AND ID_PESSOA=" + IdPessoa.ToString());
                            }
                            else
                            {
                                Controle.ExecutaSQL("Update SaldoPrdCliente set Saldo=Saldo+" + Controle.FloatToStr(decimal.Parse(Tab["Qtde"].ToString())) + " WHERE ID_PRODUTO=" + Tab["ID_PRODUTO"].ToString() + " AND ID_PESSOA=" + IdPessoa.ToString());
                            }
                        }
                    }
                }
                return(true);
            }
            catch (Exception e)
            {
                MessageBox.Show("Erro: " + e.Message, "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Error);
                return(false);
            }
        }
コード例 #5
0
        public int VerificarDebito(string DocCnpj)
        {
            SqlConnection Conexao = null;

            try
            {
                // ArrayList Parametros = new ArrayList();
                // StreamReader LerParam = new StreamReader("ERP-SGE.ini");
                // while (!LerParam.EndOfStream)
                //     Parametros.Add(LerParam.ReadLine());

                //string StringConexao = "Data Source=SERVIDOR;Initial Catalog=BD_ERP_SGE; User ID=talimpo; Password=systalimpo; MultipleActiveResultSets=True;";

                Conexao = new SqlConnection(StringConexao);
                Conexao.Open();

                Funcoes Executar = new Funcoes();
                Executar.Conexao = Conexao;


                Controles.Verificar ProcVerificar = new Controles.Verificar();
                ProcVerificar.Controle = Executar;


                // Localizando o cadastro da pessoa
                SqlDataReader TabCliente;
                TabCliente = Executar.ConsultaSQL("SELECT ID_PESSOA FROM PESSOAS WHERE CNPJ='" + DocCnpj.Trim() + "'");
                if (TabCliente.HasRows)
                {
                    TabCliente.Read();
                    SqlDataReader TabDeb;
                    TabDeb = Executar.ConsultaSQL("SELECT * FROM LANCFINANCEIRO WHERE PagRec=2 AND ID_PESSOA=" + TabCliente["ID_PESSOA"].ToString() + " AND VENCIMENTO < Convert(DateTime,'" + DateTime.Now.Date.AddDays(-3).ToShortDateString() + "',103) AND STATUS=0");
                    if (TabDeb.HasRows)
                    {
                        Conexao.Dispose();
                        return(1);
                    }
                    TabDeb = Executar.ConsultaSQL("SELECT * FROM MOVCHEQUEPRE WHERE ID_PESSOA=" + TabCliente["ID_PESSOA"].ToString() + " AND STATUS=1");
                    if (TabDeb.HasRows)
                    {
                        Conexao.Dispose();
                        return(1);
                    }
                    else
                    {
                        Conexao.Dispose();
                        return(0);
                    }
                }
                else
                {
                    Conexao.Dispose();
                    return(-1); // Cliente nao localizado
                }
            }
            catch (Exception erro)
            {
                RegistroLog("Erro na Consulta: " + erro.ToString());
                Conexao.Dispose();
                return(-2);  // Erro na consulta
            }
        }