public ModeloPCMOVCR CarregaNT()
{
String comando4 = "SELECT NVL(PROXNUMTRANS,1) PROXNUMTRANS FROM PCCONSUM FOR UPDATE";
ModeloPCMOVCR modelo = new ModeloPCMOVCR();
OracleCommand cmd = new OracleCommand();
cmd.Connection = conexao.ObjetoConexao;
cmd.CommandText = comando4;
cmd.CommandType = System.Data.CommandType.Text;
conexao.Conectar();
OracleDataReader registro = cmd.ExecuteReader();
if (registro.HasRows)
{
registro.Read();
if (registro["PROXNUMTRANS"] != DBNull.Value)
{
modelo.Numtrans = Convert.ToInt32(registro["PROXNUMTRANS"]);
}
}
conexao.Desconectar();
return(modelo);
}
public ModeloPCMOVCR CarregaSaldoCr(string codcob, int codbanco)
{
String comando3 = "SELECT VALOR FROM PCESTCR WHERE CODBANCO = :CODBANCO AND CODCOB = :CODCOB";
ModeloPCMOVCR modelo = new ModeloPCMOVCR();
OracleCommand cmd = new OracleCommand();
cmd.Connection = conexao.ObjetoConexao;
cmd.CommandText = comando3;
cmd.CommandType = System.Data.CommandType.Text;
cmd.Parameters.AddWithValue(":CODCOB", codcob);
cmd.Parameters.AddWithValue(":CODBANCO", codbanco);
conexao.Conectar();
OracleDataReader registro = cmd.ExecuteReader();
if (registro.HasRows)
{
registro.Read();
if (registro["VALOR"] != DBNull.Value)
{
modelo.Vlsaldo = Convert.ToDouble(registro["VALOR"]);
}
}
conexao.Desconectar();
return(modelo);
}
private void btnFechamento_Click(object sender, EventArgs e)
{
DALConexao cx = new DALConexao(DadosDaConexao.StringDeConexao);
BLLPCMOV financeiro = new BLLPCMOV(cx);
ModeloVENDASEL transf = financeiro.CarregaTransf(dateTimePicker1.Value.ToString("dd-MM-yyyy"));
//Carrega Informações - Necessárias
ModeloPCMOVCR modelo = new ModeloPCMOVCR();
if (transf.Vlrfaturado == 0)
{
DialogResult dialogResult = MessageBox.Show("Deseja realmente fechar caixa da data selecionada ?", "Encerramento do Dia", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2);
if (dialogResult == DialogResult.Yes)
{
for (int i = 0; i < dgvFinanceiro.RowCount; i++)
{
string moeda = "";
ModeloPCMOVCR modelo1 = financeiro.CarregaNumtrans();
ModeloPCMOVCR modelo2 = financeiro.CarregaSaldo("SEL", 510);
modelo.Data = Convert.ToDateTime(dateTimePicker1.Value.ToShortDateString());
modelo.Numcarreg = Convert.ToInt32(dgvFinanceiro.Rows[i].Cells[0].Value);
modelo.Numtrans = modelo1.Numtrans;
modelo.Vlsaldo = modelo2.Vlsaldo;
modelo.Valor = Convert.ToDouble(dgvFinanceiro.Rows[i].Cells[4].Value);
moeda = dgvFinanceiro.Rows[i].Cells[5].Value.ToString();
modelo.Codbanco = 510;
if (moeda == "D")
{
financeiro.IncluirPCMOV(modelo);
financeiro.AlteraNT();
financeiro.AlteraSaldo(modelo);
}
else
{
}
}
ModeloVENDASEL modelovd = new ModeloVENDASEL();
modelovd.Data = Convert.ToDateTime(dateTimePicker1.Value.ToShortDateString());
modelovd.Vlrpedido = Convert.ToDouble(dgvFinanceiro.Rows.Cast <DataGridViewRow>().Sum(i => Convert.ToDecimal(i.Cells[2].Value ?? 0)).ToString("N2"));
modelovd.Vlrfaturado = Convert.ToDouble(dgvFinanceiro.Rows.Cast <DataGridViewRow>().Sum(i => Convert.ToDecimal(i.Cells[3].Value ?? 0)).ToString("N2"));
financeiro.IncluirVD(modelovd);
transf.Vlrfaturado = modelovd.Vlrfaturado;
MessageBox.Show("Dados processados com sucesso.", "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
else
{
MessageBox.Show("A data escolhida para o fechamento já se encontra processada no banco de dados.", "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
}
}
public void AtualizaSaldoCR(ModeloPCMOVCR modelo)
{
String comando2 = "";
comando2 = comando2 + "UPDATE PCESTCR SET VALOR = VALOR + :VALOR WHERE CODCOB = 'SEL' AND CODBANCO = :CODBANCO";
OracleCommand cmd = new OracleCommand();
cmd.Connection = conexao.ObjetoConexao;
cmd.Parameters.AddWithValue(":VALOR", modelo.Valor);
cmd.Parameters.AddWithValue(":CODBANCO", modelo.Codbanco);
cmd.CommandText = comando2;
cmd.CommandType = System.Data.CommandType.Text;
conexao.Conectar();
cmd.ExecuteNonQuery();
conexao.Desconectar();
}
public ModeloPCMOVCR CarregaMovCr(string data)
{
String comando3 = "";
comando3 = comando3 + "SELECT NUMCAR,QTDE,PEDIDO,FATURADO,ROUND(PEDIDO-FATURADO,2)DIFERENCA FROM ( " + "\n";
comando3 = comando3 + "SELECT D.DATA,P.DTFAT,P.CODUSUR, " + "\n";
comando3 = comando3 + "(SELECT NOME FROM PCUSUARI WHERE PCUSUARI.CODUSUR = P.CODUSUR) NOME, " + "\n";
comando3 = comando3 + "P.NUMCAR,COUNT(P.NUMPED)QTDE,D.VLATEND PEDIDO,SUM(P.VLTOTAL) FATURADO " + "\n";
comando3 = comando3 + "FROM PCPEDCDUP D, PCPEDC P " + "\n";
comando3 = comando3 + "WHERE D.NUMPED = P.NUMPEDTV1 " + "\n";
comando3 = comando3 + "AND P.POSICAO = 'F' " + "\n";
comando3 = comando3 + "GROUP BY D.DATA,P.DTFAT,P.NUMCAR,D.VLATEND,P.CODUSUR " + "\n";
comando3 = comando3 + ") T " + "\n";
comando3 = comando3 + "WHERE T.DTFAT = ':DATA'";
ModeloPCMOVCR modelo = new ModeloPCMOVCR();
OracleCommand cmd = new OracleCommand();
cmd.Connection = conexao.ObjetoConexao;
cmd.CommandText = comando3;
cmd.CommandType = System.Data.CommandType.Text;
cmd.Parameters.AddWithValue(":DATA", data);
conexao.Conectar();
OracleDataReader registro = cmd.ExecuteReader();
if (registro.HasRows)
{
registro.Read();
if (registro["NUMCAR"] != DBNull.Value)
{
modelo.Numcarr = Convert.ToInt32(registro["NUMCAR"]);
}
if (registro["DIFERENCA"] != DBNull.Value)
{
modelo.Valor = Convert.ToDouble(registro["DIFERENCA"]);
}
}
conexao.Desconectar();
return(modelo);
}
public void AlteraSaldo(ModeloPCMOVCR modelo)
{
DALPCMOVCR DALObj = new DALPCMOVCR(conexao);
DALObj.AtualizaSaldoCR(modelo);
}
public void IncluirPCMOV(ModeloPCMOVCR modelo)
{
DALPCMOVCR DALObj = new DALPCMOVCR(conexao);
DALObj.IncluirVlrPAD(modelo);
}
public void IncluirVlrPAD(ModeloPCMOVCR modelo)
{
String comando1 = "";
comando1 = comando1 + "INSERT INTO PCMOVCR( " + "\n";
comando1 = comando1 + " NUMTRANS, " + "\n";
comando1 = comando1 + " DATA, " + "\n";
comando1 = comando1 + " CODBANCO, " + "\n";
comando1 = comando1 + " CODCOB, " + "\n";
comando1 = comando1 + " VALOR, " + "\n";
comando1 = comando1 + " TIPO, " + "\n";
comando1 = comando1 + " HISTORICO, " + "\n";
comando1 = comando1 + " HISTORICO2, " + "\n";
comando1 = comando1 + " NUMCARR, " + "\n";
comando1 = comando1 + " VLSALDO, " + "\n";
comando1 = comando1 + " HORA, " + "\n";
comando1 = comando1 + " MINUTO, " + "\n";
comando1 = comando1 + " CODFUNC, " + "\n";
comando1 = comando1 + " INDICE, " + "\n";
comando1 = comando1 + " OPERACAO, " + "\n";
comando1 = comando1 + " NUMDOC, " + "\n";
comando1 = comando1 + " NUMCARREG, " + "\n";
comando1 = comando1 + " CODROTINALANC " + "\n";
comando1 = comando1 + ") VALUES ( " + "\n";
comando1 = comando1 + " :NUMTRANS, " + "\n";
comando1 = comando1 + " :DATA, " + "\n";
comando1 = comando1 + " :CODBANCO, " + "\n";
comando1 = comando1 + " 'SEL', " + "\n";
comando1 = comando1 + " :VALOR, " + "\n";
comando1 = comando1 + " 'D', " + "\n";
comando1 = comando1 + " 'VLR OUTRAS RECEITAS - SEL', " + "\n";
comando1 = comando1 + " 'NUMCAR - N '||:NUMCARREG, " + "\n";
comando1 = comando1 + " 9900, " + "\n";
comando1 = comando1 + " :VLSALDO, " + "\n";
comando1 = comando1 + " TO_CHAR(SYSDATE,'hh'), " + "\n";
comando1 = comando1 + " TO_CHAR(SYSDATE,'mi'), " + "\n";
comando1 = comando1 + " 1, " + "\n";
comando1 = comando1 + " 'A', " + "\n";
comando1 = comando1 + " 1, " + "\n";
comando1 = comando1 + " :NUMDOC, " + "\n";
comando1 = comando1 + " :NUMCARREG, " + "\n";
comando1 = comando1 + " 2075 )";
OracleCommand cmd = new OracleCommand();
cmd.Connection = conexao.ObjetoConexao;
cmd.Parameters.AddWithValue(":NUMTRANS", modelo.Numtrans);
cmd.Parameters.AddWithValue(":DATA", modelo.Data);
cmd.Parameters.AddWithValue(":CODBANCO", modelo.Codbanco);
cmd.Parameters.AddWithValue(":VALOR", modelo.Valor);
cmd.Parameters.AddWithValue(":NUMCARREG", modelo.Numcarreg);
cmd.Parameters.AddWithValue(":NUMDOC", modelo.Numcarreg);
cmd.Parameters.AddWithValue(":VLSALDO", modelo.Vlsaldo);
cmd.CommandText = comando1;
cmd.CommandType = System.Data.CommandType.Text;
conexao.Conectar();
cmd.ExecuteNonQuery();
conexao.Desconectar();
}
