Example #1
0
        //
        public void Atlz_SaldoContaCaixa(int Tipo, int IdCxa, int IdDoc, DateTime Data, decimal VlrMov) //Mov L-Lançamento E-Estorno // Tipo 1-Debito 2-Credito
        {
            decimal SaldoAnterior = 0;
            // Verificando o Saldo Anterior

            SqlDataReader TabSldAnt;

            TabSldAnt = Controle.ConsultaSQL("SELECT * FROM SALDOCONTACAIXA WHERE Id_CAIXA=" + IdCxa.ToString() + " AND ID_DOCUMENTO=" + IdDoc.ToString() + " AND DATA < CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103) ORDER BY DATA DESC");
            if (TabSldAnt.HasRows)
            {
                TabSldAnt.Read();
                SaldoAnterior = decimal.Parse(TabSldAnt["Saldo"].ToString());
            }

            SqlDataReader TabSld;

            TabSld = Controle.ConsultaSQL("SELECT * FROM SALDOCONTACAIXA WHERE Id_CAIXA=" + IdCxa.ToString() + " AND ID_DOCUMENTO=" + IdDoc.ToString() + " AND DATA = CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)");
            if (TabSld.HasRows)
            {
                TabSld.Read();
                if (Tipo == 2)
                {
                    Controle.ExecutaSQL("UPDATE SALDOCONTACAIXA SET SALDOANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 2) + ",CREDITO=CREDITO+" + Controle.FloatToStr(VlrMov, 2) + ",SALDO=SALDO+" + Controle.FloatToStr(VlrMov, 2) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
                    SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) + VlrMov;
                }
                else
                {
                    Controle.ExecutaSQL("UPDATE SALDOCONTACAIXA  SET SALDOANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 2) + ",DEBITO=DEBITO+" + Controle.FloatToStr(VlrMov, 2) + ",SALDO=SALDO-" + Controle.FloatToStr(VlrMov, 2) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
                    SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) - VlrMov;
                }
            }
            else
            {
                int IdLanc = Controle.ProximoID("SaldoContaCaixa");
                if (Tipo == 2)
                {
                    Controle.ExecutaSQL("INSERT INTO SALDOCONTACAIXA (ID_LANC,ID_CAIXA,ID_DOCUMENTO,DATA,SALDOANTERIOR,CREDITO,DEBITO,SALDO,STATUS) VALUES (" + IdLanc.ToString() + "," + IdCxa.ToString() + "," + IdDoc.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 2) + "," + Controle.FloatToStr(VlrMov, 2) + ",0," + Controle.FloatToStr(SaldoAnterior + VlrMov, 2) + ",0)");
                    SaldoAnterior = SaldoAnterior + VlrMov;
                }
                else
                {
                    Controle.ExecutaSQL("INSERT INTO SALDOCONTACAIXA (ID_LANC,ID_CAIXA,ID_DOCUMENTO,DATA,SALDOANTERIOR,CREDITO,DEBITO,SALDO,STATUS) VALUES (" + IdLanc.ToString() + "," + IdCxa.ToString() + "," + IdDoc.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 2) + ",0," + Controle.FloatToStr(VlrMov, 3) + "," + Controle.FloatToStr(SaldoAnterior + (-1 * VlrMov), 3) + ",0)");
                    SaldoAnterior = SaldoAnterior - VlrMov;
                }
            }
            // Atualização dos Saldo nas Datas posteriores
            DataSet SldMov = new DataSet();

            SldMov = Controle.ConsultaTabela("SELECT * FROM SALDOCONTACAIXA WHERE Id_Caixa=" + IdCxa.ToString() + " AND ID_documento=" + IdDoc.ToString() + " AND DATA > CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103) ORDER BY DATA");
            if (SldMov.Tables[0].Rows.Count > 0)
            {
                for (int I = 0; I <= SldMov.Tables[0].Rows.Count - 1; I++)
                {
                    Controle.ExecutaSQL("UPDATE SALDOCONTACAIXA SET SALDOANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",SALDO=" + Controle.FloatToStr(SaldoAnterior, 3) + "+(CREDITO-DEBITO) WHERE ID_LANC=" + SldMov.Tables[0].Rows[I]["Id_Lanc"].ToString());
                    SaldoAnterior = SaldoAnterior + (decimal.Parse(SldMov.Tables[0].Rows[I]["CREDITO"].ToString()) - decimal.Parse(SldMov.Tables[0].Rows[I]["DEBITO"].ToString()));
                }
            }
        }
Example #2
0
        /*public void Atlz_SaldoEstoque(string Mov,string Op, int IdPrd,DateTime Data,decimal Qtde) //Mov E-Entrada S-Saida // Op I-Incluir C-Cancelar
         * {
         *  decimal SaldoAnterior = 0;
         *  // Verificando o Saldo Anterior
         *
         *  SqlDataReader TabSldAnt;
         *  TabSldAnt = Controle.ConsultaSQL("SELECT * FROM SALDOESTOQUE WHERE Id_Produto=" + IdPrd.ToString() + " AND DATA < CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103) ORDER BY DATA DESC");
         *  if (TabSldAnt.HasRows)
         *  {
         *      TabSldAnt.Read();
         *      SaldoAnterior = decimal.Parse(TabSldAnt["Saldo"].ToString());
         *  }
         *
         *  SqlDataReader TabSld;
         *  TabSld = Controle.ConsultaSQL("SELECT * FROM SALDOESTOQUE WHERE Id_Produto=" + IdPrd.ToString() + " AND DATA = CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)");
         *  if (TabSld.HasRows)
         *  {
         *      TabSld.Read();
         *      if (Mov == "E")
         *      {
         *          if (Op == "I")
         *          {
         *              Controle.ExecutaSQL("UPDATE SALDOESTOQUE SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",ENTRADAS=ENTRADAS+" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO+" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
         *              SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) + Qtde;
         *          }
         *          else
         *          {
         *              Controle.ExecutaSQL("UPDATE SALDOESTOQUE SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",ENTRADAS=ENTRADAS-" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO-" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
         *              SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) - Qtde;
         *          }
         *      }
         *      else
         *      {
         *          if (Op == "I")
         *          {
         *              Controle.ExecutaSQL("UPDATE SALDOESTOQUE SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",SAIDAS=SAIDAS+" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO-" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
         *              SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) - Qtde;
         *          }
         *          else
         *          {
         *              Controle.ExecutaSQL("UPDATE SALDOESTOQUE SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",SAIDAS=SAIDAS-" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO+" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
         *              SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) + Qtde;
         *          }
         *      }
         *  }
         *  else
         *  {
         *      int IdLanc = Controle.ProximoID("SaldoEstoque");
         *      if (Mov == "E")
         *      {
         *          if (Op == "I")
         *          {
         *              Controle.ExecutaSQL("INSERT INTO SALDOESTOQUE (ID_LANC,ID_PRODUTO,DATA,SLDANTERIOR,ENTRADAS,SAIDAS,SALDO) VALUES (" + IdLanc.ToString() + "," + IdPrd.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 3) + "," + Controle.FloatToStr(Qtde, 3) + ",0," + Controle.FloatToStr(SaldoAnterior + Qtde, 3) + ")");
         *              SaldoAnterior = SaldoAnterior + Qtde;
         *          }
         *          else
         *          {
         *              Controle.ExecutaSQL("INSERT INTO SALDOESTOQUE (ID_LANC,ID_PRODUTO,DATA,SLDANTERIOR,ENTRADAS,SAIDAS,SALDO) VALUES (" + IdLanc.ToString() + "," + IdPrd.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 3) + "," + Controle.FloatToStr(-1 * Qtde, 3) + ",0," + Controle.FloatToStr(SaldoAnterior - Qtde, 3) + ")");
         *              SaldoAnterior = SaldoAnterior - Qtde;
         *          }
         *      }
         *      else
         *      {
         *          if (Op == "I")
         *          {
         *              Controle.ExecutaSQL("INSERT INTO SALDOESTOQUE (ID_LANC,ID_PRODUTO,DATA,SLDANTERIOR,ENTRADAS,SAIDAS,SALDO) VALUES (" + IdLanc.ToString() + "," + IdPrd.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 3) + ",0," + Controle.FloatToStr(Qtde, 3) + "," + Controle.FloatToStr(SaldoAnterior + (-1 * Qtde), 3) + ")");
         *              SaldoAnterior = SaldoAnterior - Qtde;
         *          }
         *          else
         *          {
         *              Controle.ExecutaSQL("INSERT INTO SALDOESTOQUE (ID_LANC,ID_PRODUTO,DATA,SLDANTERIOR,ENTRADAS,SAIDAS,SALDO) VALUES (" + IdLanc.ToString() + "," + IdPrd.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 3) + ",0," + Controle.FloatToStr(-1 * Qtde, 3) + "," + Controle.FloatToStr(SaldoAnterior + Qtde, 3) + ")");
         *              SaldoAnterior = SaldoAnterior + Qtde;
         *          }
         *      }
         *  }
         *  // Atualização dos Saldo nas Datas posteriores
         *  DataSet SldMov = new DataSet();
         *  SldMov = Controle.ConsultaTabela("SELECT * FROM SALDOESTOQUE WHERE Id_Produto=" + IdPrd.ToString() + " AND DATA > CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103) ORDER BY DATA");
         *  if (SldMov.Tables[0].Rows.Count > 0)
         *  {
         *      for (int I = 0; I <= SldMov.Tables[0].Rows.Count - 1; I++)
         *      {
         *          Controle.ExecutaSQL("UPDATE SALDOESTOQUE SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",SALDO=" + Controle.FloatToStr(SaldoAnterior, 3) + "+(ENTRADAS-SAIDAS) WHERE ID_LANC=" + SldMov.Tables[0].Rows[I]["Id_Lanc"].ToString());
         *          SaldoAnterior = SaldoAnterior + (decimal.Parse(SldMov.Tables[0].Rows[I]["Entradas"].ToString()) - decimal.Parse(SldMov.Tables[0].Rows[I]["Saidas"].ToString()));
         *      }
         *  }
         *  //Atualizando o Saldo Atual do Estoque no Cadastro do Produto
         *  Controle.ExecutaSQL("UPDATE PRODUTOS SET SALDOESTOQUE=" + Controle.FloatToStr(SaldoAnterior, 3)+" WHERE ID_PRODUTO=" + IdPrd.ToString());
         * }*/

        private void Atlz_SaldoEstoqueFiscal(int IdFilial, string Mov, string Op, int IdPrd, DateTime Data, decimal Qtde) //Mov E-Entrada S-Saida // Op I-Incluir C-Cancelar
        {
            decimal SaldoAnterior = 0;
            // Verificando o Saldo Anterior

            SqlDataReader TabSldAnt;

            TabSldAnt = Controle.ConsultaSQL("SELECT * FROM SALDOESTOQUEFISCAL WHERE Id_Filial=" + IdFilial.ToString() + " AND Id_Produto=" + IdPrd.ToString() + " AND DATA < CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103) ORDER BY DATA DESC");
            if (TabSldAnt.HasRows)
            {
                TabSldAnt.Read();
                SaldoAnterior = decimal.Parse(TabSldAnt["Saldo"].ToString());
            }
            SqlDataReader TabSld;

            TabSld = Controle.ConsultaSQL("SELECT * FROM SALDOESTOQUEFISCAL WHERE Id_Filial=" + IdFilial.ToString() + " AND Id_Produto=" + IdPrd.ToString() + " AND DATA = CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)");
            if (TabSld.HasRows)
            {
                TabSld.Read();
                if (Mov == "E")
                {
                    if (Op == "I")
                    {
                        Controle.ExecutaSQL("UPDATE SALDOESTOQUEFISCAL SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",ENTRADAS=ENTRADAS+" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO+" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
                        SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) + Qtde;
                    }
                    else
                    {
                        Controle.ExecutaSQL("UPDATE SALDOESTOQUEFISCAL SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",ENTRADAS=ENTRADAS-" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO-" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
                        SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) - Qtde;
                    }
                }
                else
                {
                    if (Op == "I")
                    {
                        Controle.ExecutaSQL("UPDATE SALDOESTOQUEFISCAL SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",SAIDAS=SAIDAS+" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO-" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
                        SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) - Qtde;
                    }
                    else
                    {
                        Controle.ExecutaSQL("UPDATE SALDOESTOQUEFISCAL SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",SAIDAS=SAIDAS-" + Controle.FloatToStr(Qtde, 3) + ",SALDO=SALDO+" + Controle.FloatToStr(Qtde, 3) + " WHERE ID_LANC=" + int.Parse(TabSld["ID_LANC"].ToString()));
                        SaldoAnterior = decimal.Parse(TabSld["Saldo"].ToString()) + Qtde;
                    }
                }
            }
            else
            {
                int IdLanc = Controle.ProximoID("SaldoEstoqueFiscal");
                if (Mov == "E")
                {
                    Controle.ExecutaSQL("INSERT INTO SALDOESTOQUEFISCAL (ID_LANC,ID_FILIAL,ID_PRODUTO,DATA,SLDANTERIOR,ENTRADAS,SAIDAS,SALDO) VALUES (" + IdLanc.ToString() + "," + IdFilial.ToString() + "," + IdPrd.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 3) + "," + Controle.FloatToStr(Qtde, 3) + ",0," + Controle.FloatToStr(SaldoAnterior + Qtde, 3) + ")");
                    SaldoAnterior = SaldoAnterior + Qtde;
                }
                else
                {
                    Controle.ExecutaSQL("INSERT INTO SALDOESTOQUEFISCAL (ID_LANC,ID_FILIAL,ID_PRODUTO,DATA,SLDANTERIOR,ENTRADAS,SAIDAS,SALDO) VALUES (" + IdLanc.ToString() + "," + IdFilial.ToString() + "," + IdPrd.ToString() + ",CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103)," + Controle.FloatToStr(SaldoAnterior, 3) + ",0," + Controle.FloatToStr(Qtde, 3) + "," + Controle.FloatToStr(SaldoAnterior + (-1 * Qtde), 3) + ")");
                    SaldoAnterior = SaldoAnterior - Qtde;
                }
            }
            // Atualização dos Saldo nas Datas posteriores
            DataSet SldMov = new DataSet();

            SldMov = Controle.ConsultaTabela("SELECT * FROM SALDOESTOQUEFISCAL WHERE Id_Filial=" + IdFilial.ToString() + " AND Id_Produto=" + IdPrd.ToString() + " AND DATA > CONVERT(DATETIME,'" + Data.ToShortDateString() + "',103) ORDER BY DATA");
            if (SldMov.Tables[0].Rows.Count > 0)
            {
                for (int I = 0; I <= SldMov.Tables[0].Rows.Count - 1; I++)
                {
                    Controle.ExecutaSQL("UPDATE SALDOESTOQUEFISCAL SET SLDANTERIOR=" + Controle.FloatToStr(SaldoAnterior, 3) + ",SALDO=" + Controle.FloatToStr(SaldoAnterior, 3) + "+(ENTRADAS-SAIDAS) WHERE ID_LANC=" + SldMov.Tables[0].Rows[I]["Id_Lanc"].ToString());
                    SaldoAnterior = SaldoAnterior + (decimal.Parse(SldMov.Tables[0].Rows[I]["Entradas"].ToString()) - decimal.Parse(SldMov.Tables[0].Rows[I]["Saidas"].ToString()));
                }
            }
        }