private void afterNovo()
{
if (vl_saldo.Value > decimal.Zero)
{
using (TFCartaFrete fCarta = new TFCartaFrete())
{
fCarta.Cd_empresa = Cd_empresa;
fCarta.Nm_empresa = Nm_empresa;
fCarta.Dt_vencimento = Dt_vencimento;
if (fCarta.ShowDialog() == DialogResult.OK)
{
lCarta.Add(fCarta.rCF);
bsCartaFrete.ResetBindings(true);
bsCartaFrete_PositionChanged(this, new EventArgs());
}
}
}
else
{
MessageBox.Show("Não existe mais saldo lançar nova carta frete.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
private void bb_cartafrete_Click(object sender, EventArgs e)
{
using (TFCartaFrete fCFrete = new TFCartaFrete())
{
fCFrete.Cd_empresa = pCd_empresa;
fCFrete.Nm_empresa = pNm_empresa;
if (fCFrete.ShowDialog() == DialogResult.OK)
{
if (fCFrete.rCF != null)
{
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).rCheque = null;
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).rFatura = null;
bb_cheque.Text = "Trocar Cheque";
bb_cartao.Text = "Trocar Cartão";
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).rCartaFrete = fCFrete.rCF;
//Calcular taxa administrativa
object obj = new CamadaDados.Financeiro.Cadastros.TCD_CadPortador().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_cartafrete, 'N')",
vOperador = "=",
vVL_Busca = "'S'"
}
}, "a.pc_txtroca");
if (obj != null)
{
if (decimal.Parse(obj.ToString()) > decimal.Zero)
{
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).Vl_TaxaFin =
Math.Round(decimal.Divide(decimal.Multiply((bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).rCheque.Vl_titulo, decimal.Parse(obj.ToString())), 100), 2);
}
}
if ((bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).Vl_TaxaFin.Equals(decimal.Zero))
{
using (Componentes.TFQuantidade fValor = new Componentes.TFQuantidade())
{
fValor.Casas_decimais = 2;
fValor.Vl_saldo = (bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).rCartaFrete.Vl_documento;
fValor.Ds_label = "Taxa Administrativa";
if (fValor.ShowDialog() == DialogResult.OK)
{
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).Vl_TaxaFin = fValor.Quantidade;
}
}
}
bb_cartafrete.Text = bb_cartafrete.Text + "\r\n" + (bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).rCartaFrete.Vl_documento.ToString("C2", new System.Globalization.CultureInfo("en-US")) +
((bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).Vl_TaxaFin > decimal.Zero ?
"\r\nTaxa Adm.: " + (bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).Vl_TaxaFin.ToString("N2", new System.Globalization.CultureInfo("en-US")) : string.Empty);
using (Financeiro.TFTrocoPDV fTroco = new Financeiro.TFTrocoPDV())
{
fTroco.Cd_empresa = pCd_empresa;
fTroco.Id_caixaPDV = pId_caixa;
fTroco.Vl_troco = fCFrete.rCF.Vl_documento - (bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).Vl_TaxaFin;
fTroco.St_desativarCred = true;
if (fTroco.ShowDialog() == DialogResult.OK)
{
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).Vl_trocoD = fTroco.Vl_trocoDinheiro;
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).lTrocoCHP = fTroco.lChTroco;
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).lTrocoCHT = fTroco.lChRepasse;
}
else
{
MessageBox.Show("Obrigatorio informar valor total troco para especie.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
(bsTrocaEspecie.Current as CamadaDados.Faturamento.PDV.TRegistro_TrocaEspecie).rCartaFrete = null;
bb_cartafrete.Text = "Trocar Carta Frete";
}
}
}
}
}
}
