private void gCaixa_ColumnHeaderMouseClick(object sender, DataGridViewCellMouseEventArgs e)
{
if (gCaixa.Columns[e.ColumnIndex].SortMode == DataGridViewColumnSortMode.NotSortable)
{
return;
}
if (bsCaixa.Count < 1)
{
return;
}
PropertyDescriptorCollection lP = TypeDescriptor.GetProperties(new CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa());
CamadaDados.Financeiro.Caixa.TList_LanCaixa lComparer;
SortOrder direcao = SortOrder.None;
if ((gCaixa.Columns[e.ColumnIndex].HeaderCell.SortGlyphDirection == SortOrder.None) ||
(gCaixa.Columns[e.ColumnIndex].HeaderCell.SortGlyphDirection == SortOrder.Descending))
{
lComparer = new CamadaDados.Financeiro.Caixa.TList_LanCaixa(lP.Find(gCaixa.Columns[e.ColumnIndex].DataPropertyName, true), SortOrder.Ascending);
foreach (DataGridViewColumn c in gCaixa.Columns)
{
c.HeaderCell.SortGlyphDirection = SortOrder.None;
}
direcao = SortOrder.Ascending;
}
else
{
lComparer = new CamadaDados.Financeiro.Caixa.TList_LanCaixa(lP.Find(gCaixa.Columns[e.ColumnIndex].DataPropertyName, true), SortOrder.Descending);
foreach (DataGridViewColumn c in gCaixa.Columns)
{
c.HeaderCell.SortGlyphDirection = SortOrder.None;
}
direcao = SortOrder.Descending;
}
(bsCaixa.List as CamadaDados.Financeiro.Caixa.TList_LanCaixa).Sort(lComparer);
bsCaixa.ResetBindings(false);
gCaixa.Columns[e.ColumnIndex].HeaderCell.SortGlyphDirection = direcao;
}
public TRegistro_LanRoyaltiesGMO()
{
id_lanctoGMO = null;
id_lanctoGMOstr = string.Empty;
Nr_Contratostr = string.Empty;
CD_Produto = string.Empty;
DS_Produto = string.Empty;
DS_Observacao = string.Empty;
QTD_Credito = decimal.Zero;
QTD_Debito = decimal.Zero;
TP_Lancto = "A";
tp_gmo = "D";
tipo_gmo = "INTACTA DECLARADA";
Cd_clifor = string.Empty;
nm_Clifor = string.Empty;
Cd_unidade = string.Empty;
Ds_unidade = string.Empty;
Sigla_unidade = string.Empty;
this.Vl_royalties_retido = decimal.Zero;
lPesagem = new CamadaDados.Balanca.TList_RegLanPesagemGraos();
lNf = new CamadaDados.Faturamento.NotaFiscal.TList_RegLanFaturamento();
lDuplicata = new CamadaDados.Financeiro.Duplicata.TList_RegLanDuplicata();
lCaixa = new CamadaDados.Financeiro.Caixa.TList_LanCaixa();
}
public static CamadaDados.Financeiro.Caixa.TList_LanCaixa DevolverCredito(string Cd_empresa,
string Cd_clifor,
string Cd_historico,
DateTime?Dt_lancto,
decimal Vl_credito,
BancoDados.TObjetoBanco banco)
{
//Buscar lista de credito da empresa/cliente
TList_CreditoClifor lCredito = Buscar(string.Empty,
Cd_empresa,
Cd_clifor,
string.Empty,
string.Empty,
string.Empty,
true,
banco);
CamadaDados.Financeiro.Caixa.TList_LanCaixa lCaixa = new CamadaDados.Financeiro.Caixa.TList_LanCaixa();
if (lCredito.Count > 0)
{
decimal saldo_credito = Vl_credito;
foreach (TRegistro_CreditoClifor rCred in lCredito)
{
if (saldo_credito > 0)
{
if (rCred.Vl_saldodevolver > decimal.Zero)
{
CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa rCaixa =
new CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa()
{
Cd_ContaGer = rCred.Cd_contager,
Cd_Empresa = Cd_empresa,
Cd_Historico = Cd_historico,
ComplHistorico = "DEVOLUCAO CREDITO: " + rCred.Id_creditostr,
Nr_Docto = "DEV" + rCred.Id_creditostr,
NM_Clifor = rCred.Nm_clifor,
Dt_lancto = Dt_lancto,
St_Titulo = "N",
Vl_PAGAR = rCred.Vl_saldodevolver > saldo_credito ? saldo_credito : rCred.Vl_saldodevolver,
Vl_RECEBER = decimal.Zero
};
CamadaNegocio.Financeiro.Caixa.TCN_LanCaixa.GravaLanCaixa(rCaixa, banco);
lCaixa.Add(rCaixa);
//Gravar Credito X Caixa
TCN_CreditoClifor_X_Caixa.Gravar(new TRegistro_CreditoClifor_X_Caixa()
{
Cd_contager = rCaixa.Cd_ContaGer,
Cd_lanctocaixa = rCaixa.Cd_LanctoCaixa,
Cd_empresa = rCred.Cd_empresa,
Id_credito = rCred.Id_credito
}, banco);
saldo_credito -= rCred.Vl_saldodevolver > Vl_credito ? Vl_credito : rCred.Vl_saldodevolver;
}
else
{
continue;
}
}
else
{
break;
}
}
}
return(lCaixa);
}