private void bb_enviar_Click(object sender, EventArgs e)
{
if (string.IsNullOrEmpty(ds_assunto.Text.Trim()) || string.IsNullOrEmpty(ds_corpo.Text.Trim()))
{
MessageBox.Show("Obrigatório informar assunto e corpo para enviar e-mail.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
else if ((bsBloqueto.List as blListaTitulo).Where(p => p.St_processar).ToList().Count.Equals(0))
{
MessageBox.Show("Obrigatório selecionar algum bloqueto pela opção de enviar para finalizar o processo.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
(bsBloqueto.List as blListaTitulo).Where(p => p.St_processar).ToList().ForEach(r =>
{
if (cbxAnexarBloqueto.Checked)
{
reprocessarBloqueto(r);
TpBusca[] tpBuscas = new TpBusca[0];
Estruturas.CriarParametro(ref tpBuscas, "a.Nr_Lancto", "'" + r.Nr_lancto + "'");
Estruturas.CriarParametro(ref tpBuscas, "a.cd_empresa", "'" + r.Cd_empresa + "'");
Estruturas.CriarParametro(ref tpBuscas, "a.cd_parcela", "'" + r.Cd_parcela + "'");
blTitulo p = new TCD_Titulo().Select(tpBuscas, 1, string.Empty)[0];
TCN_LayoutBloqueto.Imprime_Bloqueto(false,
new List <blTitulo>()
{
p
},
false,
false,
true,
false,
string.Empty,
new List <string>()
{
r.Email
},
ds_assunto.Text.Trim(),
ds_corpo.Text.Trim(),
false);
}
else
{
new Email(new List <string>()
{
r.Email
}, ds_assunto.Text.Trim(), ds_corpo.Text.Trim(), new List <string>()).EnviarEmail();
}
});
MessageBox.Show("Processo finalizado com sucesso.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information);
(bsBloqueto.List as blListaTitulo).RemoveAll(r => r.St_processar);
bsBloqueto.ResetBindings(true);
}
private void bb_inutilizar_Click(object sender, EventArgs e)
{
if (dsBloqueto.Count > 0)
{
if ((dsBloqueto.List as blListaTitulo).Exists(p => p.St_processar))
{
if (!Altera_Relatorio)
{
//Chamar tela de impressao para o bloqueto
using (TFGerenciadorImpressao fImp = new TFGerenciadorImpressao())
{
fImp.St_enabled_enviaremail = true;
fImp.pCd_clifor = (dsBloqueto.Current as blTitulo).Cd_sacado;
fImp.pMensagem = "BLOQUETO Nº" + (dsBloqueto.Current as blTitulo).Nosso_numero.Trim();
if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
{
TCN_LayoutBloqueto.Imprime_Bloqueto(Altera_Relatorio,
(dsBloqueto.List as blListaTitulo).Where(p => p.St_processar).OrderBy(p => p.Dt_vencimento).ToList(),
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
"BLOQUETO Nº " + (dsBloqueto.Current as blTitulo).Nosso_numero.Trim(),
fImp.pDs_mensagem,
true);
}
}
}
else
{
TCN_LayoutBloqueto.Imprime_Bloqueto(Altera_Relatorio,
(dsBloqueto.List as blListaTitulo).Where(p => p.St_processar).OrderBy(p => p.Dt_vencimento).ToList(),
false,
false,
false,
false,
string.Empty,
null,
string.Empty,
string.Empty,
true);
}
Altera_Relatorio = false;
(dsBloqueto.List as blListaTitulo).ForEach(p => p.St_processar = false);
dsBloqueto.ResetBindings(true);
}
}
}
private void afterPrint()
{
if (dsBloqueto.Current != null)
{
if ((dsBloqueto.Current as blTitulo).St_registro.Trim().ToUpper().Equals("C"))
{
MessageBox.Show("Bloqueto encontra-se cancelado. Não sera possivel realizar a compensação do mesmo!", "Mensagem", MessageBoxButtons.OK,
MessageBoxIcon.Information);
return;
}
if ((dsBloqueto.Current as blTitulo).St_registro.Trim().ToUpper().Equals("P"))
{
MessageBox.Show("Não é permitido reimprimir bloqueto COMPENSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (!Altera_Relatorio)
{
//Chamar tela de impressao para o bloqueto
using (TFGerenciadorImpressao fImp = new TFGerenciadorImpressao())
{
fImp.St_enabled_enviaremail = true;
fImp.pCd_clifor = (dsBloqueto.Current as blTitulo).Cd_sacado;
fImp.pMensagem = "BLOQUETO Nº" + (dsBloqueto.Current as blTitulo).Nosso_numero.Trim();
if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
{
TCN_LayoutBloqueto.Imprime_Bloqueto(Altera_Relatorio,
new blListaTitulo()
{
dsBloqueto.Current as blTitulo
},
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
"BLOQUETO Nº " + (dsBloqueto.Current as blTitulo).Nosso_numero.Trim(),
fImp.pDs_mensagem,
false);
}
}
}
else
{
TCN_LayoutBloqueto.Imprime_Bloqueto(Altera_Relatorio,
new blListaTitulo()
{
(dsBloqueto.Current as blTitulo)
},
false,
false,
false,
false,
string.Empty,
null,
string.Empty,
string.Empty,
false);
}
Altera_Relatorio = false;
}
}
private void LancarFinanceiro()
{
if (bsEmpreendimento.Current != null)
{
if ((bsEmpreendimento.Current as CamadaDados.Financeiro.Empreendimento.TRegistro_Empreendimento).St_registro.Trim().ToUpper().Equals("A"))
{
using (TFLanDuplicata fDuplicata = new TFLanDuplicata())
{
fDuplicata.vCd_empresa = (bsEmpreendimento.Current as CamadaDados.Financeiro.Empreendimento.TRegistro_Empreendimento).Cd_empresa;
fDuplicata.vNm_empresa = (bsEmpreendimento.Current as CamadaDados.Financeiro.Empreendimento.TRegistro_Empreendimento).Nm_empresa;
fDuplicata.cd_empresa.Enabled = false;
fDuplicata.bb_empresa.Enabled = false;
fDuplicata.St_empreendimento = true;
if (fDuplicata.ShowDialog() == DialogResult.OK)
{
//Ratear Centro de Custo
if (CamadaNegocio.ConfigGer.TCN_CadParamGer.BuscaVL_Bool("CRESULTADO_PROVISAO",
(fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Cd_empresa,
null).Trim().ToUpper().Equals("S"))
{
using (TFRateioCResultado fRateio = new TFRateioCResultado())
{
fRateio.vVl_Documento = (fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Vl_documento_padrao;
//fDupCCusto.Id_empreendimento = (bsEmpreendimento.Current as CamadaDados.Financeiro.Empreendimento.TRegistro_Empreendimento).Id_empreendimento.Value.ToString();
fRateio.Tp_mov = (fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Tp_mov;
fRateio.ShowDialog();
(fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).lCustoLancto = fRateio.lCResultado;
(fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).lCustoLanctoDel = fRateio.lCResultadoDel;
}
}
try
{
string ret = TCN_LanDuplicata.GravarDuplicata((fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata), false, null);
if (ret.Trim() != "")
{
string lan = CamadaDados.TDataQuery.getPubVariavel(ret, "@P_NR_LANCTO");
MessageBox.Show("Lançamento Financeiro nr:" + lan + " Gravado com Sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CamadaDados.Financeiro.Bloqueto.blListaTitulo lBloqueto =
CamadaNegocio.Financeiro.Bloqueto.TCN_Titulo.Buscar((fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Cd_empresa,
(fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Nr_lancto,
decimal.Zero,
decimal.Zero,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
decimal.Zero,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
false,
0,
null);
if (lBloqueto.Count > 0)
{
//Chamar tela de impressao para o bloqueto
using (TFGerenciadorImpressao fImp = new TFGerenciadorImpressao())
{
fImp.St_enabled_enviaremail = true;
fImp.pCd_clifor = (fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Cd_clifor;
fImp.pMensagem = "BLOQUETOS DO DOCUMENTO Nº" + (fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Nr_docto;
if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
{
TCN_LayoutBloqueto.Imprime_Bloqueto(false,
lBloqueto,
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
"BLOQUETO(S) DO DOCUMENTO Nº " + (fDuplicata.dsDuplicata.Current as TRegistro_LanDuplicata).Nr_docto,
fImp.pDs_mensagem,
false);
}
}
}
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message.Trim());
}
}
}
}
else
{
MessageBox.Show("Não é permitido lançar financeiro para empreendimento com status diferente <ATIVO>.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
else
{
MessageBox.Show("Necessario selecionar empreendimento para lançar financeiro.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
