private void afterNovo()
{
using (TFCreditoClifor fCred = new TFCreditoClifor())
{
if (fCred.ShowDialog() == DialogResult.OK)
{
if (fCred.rCred != null)
{
using (Financeiro.TFLanCaixa fCaixa = new Financeiro.TFLanCaixa())
{
fCaixa.dsLanCaixa.AddNew();
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_Empresa = fCred.rCred.Cd_empresa;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).NM_Clifor = fCred.rCred.Nm_clifor;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Dt_lancto = fCred.rCred.Dt_credito;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).ComplHistorico = fCred.rCred.Ds_observacao;
fCaixa.RB_Receber.Checked = true;
fCaixa.CD_Empresa.Enabled = false;
fCaixa.NM_Clifor.Enabled = false;
fCaixa.DT_Lancto.Enabled = false;
fCaixa.RB_Pagar.Enabled = false;
fCaixa.RB_Receber.Enabled = false;
fCaixa.dsLanCaixa.ResetCurrentItem();
if (fCaixa.ShowDialog() == DialogResult.OK)
{
if (fCaixa.dsLanCaixa.Current != null)
{
try
{
TCN_CreditoClifor.Gravar(fCred.rCred, fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa, null);
MessageBox.Show("Credito gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparFiltros();
id_credito.Text = fCred.rCred.Id_creditostr;
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
else
{
MessageBox.Show("Obrigatorio informar caixa para gravar credito cliente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
else
{
MessageBox.Show("Obrigatorio informar caixa para gravar credito cliente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
}
}
}
private void alterarLançamentoCaixaToolStripMenuItem_Click(object sender, EventArgs e)
{
if (bsCaixa.Current != null)
{
using (Financeiro.TFLanCaixa FLanCaixa = new Financeiro.TFLanCaixa())
{
CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa rCaixa =
CamadaNegocio.Financeiro.Caixa.TCN_LanCaixa.Busca((bsCaixa.Current as CamadaDados.Contabil.TRegistro_Lan_ProcCaixa).CD_ContaGer,
(bsCaixa.Current as CamadaDados.Contabil.TRegistro_Lan_ProcCaixa).Id_lanctocaixastr,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
decimal.Zero,
string.Empty,
string.Empty,
string.Empty,
false,
string.Empty,
decimal.Zero,
false,
null)[0];
FLanCaixa.CD_ContaGer.Enabled = false;
FLanCaixa.BB_ContaGer.Enabled = false;
FLanCaixa.CD_Empresa.Enabled = false;
FLanCaixa.BB_Empresa.Enabled = false;
FLanCaixa.DT_Lancto.Enabled = false;
FLanCaixa.RB_Pagar.Enabled = false;
FLanCaixa.RB_Receber.Enabled = false;
FLanCaixa.VL_Receber.Enabled = false;
FLanCaixa.VL_Pagar.Enabled = false;
FLanCaixa.RB_Receber.Checked = rCaixa.Vl_RECEBER > 0;
FLanCaixa.RB_Pagar.Checked = rCaixa.Vl_PAGAR > 0;
FLanCaixa.dsLanCaixa.Add(rCaixa);
if (FLanCaixa.ShowDialog() == DialogResult.OK)
{
try
{
CamadaNegocio.Financeiro.Caixa.TCN_LanCaixa.AlterarLanCaixa(rCaixa, null);
afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
private void Processar()
{
if (bsAcerto.Current != null)
{
if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).St_registro.Trim().ToUpper().Equals("P"))
{
MessageBox.Show("Acerto ja se encontra PROCESSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (MessageBox.Show("Confirma processamento do acerto?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1)
== DialogResult.Yes)
{
if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_sobradinheiro > decimal.Zero)
{
using (Financeiro.TFLanCaixa fCaixa = new Financeiro.TFLanCaixa())
{
fCaixa.Text = "CAIXA SOBRA DINHEIRO";
fCaixa.dsLanCaixa.AddNew();
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_Empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Nm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa;
//buscar cfg frota
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa,
string.Empty,
string.Empty,
string.Empty,
null);
if (lCfg.Count > 0)
{
if (!string.IsNullOrEmpty(lCfg[0].Cd_contager))
{
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_ContaGer = lCfg[0].Cd_contager;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Ds_ContaGer = lCfg[0].Ds_contager;
fCaixa.CD_ContaGer.Enabled = false;
fCaixa.BB_ContaGer.Enabled = false;
}
}
fCaixa.RB_Receber.Checked = true;
fCaixa.RB_Pagar.Enabled = false;
fCaixa.RB_Receber.Enabled = false;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Vl_RECEBER = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_sobradinheiro;
fCaixa.VL_Receber.Enabled = false;
if (fCaixa.ShowDialog() == DialogResult.OK)
{
if (fCaixa.dsLanCaixa.Current != null)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa = fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa;
if (MessageBox.Show("Deseja gerar credito com a sobra de dinheiro?", "Pergunta", MessageBoxButtons.YesNo,
MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.Yes)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto = new CamadaDados.Financeiro.Adiantamento.TRegistro_LanAdiantamento();
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_motorista;
//endereco
CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_clifor,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
1,
null);
if (lEnd.Count > 0)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.CD_Endereco = lEnd[0].Cd_endereco;
}
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Tp_movimento = "C";
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Dt_lancto = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Dt_lancto;
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Vl_adto = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Vl_RECEBER;
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.ST_ADTO = "A";
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.TP_Lancto = "R";
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_contager_qt = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Cd_ContaGer;
}
}
else
{
MessageBox.Show("Obrigatorio informar caixa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
else
{
MessageBox.Show("Obrigatorio informar caixa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_resultado < decimal.Zero)
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.Text = "DUPLICATA A PAGAR PARA O MOTORISTA";
//Empresa
fDup.vCd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
fDup.vNm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa;
fDup.cd_empresa.Enabled = false;
fDup.bb_empresa.Enabled = false;
//Cliente
fDup.vCd_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_motorista;
fDup.vNm_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_motorista;
fDup.cd_clifor.Enabled = false;
fDup.bb_clifor.Enabled = false;
//endereco
CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fDup.vCd_clifor,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
1,
null);
if (lEnd.Count > 0)
{
fDup.vCd_endereco = lEnd[0].Cd_endereco;
fDup.vDs_endereco = lEnd[0].Ds_endereco;
fDup.cd_endereco.Enabled = false;
fDup.bb_endereco.Enabled = false;
}
fDup.vTp_mov = "P";
fDup.vVl_documento = Math.Abs((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_resultado);
fDup.vl_documento_index.Enabled = false;
fDup.vNr_docto = "AC" + (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Id_acertostr;
fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
else
{
if (MessageBox.Show("Deseja Processar o Acerto sem gerar Financeiro!.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.No)
{
return;
}
}
}
}
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).lCartaFrete.ForEach(p =>
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.Text = "DUPLICATA CARTA FRETE Nº" + p.Nr_cartafretestr;
//Empresa
fDup.vCd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
fDup.vNm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa;
fDup.cd_empresa.Enabled = false;
fDup.bb_empresa.Enabled = false;
fDup.vTp_mov = "P";
fDup.vVl_documento = p.Vl_documento;
fDup.vl_documento_index.Enabled = false;
fDup.vNr_docto = "CARTAFRETE" + p.Nr_cartafretestr;
fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
p.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
else
{
if (MessageBox.Show("Deseja Processar o Acerto sem gerar Financeiro!.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.No)
{
return;
}
}
}
});
try
{
CamadaNegocio.Frota.TCN_AcertoMotorista.ProcessarAcerto(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista, null);
MessageBox.Show("Acerto processado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparFiltros();
id_acerto.Text = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Id_acertostr;
cd_empresa.Text = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
