public String Converte_Senha(String _x) { Int64 j, r; Byte m; Char c; r = 0; for (m = 0; (m <= (_x.Length - 1)); m++) { c = _x[m]; j = c; r = (r + (j * 3)) * 2; } String retorno = Srelib.strzero(r, 10); return(retorno); }
public static DataSet PegaDadosFCaixaMensal(string xproduto, string xcontascorrentes, string xmes, string xano, string xrblancamentossituacao, Boolean xckcompensado, Boolean xcompensado, Boolean xckaplicacao) { // DataSet dslancamentos; // string tipo = "1"; string classe = ""; DateTime data = Convert.ToDateTime("01/01/1900"); string descricao = ""; string mes1 = "0,00"; string mes2 = "0,00"; string mes3 = "0,00"; string totaltrimestre = "0,00"; DateTime xdtprevisao1 = Convert.ToDateTime("01/01/1900"); DateTime xdtprevisao2 = Convert.ToDateTime("31/12/2999"); // if (xano != string.Empty) { if (xmes != string.Empty) { DateTime ultimoDia = new DateTime(Convert.ToInt16(xano), Convert.ToInt16(xmes), DateTime.DaysInMonth(Convert.ToInt16(xano), Convert.ToInt16(xmes))); xdtprevisao1 = Convert.ToDateTime("01/" + xmes + "/" + xano); xdtprevisao2 = Convert.ToDateTime(Srelib.strzero(ultimoDia.Day, 2) + "/" + xmes + "/" + xano); } } // DataTable table1 = new DataTable("table1"); table1.Columns.Add("tipo"); table1.Columns.Add("classe"); table1.Columns.Add("data"); table1.Columns.Add("descricao"); table1.Columns.Add("mes1"); table1.Columns.Add("mes2"); table1.Columns.Add("mes3"); table1.Columns.Add("totaltrimestre"); // //CONTAS A RECEBER string script = ""; string nomearquivo = "contas_receber"; script = "SELECT * FROM " + nomearquivo + " WITH(NOLOCK) "; script = script + " WHERE 1 = 1 "; //Produto if (xproduto != string.Empty) { script = script + " AND ( " + Srelib.QStr(xproduto) + " = " + Srelib.QStr("") + " OR produto IN (" + Srelib.QStr(xproduto) + ") )"; } //Contas Correntes if (xcontascorrentes != "0") { script = script + " AND "; if (xcontascorrentes.Contains(",")) { script = script + "( " + Srelib.QStr("1") + " = " + Srelib.QStr("") + " OR conta IN (" + xcontascorrentes + ") )"; } else { script = script + "( " + Srelib.QStr(xcontascorrentes) + " = " + Srelib.QStr("") + " OR conta IN (" + Srelib.QStr(xcontascorrentes) + ") )"; } } // if (xrblancamentossituacao == "P") { //Data Prevista script = script + " AND "; script = script + " (data_prevista between " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao1.ToString().Substring(0, 10))); script = script + " and " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao2.ToString().Substring(0, 10))) + ") "; } else { //Data Realizado script = script + " AND "; script = script + " (data_realizado between " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao1.ToString().Substring(0, 10))); script = script + " and " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao2.ToString().Substring(0, 10))) + ") "; } //Aplicações if (!xckaplicacao) { script = script + " AND "; script = script + " (classe > 0 ) "; } // //Compensado if (xckcompensado) { if (xcompensado) { //Compensado script = script + " AND "; script = script + " (dtcompensacao <> " + Srelib.QStr(Srelib.DataAmericanasembarra("01/01/1900")) + ") "; } else { //Não Compensado script = script + " AND "; script = script + " (dtcompensacao = " + Srelib.QStr(Srelib.DataAmericanasembarra("01/01/1900")) + ") "; } } script = script + " order by classe "; // dslancamentos = SreDblib.GetDsScript(script); // for (int i = 0; i <= dslancamentos.Tables[0].Rows.Count - 1; i++) { // tipo = "1"; classe = dslancamentos.Tables[0].Rows[i]["classe"].ToString().Trim(); // if (xrblancamentossituacao == "P") { //Previsto data = Convert.ToDateTime(dslancamentos.Tables[0].Rows[i]["data_prevista"]); // mes1 = Convert.ToString( Convert.ToDouble(mes1) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_previsto"])); // totaltrimestre = Convert.ToString( Convert.ToDouble(totaltrimestre) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_previsto"])); // } else { //Realizado data = Convert.ToDateTime(dslancamentos.Tables[0].Rows[i]["data_realizado"]); // mes1 = Convert.ToString( Convert.ToDouble(mes1) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_realizado"])); // totaltrimestre = Convert.ToString( Convert.ToDouble(totaltrimestre) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_realizado"])); // } // descricao = uReceitas.PegaReceitaDescricao(Convert.ToInt16(classe)); // try { if (classe != dslancamentos.Tables[0].Rows[i + 1]["classe"].ToString().Trim()) { table1.Rows.Add(tipo, classe, data, descricao, mes1, mes2, mes3, totaltrimestre); // mes1 = "0,00"; mes2 = "0,00"; mes3 = "0,00"; totaltrimestre = "0,00"; } // } catch (Exception) { table1.Rows.Add(tipo, classe, data, descricao, mes1, mes2, mes3, totaltrimestre); // mes1 = "0,00"; mes2 = "0,00"; mes3 = "0,00"; totaltrimestre = "0,00"; } // } // //CONTAS A PAGAR script = ""; nomearquivo = "contas_pagar"; script = "SELECT * FROM " + nomearquivo + " WITH(NOLOCK) "; script = script + " WHERE 1 = 1 "; //Produto if (xproduto != string.Empty) { script = script + " AND ( " + Srelib.QStr(xproduto) + " = " + Srelib.QStr("") + " OR produto IN (" + Srelib.QStr(xproduto) + ") )"; } //Contas Correntes if (xcontascorrentes != "0") { script = script + " AND "; if (xcontascorrentes.Contains(",")) { script = script + "( " + Srelib.QStr("1") + " = " + Srelib.QStr("") + " OR conta IN (" + xcontascorrentes + ") )"; } else { script = script + "( " + Srelib.QStr(xcontascorrentes) + " = " + Srelib.QStr("") + " OR conta IN (" + Srelib.QStr(xcontascorrentes) + ") )"; } } // if (xrblancamentossituacao == "P") { //Data Prevista script = script + " AND "; script = script + " (data_prevista between " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao1.ToString().Substring(0, 10))); script = script + " and " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao2.ToString().Substring(0, 10))) + ") "; } else { //Data Realizado script = script + " AND "; script = script + " (data_realizado between " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao1.ToString().Substring(0, 10))); script = script + " and " + Srelib.QStr(Srelib.DataAmericanasembarra(xdtprevisao2.ToString().Substring(0, 10))) + ") "; } //Aplicações if (!xckaplicacao) { script = script + " AND "; script = script + " (classe > 0 ) "; } // //Compensado if (xckcompensado) { if (xcompensado) { //Compensado script = script + " AND "; script = script + " (dtcompensacao <> " + Srelib.QStr(Srelib.DataAmericanasembarra("01/01/1900")) + ") "; } else { //Não Compensado script = script + " AND "; script = script + " (dtcompensacao = " + Srelib.QStr(Srelib.DataAmericanasembarra("01/01/1900")) + ") "; } } script = script + " order by classe "; // dslancamentos = SreDblib.GetDsScript(script); // for (int i = 0; i <= dslancamentos.Tables[0].Rows.Count - 1; i++) { // tipo = "2"; classe = dslancamentos.Tables[0].Rows[i]["classe"].ToString().Trim(); // if (xrblancamentossituacao == "P") { //Previsto data = Convert.ToDateTime(dslancamentos.Tables[0].Rows[i]["data_prevista"]); // mes1 = Convert.ToString( Convert.ToDouble(mes1) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_previsto"])); // totaltrimestre = Convert.ToString( Convert.ToDouble(totaltrimestre) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_previsto"])); // } else { //Realizado data = Convert.ToDateTime(dslancamentos.Tables[0].Rows[i]["data_realizado"]); // mes1 = Convert.ToString( Convert.ToDouble(mes1) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_realizado"])); // totaltrimestre = Convert.ToString( Convert.ToDouble(totaltrimestre) + Convert.ToDouble(dslancamentos.Tables[0].Rows[i]["vlr_realizado"])); // } // descricao = uDespesas.PegaDespesaDescricao(Convert.ToInt16(classe)); // try { if ((i < dslancamentos.Tables[0].Rows.Count) && (classe != dslancamentos.Tables[0].Rows[i + 1]["classe"].ToString().Trim())) { table1.Rows.Add(tipo, classe, data, descricao, mes1, mes2, mes3, totaltrimestre); // mes1 = "0,00"; mes2 = "0,00"; mes3 = "0,00"; totaltrimestre = "0,00"; } } catch (Exception) { // table1.Rows.Add(tipo, classe, data, descricao, mes1, mes2, mes3, totaltrimestre); // mes1 = "0,00"; mes2 = "0,00"; mes3 = "0,00"; totaltrimestre = "0,00"; // } } // DataView dataview = new DataView(table1); dataview.Sort = "tipo, descricao ASC"; DataTable table2 = dataview.ToTable(); // DataSet dsresult = new DataSet("table"); dsresult.Tables.Add(table2); // return(dsresult); }