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); } } } } } } }