示例#1
0
        private void BB_Alterar_Click(object sender, EventArgs e)
        {
            if (bindingSourceCaixa.Current != null)
            {
                TFLanCaixa FLanCaixa = new TFLanCaixa();
                FLanCaixa.CD_ContaGer.Enabled = false;
                FLanCaixa.BB_ContaGer.Enabled = false;
                FLanCaixa.CD_Empresa.Enabled  = false;
                FLanCaixa.BB_Empresa.Enabled  = false;
                FLanCaixa.DT_Lancto.Enabled   = false;
                FLanCaixa.RB_Pagar.Enabled    = false;
                FLanCaixa.RB_Receber.Enabled  = false;
                FLanCaixa.VL_Receber.Enabled  = false;
                FLanCaixa.VL_Pagar.Enabled    = false;
                FLanCaixa.RB_Receber.Checked  = (bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_RECEBER > 0;
                FLanCaixa.RB_Pagar.Checked    = (bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR > 0;
                FLanCaixa.dsLanCaixa.Add(bindingSourceCaixa.Current as TRegistro_LanCaixa);

                if (FLanCaixa.ShowDialog() == DialogResult.OK)
                {
                    try
                    {
                        TCN_LanCaixa.AlterarLanCaixa((bindingSourceCaixa.Current as TRegistro_LanCaixa), null);
                        afterBusca();
                    }
                    catch (Exception ex)
                    {
                        MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
                    }
                }
            }
            else
            {
                MessageBox.Show("Obrigatorio selecionar registro de caixa para alterar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
            }
        }
示例#2
0
        private void BB_Novo_Click(object sender, EventArgs e)
        {
            using (TFLanCaixa FLanCaixa = new TFLanCaixa())
            {
                FLanCaixa.dsLanCaixa.DataSource = bindingSourceCaixa;

                FLanCaixa.dsLanCaixa.AddNew();

                (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Vl_Anterior = VL_DifCX.Value;
                (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Cd_ContaGer = cbContaGer.SelectedItem != null?cbContaGer.SelectedValue.ToString() : string.Empty;

                if (FLanCaixa.ShowDialog() == DialogResult.OK)
                {
                    //Lancar Centro Resultado
                    if (CamadaNegocio.ConfigGer.TCN_CadParamGer.BuscaVL_Bool("CRESULTADO_EMPRESA",
                                                                             (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Cd_Empresa,
                                                                             null).Trim().ToUpper().Equals("S"))
                    {
                        //Verificar se historico possui centro resultado cadastrado
                        object obj = new TCD_CadHistorico().BuscarEscalar(
                            new TpBusca[]
                        {
                            new TpBusca()
                            {
                                vNM_Campo = "a.cd_historico",
                                vOperador = "=",
                                vVL_Busca = "'" + (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Cd_Historico.Trim() + "'"
                            }
                        }, "a.cd_centroresult");
                        if (obj == null ? false : !string.IsNullOrEmpty(obj.ToString()))
                        {
                            (bindingSourceCaixa.Current as TRegistro_LanCaixa).lCustoLancto.Add(
                                new CamadaDados.Financeiro.CCustoLan.TRegistro_LanCCustoLancto()
                            {
                                Cd_empresa      = (bindingSourceCaixa.Current as TRegistro_LanCaixa).Cd_Empresa,
                                Cd_centroresult = obj.ToString(),
                                Vl_lancto       = (bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR > decimal.Zero ?
                                                  (bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR :
                                                  (bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_RECEBER,
                                Dt_lancto   = (bindingSourceCaixa.Current as TRegistro_LanCaixa).Dt_lancto,
                                Tp_registro = "A"
                            });
                        }
                        else
                        {
                            using (TFRateioCResultado fRateio = new TFRateioCResultado())
                            {
                                fRateio.vVl_Documento = (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR > decimal.Zero ?
                                                        (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR : (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Vl_RECEBER;
                                fRateio.Tp_mov       = (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR > decimal.Zero ? "P" : "R";
                                fRateio.Dt_movimento = (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).Dt_lancto;
                                fRateio.ShowDialog();
                                (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).lCustoLancto = fRateio.lCResultado;
                                (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).lCustoLanDel = fRateio.lCResultadoDel;
                            }
                        }
                    }
                    try
                    {
                        //Setar como lancamento caixa avulso
                        (FLanCaixa.dsLanCaixa.Current as TRegistro_LanCaixa).St_avulso = "S";
                        TCN_LanCaixa.GravaLanCaixa((bindingSourceCaixa.Current as TRegistro_LanCaixa), null);
                        afterBusca();
                    }
                    catch (Exception ex)
                    {
                        MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
                        FLanCaixa.dsLanCaixa.CancelEdit();
                    }
                }
                else
                {
                    FLanCaixa.dsLanCaixa.CancelEdit();
                }
            }
        }