private void localizarBloquetos()
{
if (bsLote.Current != null)
{
if ((bsLote.Current as TRegistro_LoteBloqueto).St_registro.Trim().ToUpper().Equals("P"))
{
MessageBox.Show("Não é permitido incluir bloquetos em lote PROCESSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
using (TFLocalizarBloquetos fLocalizar = new TFLocalizarBloquetos())
{
fLocalizar.pCd_empresa = (bsLote.Current as TRegistro_LoteBloqueto).Cd_empresa;
fLocalizar.pNm_empresa = (bsLote.Current as TRegistro_LoteBloqueto).Nm_empresa;
fLocalizar.pId_Config = (bsLote.Current as TRegistro_LoteBloqueto).Id_configstr;
fLocalizar.pDs_config = (bsLote.Current as TRegistro_LoteBloqueto).Ds_config;
if (fLocalizar.ShowDialog() == DialogResult.OK)
{
TList_Lote_X_Titulo lTitulo = new TList_Lote_X_Titulo();
foreach (var v in fLocalizar.lBloquetos)
{
if ((bsLote.Current as TRegistro_LoteBloqueto).ListaBloqueto.Exists(p => p.Cd_empresa.Trim().Equals(v.Cd_empresa) &&
p.Nr_lancto.Equals(v.Nr_lancto) &&
p.Cd_parcela.Equals(v.Cd_parcela) &&
p.Id_cobranca.Equals(v.Id_cobranca)))
{
continue;
}
lTitulo.Add(new TRegistro_Lote_X_Titulo()
{
Cd_empresa = v.Cd_empresa,
Cd_parcela = v.Cd_parcela,
Id_cobranca = v.Id_cobranca,
Id_lote = (bsLote.Current as TRegistro_LoteBloqueto).Id_lote,
Nr_lancto = v.Nr_lancto
});
}
if (lTitulo.Count > 0)
{
try
{
CamadaNegocio.Financeiro.Bloqueto.TCN_Lote_X_Titulo.GravarTitulosLote(lTitulo, null);
MessageBox.Show("Titulos gravados com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
bsLote_PositionChanged(this, new EventArgs());
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
else
{
MessageBox.Show("Não existe lote para amarrar bloquetos.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
private void InserirTitulo()
{
if (bsLoteRemessa.Current != null)
{
if ((bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).St_registro.Trim().ToUpper().Equals("P"))
{
MessageBox.Show("Não é permitido inserir titulo em lote PROCESSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
using (TFLocalizarBloquetos fLocalizar = new TFLocalizarBloquetos())
{
fLocalizar.Text = "Localizar Bloquetos Gerar Remessa";
fLocalizar.pCd_empresa = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Cd_empresa;
fLocalizar.pNm_empresa = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Nm_empresa;
fLocalizar.St_remessa = true;
fLocalizar.pId_Config = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Id_configstr;
fLocalizar.pDs_config = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Ds_config;
fLocalizar.Tp_instrucao = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Tp_instrucao;
if (fLocalizar.ShowDialog() == DialogResult.OK)
{
if (fLocalizar.lBloquetos != null)
{
fLocalizar.lBloquetos.ForEach(p =>
{
if (!(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Exists(v => v.Nosso_numero.Trim().Equals(p.Nosso_numero.Trim())))
{
(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Add(p);
}
});
try
{
TCN_LoteRemessa.Gravar(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa, null);
MessageBox.Show("Titulos incluidos com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
bsLoteRemessa.ResetCurrentItem();
vl_total_bloqueto.Value = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Sum(p => p.Vl_documento);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
}
}
}
else
{
MessageBox.Show("Obrigatorio selecionar lote para inserir titulo.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
private void InserirTitulo()
{
if (cbConfig.SelectedItem == null)
{
MessageBox.Show("Obrigatorio informar configuração.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cbConfig.Focus();
return;
}
if (cbInstrucao.SelectedValue == null)
{
MessageBox.Show("Obrigatorio selecionar instrução.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cbInstrucao.Focus();
return;
}
using (TFLocalizarBloquetos fLocalizar = new TFLocalizarBloquetos())
{
fLocalizar.Text = "Localizar Bloquetos Gerar Remessa";
fLocalizar.pCd_empresa = cd_empresa.Text;
fLocalizar.pNm_empresa = nm_empresa.Text;
fLocalizar.pId_Config = (cbConfig.SelectedItem as CamadaDados.Financeiro.Cadastros.TRegistro_CadCFGBanco).Id_configstr;
fLocalizar.pDs_config = (cbConfig.SelectedItem as CamadaDados.Financeiro.Cadastros.TRegistro_CadCFGBanco).Ds_config;
fLocalizar.St_remessa = true;
fLocalizar.pId_Config = cbConfig.SelectedValue.ToString();
fLocalizar.Tp_instrucao = cbInstrucao.SelectedValue.ToString();
if (fLocalizar.ShowDialog() == DialogResult.OK)
{
if (fLocalizar.lBloquetos != null)
{
fLocalizar.lBloquetos.ForEach(p =>
{
if (!(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Exists(v => v.Nosso_numero.Trim().Equals(p.Nosso_numero.Trim())))
{
(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Add(p);
}
});
cbInstrucao.Enabled = false;
bsLoteRemessa.ResetCurrentItem();
vl_total_bloqueto.Value = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Sum(p => p.Vl_atual);
}
}
}
}
private void localizarBloquetos()
{
using (TFLocalizarBloquetos fLocalizar = new TFLocalizarBloquetos())
{
if (cbEmpresa.SelectedItem == null)
{
MessageBox.Show("Obrigatório informar empresa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cbEmpresa.Focus();
return;
}
if (cbConfig.SelectedItem == null)
{
MessageBox.Show("Obrigatório informar configuração boleto.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cbConfig.Focus();
return;
}
fLocalizar.pCd_empresa = (cbEmpresa.SelectedItem as CamadaDados.Diversos.TRegistro_CadEmpresa).Cd_empresa;
fLocalizar.pNm_empresa = (cbEmpresa.SelectedItem as CamadaDados.Diversos.TRegistro_CadEmpresa).Nm_empresa;
fLocalizar.pId_Config = (cbConfig.SelectedItem as CamadaDados.Financeiro.Cadastros.TRegistro_CadCFGBanco).Id_configstr;
fLocalizar.pDs_config = (cbConfig.SelectedItem as CamadaDados.Financeiro.Cadastros.TRegistro_CadCFGBanco).Ds_config;
if (fLocalizar.ShowDialog() == DialogResult.OK)
{
foreach (var v in fLocalizar.lBloquetos)
{
if ((bsLote.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteBloqueto).ListaBloqueto.Exists(p => p.Cd_empresa.Trim().Equals(v.Cd_empresa) &&
p.Nr_lancto.Equals(v.Nr_lancto) &&
p.Cd_parcela.Equals(v.Cd_parcela) &&
p.Id_cobranca.Equals(v.Id_cobranca)))
{
continue;
}
(bsLote.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteBloqueto).ListaBloqueto.Add(v);
}
bsLote.ResetBindings(true);
tot_titulo.Text = (bsLote.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteBloqueto).ListaBloqueto.Sum(p => p.Vl_atual).ToString("N2", new System.Globalization.CultureInfo("pt-BR", true));
}
}
}
