private void BB_Buscar_Click(object sender, EventArgs e) { if (tabControl1.SelectedIndex == 0) { TList_RegLanDuplicata lDup = TCN_LanDuplicata.Busca(CD_Empresa.Text, nr_lancto.Text, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, string.Empty, string.Empty, string.Empty, "A", string.Empty, string.Empty, true, 0, string.Empty, null); //Buscr Centro Resultado lDup.ForEach(p => p.lCustoLancto = TCN_DuplicataXCCusto.BuscarCusto(p.Cd_empresa, p.Nr_lancto.ToString(), null)); BS_Duplicata.DataSource = lDup; } else { } }
public static void Gravar(List <TRegistro_AbastVeiculo> lista, CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup, BancoDados.TObjetoBanco banco) { bool st_transacao = false; TCD_AbastVeiculo qtb_abast = new TCD_AbastVeiculo(); try { if (banco == null) { st_transacao = qtb_abast.CriarBanco_Dados(true); } else { qtb_abast.Banco_Dados = banco; } //Gravar duplicata if (rDup != null) { TCN_LanDuplicata.GravarDuplicata(rDup, false, qtb_abast.Banco_Dados); } //Gravar abastecidas lista.ForEach(x => { Gravar(x, qtb_abast.Banco_Dados); //Amarrar abast x duplicata if (x.Tp_pagamento.Trim().ToUpper().Equals("E")) { TCN_Abast_X_Duplicata.Gravar(new TRegistro_Abast_X_Duplicata { Id_abastecimento = x.Id_abastecimento, Cd_empresa = rDup.Cd_empresa, Nr_lancto = rDup.Nr_lancto }, qtb_abast.Banco_Dados); } }); if (st_transacao) { qtb_abast.Banco_Dados.Commit_Tran(); } } catch (Exception ex) { if (st_transacao) { qtb_abast.Banco_Dados.RollBack_Tran(); } throw new Exception("Erro gravar abastecimentos: " + ex.Message.Trim()); } finally { if (st_transacao) { qtb_abast.deletarBanco_Dados(); } } }
public static void Excluir(TList_AbastVeiculo val, BancoDados.TObjetoBanco banco) { bool st_transacao = false; TCD_AbastVeiculo qtb_abast = new TCD_AbastVeiculo(); try { if (banco == null) { st_transacao = qtb_abast.CriarBanco_Dados(true); } else { qtb_abast.Banco_Dados = banco; } CamadaDados.Financeiro.Duplicata.TList_RegLanDuplicata lDup = new CamadaDados.Financeiro.Duplicata.TList_RegLanDuplicata(); val.ForEach(x => { TCN_Abast_X_Duplicata.BuscarDup(x.Id_abastecimentostr, qtb_abast.Banco_Dados) .ForEach(y => { //Excluir abast x duplicata TCN_Abast_X_Duplicata.Excluir(new TRegistro_Abast_X_Duplicata() { Id_abastecimento = x.Id_abastecimento, Cd_empresa = y.Cd_empresa, Nr_lancto = y.Nr_lancto }, qtb_abast.Banco_Dados); if (!lDup.Exists(w => w.Cd_empresa.Trim().Equals(y.Cd_empresa.Trim()) && w.Nr_lancto.Equals(y.Nr_lancto))) { lDup.Add(y); } }); qtb_abast.Excluir(x); }); lDup.ForEach(z => TCN_LanDuplicata.CancelarDuplicata(z, qtb_abast.Banco_Dados)); if (st_transacao) { qtb_abast.Banco_Dados.Commit_Tran(); } } catch (Exception ex) { if (st_transacao) { qtb_abast.Banco_Dados.RollBack_Tran(); } throw new Exception("Erro excluir abastecimento: " + ex.Message.Trim()); } finally { if (st_transacao) { qtb_abast.deletarBanco_Dados(); } } }
private void BB_Buscar_Click(object sender, EventArgs e) { if (tabControl1.SelectedIndex == 0) { TList_RegLanDuplicata lDup = TCN_LanDuplicata.BuscaAudit(CD_Empresa.Text, NR_Docto.Text, nr_lancto.Text, CD_Clifor.Text, cd_moeda.Text, CD_Historico.Text, cd_condpgto.Text, Tp_Dup.Text, VL_Inicial.Value, VL_Final.Value, DT_Inicial.Text, DT_Final.Text, null); //Buscr Centro Resultado //lDup.ForEach(p => p.lCustoLancto = TCN_DuplicataXCCusto.BuscarCusto(p.Cd_empresa, p.Nr_lancto.ToString(), null)); lDup.ForEach(r => r.St_liquidar = false); BS_Duplicata.DataSource = lDup; } else { if (cbContaGer.SelectedItem != null) { bsCaixa.DataSource = TCN_LanCaixa.BuscaAudit(cbContaGer.SelectedValue.ToString(), string.Empty, string.Empty, nr_doctoCaixa.Text, cd_historicoCaixa.Text, string.Empty, Dt_iniCaixa.Text, Dt_finCaixa.Text, 0, 0, string.Empty, string.Empty, string.Empty, false, string.Empty, 0, true, null); (bsCaixa.DataSource as TList_LanCaixa).ForEach(r => r.St_conciliar = false); bsCaixa.ResetBindings(true); } else { MessageBox.Show("Obrigatório informar conta gerencial.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); } } }
public static string ProcessarMudanca(TRegistro_LanMudanca val, BancoDados.TObjetoBanco banco) { bool st_transacao = false; TCD_LanMudanca qtb_mud = new TCD_LanMudanca(); try { if (banco == null) { st_transacao = qtb_mud.CriarBanco_Dados(true); } else { qtb_mud.Banco_Dados = banco; } //Gravar Duplicata if (val.lDup.Count > 0) { TCN_LanDuplicata.GravarDuplicata(val.lDup, false, qtb_mud.Banco_Dados); val.Nr_lancto = val.lDup[0].Nr_lancto; } //Gravar lançamento almoxarifado val.lMaterialMud.ForEach(p => { //Buscar Almoxarifado CamadaDados.Almoxarifado.TList_CadAlmoxarifado lAlmox = new CamadaDados.Almoxarifado.TCD_CadAlmoxarifado().Select( new Utils.TpBusca[] { new Utils.TpBusca() { vNM_Campo = string.Empty, vOperador = "exists", vVL_Busca = "(select 1 from tb_amx_almox_x_empresa x " + "where x.id_almox = a.id_almox " + "and x.cd_empresa = '" + val.Cd_empresa.Trim() + "')" } }, 1, string.Empty); if (lAlmox.Count == 0) { throw new Exception("Não existe configuração de almoxarifado para a empresa!"); } //Criar registro movimentação CamadaDados.Almoxarifado.TRegistro_Movimentacao rMov = new CamadaDados.Almoxarifado.TRegistro_Movimentacao(); rMov.Ds_observacao = "PRODUTO RETIRADO PELO MÓDULO MUDANÇA"; rMov.Cd_empresa = val.Cd_empresa; rMov.Id_almoxstr = lAlmox[0].Id_almoxString; rMov.Cd_produto = p.Cd_produto; rMov.Quantidade = p.Quantidade; rMov.Vl_unitario = CamadaNegocio.Almoxarifado.TCN_SaldoAlmoxarifado.Vl_Custo_Almox_Prod(val.Cd_empresa, lAlmox[0].Id_almoxString, p.Cd_produto, qtb_mud.Banco_Dados); rMov.Tp_movimento = "S"; rMov.LoginAlmoxarife = Utils.Parametros.pubLogin; rMov.Dt_movimento = CamadaDados.UtilData.Data_Servidor(); rMov.St_registro = "A"; //Gravar Movimentação CamadaNegocio.Almoxarifado.TCN_Movimentacao.Gravar(rMov, qtb_mud.Banco_Dados); //Gravar Material mudança p.Id_movimento = rMov.Id_movimento; TCN_MaterialMud.Gravar(p, qtb_mud.Banco_Dados); }); val.St_registro = "4";//Processada //Gravar processamento mudança qtb_mud.Gravar(val); if (st_transacao) { qtb_mud.Banco_Dados.Commit_Tran(); } return("OK"); } catch (Exception ex) { if (st_transacao) { qtb_mud.Banco_Dados.RollBack_Tran(); } throw new Exception("Erro Gravar registro: " + ex.Message.Trim()); } finally { if (st_transacao) { qtb_mud.deletarBanco_Dados(); } } }
public TList_RegLanDuplicata Gera_Financeiro(string CFG_Pedido_Comissao, string CD_CondPGTO, string CD_Moeda, TRegistro_CadEmpresa Reg_Empresa, TRegistro_CadClifor Reg_Clifor_Vendedor, TRegistro_CadEndereco Reg_Endereco) { TList_RegLanDuplicata Duplicata = new TList_RegLanDuplicata(); if (CFG_Pedido_Comissao != "") { TCD_CadCFGPedidoFiscal Pedido_Fiscal = new TCD_CadCFGPedidoFiscal(); TpBusca[] vBusca = new TpBusca[0]; Array.Resize(ref vBusca, vBusca.Length + 1); vBusca[vBusca.Length - 1].vNM_Campo = "a.cfg_pedido"; vBusca[vBusca.Length - 1].vVL_Busca = "'" + CFG_Pedido_Comissao + "'"; vBusca[vBusca.Length - 1].vOperador = "="; Array.Resize(ref vBusca, vBusca.Length + 1); vBusca[vBusca.Length - 1].vNM_Campo = "a.TP_FISCAL"; vBusca[vBusca.Length - 1].vVL_Busca = "'N'"; vBusca[vBusca.Length - 1].vOperador = "="; DataTable DT_Pedido_Fiscal = Pedido_Fiscal.Buscar(vBusca, 0); if (DT_Pedido_Fiscal.Rows.Count > 0) { if (DT_Pedido_Fiscal.Rows[0]["tp_duplicata"].ToString().Trim() != string.Empty) { TpBusca[] vBusca_Mov = new TpBusca[0]; Array.Resize(ref vBusca_Mov, vBusca_Mov.Length + 1); vBusca_Mov[vBusca_Mov.Length - 1].vNM_Campo = "a.cd_movimentacao"; vBusca_Mov[vBusca_Mov.Length - 1].vVL_Busca = "'" + DT_Pedido_Fiscal.Rows[0]["cd_movto"].ToString().Trim() + "'"; vBusca_Mov[vBusca_Mov.Length - 1].vOperador = "="; TList_CadMovimentacao List_Movimentacao = new TCD_CadMovimentacao().Select(vBusca_Mov, 0, ""); TList_CadCondPgto List_CondPagamento = TCN_CadCondPgto.Buscar(CD_CondPGTO, "", "", "", "", "", 0, 0, "", "", 1, "", null); if (List_CondPagamento.Count > 0) { List_CondPagamento[0].lCondPgto_X_Parcelas = TCN_CadCondPgto_X_Parcelas.Buscar(List_CondPagamento[0].Cd_condpgto); } TRegistro_LanDuplicata Reg_Duplicata = new TRegistro_LanDuplicata(); TList_CadTpDuplicata List_TPDuplicata = TCN_CadTpDuplicata.Buscar(DT_Pedido_Fiscal.Rows[0]["tp_duplicata"].ToString().Trim(), "", ""); if ((DT_Pedido_Fiscal.Rows[0]["ST_Devolucao"].ToString().Trim().ToUpper() != "S") && (!List_CondPagamento[0].St_solicitardtvenctobool) && (List_CondPagamento[0].lCondPgto_X_Parcelas.Count > 0) && (List_Movimentacao[0].cd_historico.Trim() != string.Empty) && (!List_TPDuplicata[0].St_gerarboletoautobool)) { Reg_Duplicata.Cd_empresa = Reg_Empresa.Cd_empresa.Trim(); Reg_Duplicata.Nm_empresa = Reg_Empresa.Nm_empresa.Trim(); Reg_Duplicata.Cd_clifor = Reg_Clifor_Vendedor.Cd_clifor.Trim(); Reg_Duplicata.Nm_clifor = Reg_Clifor_Vendedor.Nm_clifor.Trim(); Reg_Duplicata.Cd_endereco = Reg_Endereco.Cd_endereco.Trim(); Reg_Duplicata.Ds_endereco = Reg_Endereco.Ds_endereco.Trim(); Reg_Duplicata.Cd_historico = List_Movimentacao[0].cd_historico.Trim(); Reg_Duplicata.Ds_historico = List_Movimentacao[0].ds_historico.Trim(); Reg_Duplicata.Tp_duplicata = DT_Pedido_Fiscal.Rows[0]["tp_duplicata"].ToString().Trim(); Reg_Duplicata.Ds_tpduplicata = DT_Pedido_Fiscal.Rows[0]["ds_tpduplicata"].ToString().Trim(); Reg_Duplicata.Tp_mov = DT_Pedido_Fiscal.Rows[0]["tp_movimento"].ToString().Trim().ToUpper() == "E" ? "P" : DT_Pedido_Fiscal.Rows[0]["tp_movimento"].ToString().Trim().ToUpper() == "S" ? "R" : ""; Reg_Duplicata.Tp_docto = DT_Pedido_Fiscal.Rows[0]["tp_docto"].ToString().Trim() != string.Empty ? Convert.ToDecimal(DT_Pedido_Fiscal.Rows[0]["tp_docto"].ToString()) : 0; Reg_Duplicata.Ds_tpdocto = DT_Pedido_Fiscal.Rows[0]["ds_tpdocto"].ToString().Trim(); Reg_Duplicata.Cd_condpgto = List_CondPagamento[0].Cd_condpgto.Trim(); Reg_Duplicata.Ds_condpgto = List_CondPagamento[0].Ds_condpgto.Trim(); Reg_Duplicata.St_comentrada = List_CondPagamento[0].St_comentrada.Trim(); Reg_Duplicata.Cd_juro = List_CondPagamento[0].Cd_juro.Trim(); Reg_Duplicata.Ds_juro = List_CondPagamento[0].Ds_juro.Trim(); Reg_Duplicata.Tp_juro = List_CondPagamento[0].Tp_juro.Trim(); Reg_Duplicata.Cd_moeda = CD_Moeda.Trim(); //Reg_Duplicata.Ds_moeda = List_Dados_Pedido[0].Ds_moeda.Trim(); //Reg_Duplicata.Sigla_moeda = List_Dados_Pedido[0].Sigla.Trim(); Reg_Duplicata.Qt_dias_desdobro = List_CondPagamento[0].Qt_diasdesdobro; Reg_Duplicata.Qt_parcelas = List_CondPagamento[0].Qt_parcelas; Reg_Duplicata.Pc_jurodiario_atrazo = List_CondPagamento[0].Pc_jurodiario_atrazo; Reg_Duplicata.Cd_portador = List_CondPagamento[0].Cd_portador.Trim(); Reg_Duplicata.Ds_portador = List_CondPagamento[0].Ds_portador.Trim(); Reg_Duplicata.Nr_docto = ""; Reg_Duplicata.Dt_emissao = DateTime.Now; Reg_Duplicata.Vl_documento = Convert.ToDecimal(VL_Com_Liberada.Text); Reg_Duplicata.Vl_documento_padrao = Convert.ToDecimal(VL_Com_Liberada.Text); decimal vl_saldoadto = TCN_LanAdiantamento.SaldoAdiantamentoDevolver(Reg_Empresa.Cd_empresa.Trim(), Reg_Clifor_Vendedor.Cd_clifor.Trim(), "S", null); if (Reg_Duplicata.Vl_documento_padrao > 0) { if (Reg_Duplicata.Vl_documento_padrao > vl_saldoadto) { Reg_Duplicata.cVl_adiantamento = vl_saldoadto; } else { Reg_Duplicata.cVl_adiantamento = Reg_Duplicata.Vl_documento_padrao; } } else { Reg_Duplicata.cVl_adiantamento = 0; } Reg_Duplicata.Parcelas = TCN_LanDuplicata.calcularParcelas(Reg_Duplicata); } else { TFLanDuplicata fDuplicata = new TFLanDuplicata(); fDuplicata.vNr_pedido = null; fDuplicata.vSt_notafiscal = true; fDuplicata.vCd_empresa = Reg_Empresa.Cd_empresa.Trim(); fDuplicata.vNm_empresa = Reg_Empresa.Nm_empresa.Trim(); fDuplicata.vCd_clifor = Reg_Clifor_Vendedor.Cd_clifor.Trim(); fDuplicata.vNm_clifor = Reg_Clifor_Vendedor.Nm_clifor.Trim(); fDuplicata.vCd_endereco = Reg_Endereco.Cd_endereco.Trim(); fDuplicata.vDs_endereco = Reg_Endereco.Ds_endereco.Trim(); if (List_Movimentacao.Count > 0) { fDuplicata.vCd_historico = List_Movimentacao[0].cd_historico; fDuplicata.vDs_historico = List_Movimentacao[0].ds_historico; } fDuplicata.vTp_duplicata = DT_Pedido_Fiscal.Rows[0]["tp_duplicata"].ToString().Trim(); fDuplicata.vDs_tpduplicata = DT_Pedido_Fiscal.Rows[0]["ds_tpduplicata"].ToString().Trim(); fDuplicata.vTp_mov = DT_Pedido_Fiscal.Rows[0]["tp_movimento"].ToString().Trim().ToUpper() == "E" ? "P" : DT_Pedido_Fiscal.Rows[0]["tp_movimento"].ToString().Trim().ToUpper() == "S" ? "R" : ""; fDuplicata.vTp_docto = DT_Pedido_Fiscal.Rows[0]["tp_docto"].ToString().Trim(); fDuplicata.vDs_tpdocto = DT_Pedido_Fiscal.Rows[0]["ds_tpdocto"].ToString().Trim(); if (List_TPDuplicata[0].St_gerarboletoauto.Trim().ToUpper().Equals("S")) { TList_CadContaGer List_Conta = TCN_CadContaGer.Buscar(List_TPDuplicata[0].Cd_contager_boletoauto, "", null, "", "", "", "", 0, "", "", "", "", 0, null); fDuplicata.vSt_gerarboletoauto = List_TPDuplicata[0].St_gerarboletoauto; fDuplicata.vCd_contager = List_TPDuplicata[0].Cd_contager_boletoauto; fDuplicata.vDs_contager = List_TPDuplicata[0].Ds_contager_boletoauto; } if (List_CondPagamento.Count > 0) { fDuplicata.vCd_condpgto = List_CondPagamento[0].Cd_condpgto.Trim(); fDuplicata.vDs_condpgto = List_CondPagamento[0].Ds_condpgto.Trim(); fDuplicata.vSt_comentrada = List_CondPagamento[0].St_comentrada.Trim(); fDuplicata.vCd_juro = List_CondPagamento[0].Cd_juro.Trim(); fDuplicata.vDs_juro = List_CondPagamento[0].Ds_juro.Trim(); fDuplicata.vTp_juro = List_CondPagamento[0].Tp_juro.Trim(); fDuplicata.vCd_moeda = CD_Moeda; // fDuplicata.vDs_moeda = List_Dados_Pedido[0].Ds_moeda; // fDuplicata.vSigla_moeda = List_Dados_Pedido[0].Sigla; fDuplicata.vQt_dias_desdobro = List_CondPagamento[0].Qt_diasdesdobro; fDuplicata.vQt_parcelas = List_CondPagamento[0].Qt_parcelas; fDuplicata.vPc_jurodiario_atrazo = List_CondPagamento[0].Pc_jurodiario_atrazo; fDuplicata.vCd_portador = List_CondPagamento[0].Cd_portador.Trim(); fDuplicata.vDs_portador = List_CondPagamento[0].Ds_portador.Trim(); fDuplicata.vSt_solicitardtvencto = List_CondPagamento[0].St_solicitardtvenctobool; } fDuplicata.vNr_docto = "0"; fDuplicata.vDt_emissao = DateTime.Now.ToString(); fDuplicata.vVl_documento = Convert.ToDecimal(VL_Com_Liberada.Text); if (fDuplicata.ShowDialog() == DialogResult.OK) { Reg_Duplicata = (fDuplicata.dsDuplicata[0] as TRegistro_LanDuplicata); } else { MessageBox.Show("Obrigatório informar financeiro para gravar aplicação.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return(null); } } Duplicata.Add(Reg_Duplicata); return(Duplicata); } return(Duplicata); } } return(Duplicata); }
private void BB_Alterar_Click(object sender, EventArgs e) { if (tabControl1.SelectedIndex == 0) { if (!(BS_Duplicata.List as IEnumerable <TRegistro_LanDuplicata>).ToList().Exists(r => r.St_liquidar)) { MessageBox.Show("Nenhum registro selecionado para auditar.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } else if (MessageBox.Show("Confirma auditar todos registros selecionados, está opção não poderá ser desfeita.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.No) { return; } TList_RegLanDuplicata _LanDuplicatas = new TList_RegLanDuplicata(); (BS_Duplicata.List as IEnumerable <TRegistro_LanDuplicata>).ToList().FindAll(r => r.St_liquidar).ForEach(p => { _LanDuplicatas.Add(p); }); try { TCN_LanDuplicata.AuditarDuplicatas(_LanDuplicatas, null); MessageBox.Show("Auditado com sucesso.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information); (BS_Duplicata.DataSource as TList_RegLanDuplicata).RemoveAll(r => r.St_liquidar = true); BS_Duplicata.ResetBindings(true); } catch (Exception ex) { MessageBox.Show(ex.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } else { if (!(bsCaixa.List as IEnumerable <TRegistro_LanCaixa>).ToList().Exists(r => r.St_conciliar)) { MessageBox.Show("Nenhum registro selecionado para auditar.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } else if (MessageBox.Show("Confirma auditar todos registros selecionados, está opção não poderá ser desfeita.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.No) { return; } TList_LanCaixa _LanCaixas = new TList_LanCaixa(); (bsCaixa.List as IEnumerable <TRegistro_LanCaixa>).ToList().FindAll(r => r.St_conciliar).ForEach(p => { _LanCaixas.Add(p); }); try { TCN_LanCaixa.AuditarCaixa(_LanCaixas, null); MessageBox.Show("Auditado com sucesso.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information); (bsCaixa.DataSource as TList_LanCaixa).RemoveAll(r => r.St_conciliar); bsCaixa.ResetBindings(true); } catch (Exception ex) { MessageBox.Show(ex.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } }
private void ImprimirDuplicata() { if (BS_Duplicata.Current != null) { //Buscar parcela TList_RegLanDuplicata lDup = TCN_LanDuplicata.Busca((BS_Duplicata.Current as TRegistro_LanDuplicata).Cd_empresa, (BS_Duplicata.Current as TRegistro_LanDuplicata).Nr_lancto.ToString(), string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, 0, string.Empty, null); lDup[0].Parcelas = new TCD_LanParcela().Select( new Utils.TpBusca[] { new Utils.TpBusca() { vNM_Campo = "a.cd_empresa", vOperador = "=", vVL_Busca = "'" + lDup[0].Cd_empresa.Trim() + "'" }, new Utils.TpBusca() { vNM_Campo = "a.nr_lancto", vOperador = "=", vVL_Busca = "" + lDup[0].Nr_lancto + "" } }, 0, string.Empty, string.Empty, string.Empty); if (lDup.Count > 0) { using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao()) { //Buscar dados Empresa CamadaDados.Diversos.TList_CadEmpresa lEmpresa = CamadaNegocio.Diversos.TCN_CadEmpresa.Busca(lDup[0].Cd_empresa, string.Empty, string.Empty, null); //Buscar dados do sacado CamadaDados.Financeiro.Cadastros.TList_CadClifor lSacado = CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.Busca_Clifor(lDup[0].Cd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 0, null); //Buscar endereco sacado if (lSacado.Count > 0) { lSacado[0].lEndereco = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(lDup[0].Cd_clifor, lDup[0].Cd_endereco, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 0, null); } fImp.St_enabled_enviaremail = true; fImp.pCd_clifor = lDup[0].Cd_clifor; fImp.pMensagem = "DUPLICATAS DO DOCUMENTO Nº" + lDup[0].Nr_docto; if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail)) { TCN_LayoutDuplicata.Imprime_Duplicata(Altera_Relatorio, lDup[0].Parcelas, lEmpresa, lSacado, fImp.pSt_imprimir, fImp.pSt_visualizar, fImp.pSt_exportPdf, fImp.Path_exportPdf, fImp.pSt_enviaremail, fImp.pDestinatarios, "DUPLICATAS(S) DO DOCUMENTO Nº " + lDup[0].Nr_docto, fImp.pDs_mensagem); 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); } }