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