private void BuscarMoedaPadrao()
{
if (!string.IsNullOrEmpty(cd_empresa.Text))
{
//Buscar Moeda Padrao
CamadaDados.Financeiro.Cadastros.TList_Moeda tabela = CamadaNegocio.ConfigGer.TCN_CadParamGer_X_Empresa.BuscarMoedaPadrao(cd_empresa.Text, null);
if (tabela != null)
{
if (tabela.Count > 0)
{
(bsCotacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Cotacao).Cd_moeda = tabela[0].Cd_moeda;
(bsCotacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Cotacao).Ds_moeda = tabela[0].Ds_moeda_singular;
}
else
{
(bsCotacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Cotacao).Cd_moeda = string.Empty;
(bsCotacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Cotacao).Ds_moeda = string.Empty;
}
}
else
{
(bsCotacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Cotacao).Cd_moeda = string.Empty;
(bsCotacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Cotacao).Ds_moeda = string.Empty;
}
}
}
private void TFItensContrato_Load(object sender, EventArgs e)
{
if (!string.IsNullOrEmpty(Utils.Parametros.pubCultura))
{
Idioma.TIdioma.AjustaCultura(this);
}
this.Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
this.pPedido.set_FormatZero();
if (rped != null)
{
bsPedido.DataSource = new CamadaDados.Faturamento.Pedido.TList_Pedido()
{
rped
};
CFG_Pedido.Enabled = false;
BB_CFGPedido.Enabled = false;
CD_Produto.Enabled = !this.St_alterar;
BB_Produto.Enabled = !this.St_alterar;
DT_Pedido.Enabled = this.St_alterar;
CD_Moeda.Enabled = this.St_alterar;
BB_Moeda.Enabled = this.St_alterar;
Nr_PedidoOrigem.Enabled = this.St_alterar;
Vl_Frete.Enabled = this.St_alterar;
if (!this.St_alterar)
{
bsItens.AddNew();
}
else
{
bsItens.Position = this.IndexItem;
}
st_valoresfixos = rped.St_valoresfixos.Trim().ToUpper().Equals("S");
bsPedido.ResetCurrentItem();
}
else
{
bsPedido.AddNew();
bsItens.AddNew();
CD_Empresa.Text = this.Cd_empresa;
NM_Empresa.Text = this.Nm_empresa;
CD_Clifor.Text = this.Cd_clifor;
NM_Clifor.Text = this.Nm_clifor;
CD_Endereco.Text = this.Cd_endereco;
DS_Endereco.Text = this.Ds_endereco;
(bsPedido.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).ST_Pedido = "F";//Pedido Fechado
//Buscar Moeda Padrao
CamadaDados.Financeiro.Cadastros.TList_Moeda tabela = CamadaNegocio.ConfigGer.TCN_CadParamGer_X_Empresa.BuscarMoedaPadrao(CD_Empresa.Text);
if (tabela != null)
{
CD_Moeda.Text = tabela[0].Cd_moeda;
DS_Moeda.Text = tabela[0].Ds_moeda_singular;
Sigla_Moeda.Text = tabela[0].Sigla;
}
}
}
private void BB_Gravar_Click(object sender, EventArgs e)
{
if (bsExecDespesa.Current != null)
{
using (Financeiro.TFLanDuplicata dp = new Financeiro.TFLanDuplicata())
{
dp.vVl_documento = (bsExecDespesa.Current as TRegistro_ExecDespesas).vl_executado;
dp.vCd_empresa = (bsExecDespesa.Current as TRegistro_ExecDespesas).Cd_empresa;
//Buscar Moeda Padrao
CamadaDados.Financeiro.Cadastros.TList_Moeda tabela =
CamadaNegocio.ConfigGer.TCN_CadParamGer_X_Empresa.BuscarMoedaPadrao((bsExecDespesa.Current as TRegistro_ExecDespesas).Cd_empresa, null);
if (tabela != null)
{
if (tabela.Count > 0)
{
dp.vCd_moeda = tabela[0].Cd_moeda;
dp.vDs_moeda = tabela[0].Ds_moeda_singular;
dp.vSigla_moeda = tabela[0].Sigla;
dp.vCd_moeda_padrao = tabela[0].Cd_moeda;
dp.vDs_moeda_padrao = tabela[0].Ds_moeda_singular;
dp.vSigla_moeda_padrao = tabela[0].Sigla;
}
}
dp.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
if (dp.ShowDialog() == DialogResult.OK)
{
CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = new CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata();
rDup = dp.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
(bsExecDespesa.Current as TRegistro_ExecDespesas).rDuplicata = rDup;
(bsExecDespesa.Current as TRegistro_ExecDespesas).nr_lancto = Convert.ToDecimal(dp.nr_lancto);
(bsExecDespesa.Current as TRegistro_ExecDespesas).Id_orcamento = rdespesa.Id_orcamento;
(bsExecDespesa.Current as TRegistro_ExecDespesas).Cd_empresa = rdespesa.Cd_empresa;
(bsExecDespesa.Current as TRegistro_ExecDespesas).Nr_versao = rdespesa.Nr_versao;
(bsExecDespesa.Current as TRegistro_ExecDespesas).id_despesa = Convert.ToDecimal(rdespesa.Id_despesa);
TCN_ExecDespesas.Gravar(bsExecDespesa.Current as TRegistro_ExecDespesas, null);
this.DialogResult = DialogResult.OK;
MessageBox.Show("Duplicata gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
}
private void TFRel_SaldoSinteticoContaGer_Load(object sender, EventArgs e)
{
this.Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
pDados.set_FormatZero();
clbContaGer.Display = "DS_ContaGer";
clbContaGer.Value = "CD_ContaGer";
//Buscar Moeda Padrao
CamadaDados.Financeiro.Cadastros.TList_Moeda lMoeda =
CamadaNegocio.Financeiro.Cadastros.TCN_CadMoeda.Buscar(CamadaNegocio.ConfigGer.TCN_CadParamGer.BuscaVlString("CD_MOEDA_PADRAO", null),
string.Empty,
string.Empty,
string.Empty,
1,
string.Empty,
null);
if (lMoeda.Count > 0)
{
cd_moeda_padrao.Text = lMoeda[0].Cd_moeda;
ds_moeda_padrao.Text = lMoeda[0].Ds_moeda_singular;
sigla_moeda_padrao.Text = lMoeda[0].Sigla;
}
BuscarContaGer();
}
private void InformarValor(string portador)
{
if (lPortador.Count > 0)
{
if (Math.Round(pVl_receber, 2) > Math.Round(lPortador.Sum(p => p.Vl_pagtoPDV), 2))
{
if (portador.ToUpper().Trim().Equals("CH"))//Cheque
{
using (Financeiro.TFLanListaCheques fListaCheques = new Financeiro.TFLanListaCheques())
{
fListaCheques.Tp_mov = "R";
fListaCheques.Cd_empresa = pCd_empresa;
fListaCheques.St_pdv = true;
//Buscar Config PDV Empresa
CamadaDados.Faturamento.Cadastros.TList_CFGCupomFiscal lCfg =
CamadaNegocio.Faturamento.Cadastros.TCN_CFGCupomFiscal.Buscar(pCd_empresa, null);
if (lCfg.Count > 0)
{
fListaCheques.Cd_contager = lCfg[0].Cd_contaoperacional;
fListaCheques.Ds_contager = lCfg[0].Ds_contaoperacional;
}
fListaCheques.Cd_clifor = pCd_clifor;
fListaCheques.Cd_historico = rCfg.Cd_historicocaixa;
fListaCheques.Ds_historico = rCfg.Ds_historicocaixa;
fListaCheques.Cd_portador = lPortador.Find(p => p.St_controletitulobool).Cd_portador;
fListaCheques.Ds_portador = lPortador.Find(p => p.St_controletitulobool).Ds_portador;
fListaCheques.Nm_clifor = pNm_clifor;
fListaCheques.Dt_emissao = CamadaDados.UtilData.Data_Servidor();
fListaCheques.Vl_totaltitulo = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
fListaCheques.St_bloquearTroco = St_ReprocessaFin;
if (fListaCheques.ShowDialog() == DialogResult.OK)
{
lPortador.Find(p => p.St_controletitulobool).lCheque = fListaCheques.lCheques;
lPortador.Find(p => p.St_controletitulobool).Vl_pagtoPDV +=
fListaCheques.lCheques.Sum(p => p.Vl_titulo);
CalcularTroco(portador);
ConfirmarFin();
}
else
{
MessageBox.Show("Cheque não foi lançado... Liquidação não será efetivada! ");
return;
}
}
}
else if (portador.ToUpper().Trim().Equals("CC"))//Cartao Credito
{
//Buscar dados fatura cartao credito
using (TFLanCartaoPDV fCartao = new TFLanCartaoPDV())
{
fCartao.pCd_empresa = pCd_empresa;
fCartao.D_C = "C";
fCartao.Vl_saldofaturar = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
fCartao.St_bloquearTroco = St_ReprocessaFin;
if (fCartao.ShowDialog() == DialogResult.OK)
{
fCartao.lFatura.ForEach(p => lPortador.Find(x => x.St_cartaocreditobool).lFatura.Add(p));
lPortador.Find(p => p.St_cartaocreditobool).Vl_pagtoPDV += fCartao.lFatura.Sum(p => p.Vl_fatura);
CalcularTroco(portador);
ConfirmarFin();
}
}
}
else if (portador.ToUpper().Trim().Equals("CD"))//Cartao Debito
{
//Buscar dados fatura cartao credito
using (TFLanCartaoPDV fCartao = new TFLanCartaoPDV())
{
fCartao.pCd_empresa = pCd_empresa;
fCartao.D_C = "D";
fCartao.Vl_saldofaturar = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
fCartao.St_bloquearTroco = St_ReprocessaFin;
if (fCartao.ShowDialog() == DialogResult.OK)
{
fCartao.lFatura.ForEach(p => lPortador.Find(x => x.St_cartaocreditobool).lFatura.Add(p));
lPortador.Find(p => p.St_cartaocreditobool).Vl_pagtoPDV += fCartao.lFatura.Sum(p => p.Vl_fatura);
CalcularTroco(portador);
ConfirmarFin();
}
}
}
else if (portador.ToUpper().Trim().Equals("DU"))//Duplicata
{
//Buscar portador duplicata
CamadaDados.Financeiro.Cadastros.TList_CadPortador lDup =
new CamadaDados.Financeiro.Cadastros.TCD_CadPortador().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.tp_portadorPDV, '')",
vOperador = "=",
vVL_Busca = "'P'"
}
}, 1, string.Empty, string.Empty);
if (lDup.Count.Equals(0))
{
MessageBox.Show("Não existe portador duplicata configurado no sistema.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (string.IsNullOrEmpty(pCd_clifor))
{
MessageBox.Show("Não é permitido venda a prazo sem identificar cliente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Abrir tela Duplicata
if (pCd_clifor == rCfg.Cd_clifor)
{
Componentes.EditDefault CD_Clifor = new Componentes.EditDefault();
CD_Clifor.NM_Campo = "CD_Clifor";
CD_Clifor.NM_CampoBusca = "CD_Clifor";
DataRowView linha = FormBusca.UtilPesquisa.BTN_BuscaClifor(new Componentes.EditDefault[] { CD_Clifor }, string.Empty);
if (linha != null)
{
pCd_clifor = linha["cd_clifor"].ToString();
pNm_clifor = linha["Nm_clifor"].ToString();
}
else
{
MessageBox.Show("Obrigatório informar cliente para gerar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
//Verificar credito
CamadaDados.Financeiro.Duplicata.TRegistro_DadosBloqueio rDados =
new CamadaDados.Financeiro.Duplicata.TRegistro_DadosBloqueio();
if (CamadaNegocio.Financeiro.Duplicata.TCN_DadosBloqueio.VerificarBloqueioCredito(pCd_clifor,
pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV),
true,
ref rDados,
null))
{
using (Financeiro.TFLan_BloqueioCredito fBloq = new Financeiro.TFLan_BloqueioCredito())
{
fBloq.rDados = rDados;
fBloq.Vl_fatura = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
fBloq.ShowDialog();
if (!fBloq.St_desbloqueado)
{
MessageBox.Show("Não é permitido realizar venda para cliente com restrição crédito.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
//Abrir tela Duplicata
CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = new CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata();
rDup.Cd_empresa = pCd_empresa;
rDup.Nm_empresa = pNm_empresa;
rDup.Cd_clifor = pCd_clifor;
rDup.Nm_clifor = pNm_clifor;
//Buscar cond pagamento
CamadaDados.Financeiro.Cadastros.TList_CadCondPgto lCond =
CamadaNegocio.Financeiro.Cadastros.TCN_CadCondPgto.Buscar(string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
1,
decimal.Zero,
string.Empty,
string.Empty,
1,
string.Empty,
null);
if (lCond.Count > 0)
{
rDup.Cd_condpgto = lCond[0].Cd_condpgto;
rDup.Qt_parcelas = lCond[0].Qt_parcelas;
rDup.Qt_dias_desdobro = lCond[0].Qt_diasdesdobro;
}
//Buscar endereco clifor
if (!string.IsNullOrEmpty(pCd_clifor))
{
CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(pCd_clifor,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
1,
null);
if (lEnd.Count > 0)
{
pCd_endereco = rDup.Cd_endereco = lEnd[0].Cd_endereco;
pDs_endereco = rDup.Ds_endereco = lEnd[0].Ds_endereco;
}
}
rDup.Tp_docto = rCfg.Tp_docto;
rDup.Ds_tpdocto = rCfg.Ds_tpdocto;
rDup.Tp_duplicata = rCfg.Tp_duplicata;
rDup.Ds_tpduplicata = rCfg.Ds_tpduplicata;
rDup.Tp_mov = "R";
rDup.Cd_historico = rCfg.Cd_historico;
rDup.Ds_historico = rCfg.Ds_historico;
//Buscar Moeda Padrao
CamadaDados.Financeiro.Cadastros.TList_Moeda tabela =
CamadaNegocio.ConfigGer.TCN_CadParamGer_X_Empresa.BuscarMoedaPadrao(pCd_empresa, null);
if (tabela != null)
{
if (tabela.Count > 0)
{
rDup.Cd_moeda = tabela[0].Cd_moeda;
rDup.Ds_moeda = tabela[0].Ds_moeda_singular;
rDup.Sigla_moeda = tabela[0].Sigla;
}
}
rDup.Id_configBoleto = rCfg.Id_config;
rDup.Nr_docto = "PDC123";//pNr_cupom; //Numero Cupom
rDup.Dt_emissaostring = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
rDup.Vl_documento = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
rDup.Vl_documento_padrao = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
rDup.Parcelas.Add(new CamadaDados.Financeiro.Duplicata.TRegistro_LanParcela()
{
Cd_parcela = 1,
Dt_vencto = lCond.Count > 0 ? rDup.Dt_emissao.Value.AddDays(double.Parse(lCond[0].Qt_diasdesdobro.ToString())) : rDup.Dt_emissao,
Vl_parcela = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV),
Vl_parcela_padrao = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV)
});
lPortador.Find(p => p.Tp_portadorpdv.ToUpper().Equals("P")).lDup.Add(rDup);
lPortador.Find(p => p.Tp_portadorpdv.ToUpper().Equals("P")).Vl_pagtoPDV = rDup.Vl_documento_padrao;
ConfirmarFin();
}
else if (portador.ToUpper().Trim().Equals("DV"))//Devolucao Credito
{
//Devolucao de credito
using (Financeiro.TFSaldoCreditos fSaldo = new Financeiro.TFSaldoCreditos())
{
fSaldo.Cd_empresa = pCd_empresa;
fSaldo.Cd_clifor = pCd_clifor;
fSaldo.Vl_financeiro = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
fSaldo.Tp_mov = "'R'";
if (fSaldo.ShowDialog() == DialogResult.OK)
{
if (fSaldo.lSaldo != null)
{
lPortador.Find(p => p.St_devcreditobool).lCred = fSaldo.lSaldo;
lPortador.Find(p => p.St_devcreditobool).Vl_pagtoPDV =
fSaldo.lSaldo.Sum(p => p.Vl_processar);
CalcularTroco(portador);
ConfirmarFin();
}
}
else
{
return;
}
}
}
else
{
//Portador Dinheiro
using (Componentes.TFQuantidade fQtde = new Componentes.TFQuantidade())
{
fQtde.Casas_decimais = 2;
fQtde.Vl_default = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
fQtde.Vl_saldo = St_ReprocessaFin ? pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV) : decimal.Zero;
fQtde.Ds_label = "Valor Recebido";
if (fQtde.ShowDialog() == DialogResult.OK)
{
lPortador.Find(p => !p.St_devcreditobool &&
!p.St_entregafuturabool &&
!p.St_controletitulobool &&
!p.St_cartaocreditobool &&
!p.St_cartafretebool &&
!p.Tp_portadorpdv.Equals("P")).Vl_pagtoPDV += fQtde.Quantidade;
CalcularTroco(portador);
ConfirmarFin();
}
}
}
}
else
{
MessageBox.Show("Não existe mais saldo para receber.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
