private void TFDT_Vencto_PreVenda_Load(object sender, EventArgs e)
{
Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
pDados.set_FormatZero();
bsPreVenda.DataSource = new CamadaDados.Faturamento.PDV.TList_PreVenda()
{
rprevenda
};
vl_venda.Value = (bsPreVenda.Current as CamadaDados.Faturamento.PDV.TRegistro_PreVenda).lItens.Sum(p => p.Vl_subtotal + p.Vl_frete + p.Vl_acrescimo - p.Vl_desconto);
vl_juro_fin.Value = (bsPreVenda.Current as CamadaDados.Faturamento.PDV.TRegistro_PreVenda).lItens.Sum(p => p.Vl_juro_fin);
vl_devcred.Value = (bsPreVenda.Current as CamadaDados.Faturamento.PDV.TRegistro_PreVenda).Vl_devcred;
vl_total.Value = (bsPreVenda.Current as CamadaDados.Faturamento.PDV.TRegistro_PreVenda).DT_Vencto.Sum(p => p.Vl_parcela);
if (BS_PARCELAS.Count > 0)
{
BB_CondPGTO.Select();
}
//Buscar solicitação p/ alterar Dt.Vencto
if (!string.IsNullOrEmpty(CD_CondPGTO.Text))
{
object obj = new CamadaDados.Financeiro.Cadastros.TCD_CadCondPgto().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.CD_CondPGTO",
vOperador = "=",
vVL_Busca = "'" + CD_CondPGTO.Text.Trim() + "'"
}
}, "a.ST_SolicitarDTVencto");
if (obj != null)
{
if (obj.ToString().Equals("S"))
{
dt_vencto.Enabled = true;
diasvencimento.Enabled = true;
}
}
}
//Verificar se Parcelas é a cartão
if (St_cartao)
{
gDt_vencto.Visible = false;
rgVencto.Visible = false;
parcelasCartao.Location = new Point(6, 41);
}
else
{
gId_parcela.Visible = false;
}
}
private void ImprimirCheques()
{
//Verificar se a condicao pagamento e a vista e se o portador movimenta cheque
CamadaDados.Financeiro.Cadastros.TList_CfgFolhaPagamento lFolha =
CamadaNegocio.Financeiro.Cadastros.TCN_CfgFolhaPagamento.Buscar((bsFolhaPgto.Current as CamadaDados.Financeiro.Folha_Pagamento.TRegistro_FolhaPagamento).Cd_empresa,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
null);
if (lFolha.Count > 0)
{
object obj = new CamadaDados.Financeiro.Cadastros.TCD_CadCondPgto().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_condpgto",
vOperador = "=",
vVL_Busca = "'" + lFolha[0].Cd_condpgto.Trim() + "'"
}
}, "a.qt_parcelas");
if (obj == null ? false : obj.ToString().Trim().Equals("0"))
{
obj = new CamadaDados.Financeiro.Cadastros.TCD_CadPortador().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "cd_portador",
vOperador = "=",
vVL_Busca = "'" + lFolha[0].Cd_portador.Trim() + "'"
}
}, "st_controletitulo");
if (obj == null ? false : obj.ToString().Trim().ToUpper().Equals("S"))
{
//Buscar lista de cheques amarradas ao lote de folha
CamadaDados.Financeiro.Titulo.TList_RegLanTitulo lCheques =
new CamadaDados.Financeiro.Titulo.TCD_LanTitulo().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fin_titulo_x_caixa x " +
"inner join tb_fin_caixa y " +
"on x.cd_contager = y.cd_contager " +
"and x.cd_lanctocaixa = y.cd_lanctocaixa " +
"inner join tb_fin_liquidacao z " +
"on y.cd_contager = z.cd_contager " +
"and y.cd_lanctocaixa = z.cd_lanctocaixa " +
"inner join tb_fin_parcela w " +
"on z.cd_empresa = w.cd_empresa " +
"and z.nr_lancto = w.nr_lancto " +
"inner join tb_fin_folha_x_funcionarios folha " +
"on w.cd_empresa = folha.cd_empresa " +
"and w.nr_lancto = folha.nr_lancto " +
"where a.cd_empresa = x.cd_empresa " +
"and a.cd_banco = x.cd_banco " +
"and a.nr_lanctocheque = x.nr_lanctocheque " +
"and x.tp_lancto = 'OR' " +
"and folha.id_folha = " + (bsFolhaPgto.Current as CamadaDados.Financeiro.Folha_Pagamento.TRegistro_FolhaPagamento).Id_folha.Value.ToString() + ")"
}
}, 0, string.Empty, "a.nr_cheque");
if (lCheques.Count > 0)
{
if (MessageBox.Show("Imprimir cheques emitidos?", "Pergunta", MessageBoxButtons.YesNo,
MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.Yes)
{
try
{
CamadaNegocio.Financeiro.Titulo.TCN_LanTitulo.ImprimirCheque(lCheques);
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
}
}