//private bool Altera_Relatorio = false;
public TFLan_FechamentoOperacao()
{
InitializeComponent();
pDados.set_FormatZero();
grid_NFSaida.ReadOnly = false;
BS_TotaisContrato.AddNew();
}
private void CalculaTotaisContrato()
{
decimal totimpostocompra = 0;
decimal totfretecompra = 0;
decimal totcomissaocompra = 0;
decimal totoutroscompra = 0;
decimal totimpostovenda = 0;
decimal totfretevenda = 0;
decimal totcomissaovenda = 0;
decimal totoutrosvenda = 0;
decimal totvenda = 0;
decimal totcompra = 0;
decimal totvlcompra = 0;
decimal totvlvenda = 0;
for (int i = 0; i < grid_SaldoContrato.SelectedRows.Count; i++)
{
totimpostocompra = totimpostocompra + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Imposto_Compra;
totimpostovenda = totimpostovenda + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Imposto_Venda;
totfretecompra = totfretecompra + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Frete_Compra;
totfretevenda = totfretevenda + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Frete_Venda;
totcomissaocompra = totcomissaocompra + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Comissao_Compra;
totcomissaovenda = totcomissaovenda + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Comissao_Venda;
totoutroscompra = totoutroscompra + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Outros_Compra;
totoutrosvenda = totoutrosvenda + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).Tot_Outros_Venda;
totvlvenda = totvlvenda + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).VL_Venda;
totvlcompra = totvlcompra + (BS_SaldoContrato[grid_SaldoContrato.SelectedRows[i].Index] as TRegistro_CadContratoHeadge).VL_Compra;
totcompra = totvlcompra + (totcompra + totimpostocompra + totfretecompra + totcomissaocompra + totoutroscompra);
totvenda = totvlvenda - (totvenda + totimpostovenda + totfretevenda + totcomissaovenda + totoutrosvenda);
}
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalImpostoCompra = totimpostocompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalImpostoVenda = totimpostovenda;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalFreteCompra = totfretecompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalFreteVenda = totfretevenda;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalComissaoCompra = totcomissaocompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalComissaoVenda = totcomissaovenda;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalOutrosCompra = totoutroscompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalOutrosVenda = totoutrosvenda;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalCompra = totcompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalVenda = totvenda;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalVLVenda = totvlvenda;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalVLCompra = totvlcompra;
//RESULTADOS
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalResulImposto = totimpostovenda + totimpostocompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalResulFrete = totfretevenda + totfretecompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalResulComissao = totcomissaovenda + totcomissaocompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalResulOutros = totoutrosvenda + totoutroscompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalResulTotCompraVenda = totvenda - totcompra;
(BS_TotaisContrato.Current as TRegistro_CadTotaisContratoHeadge).TotalResulVLCompraVenda = totvlvenda - totvlcompra;
BS_TotaisContrato.ResetBindings(true);
}
