Ejemplo n.º 1
0
        public static string Excluir(TRegistro_CadHistorico val, BancoDados.TObjetoBanco banco)
        {
            bool             st_transacao = false;
            TCD_CadHistorico qtb_hist     = new TCD_CadHistorico();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_hist.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_hist.Banco_Dados = banco;
                }
                val.St_registro = "C";
                qtb_hist.Gravar(val);
                if (st_transacao)
                {
                    qtb_hist.Banco_Dados.Commit_Tran();
                }
                return(val.Cd_historico);
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_hist.Banco_Dados.RollBack_Tran();
                }
                throw new Exception("Erro excluir historico: " + ex.Message.Trim());
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_hist.deletarBanco_Dados();
                }
            }
        }
Ejemplo n.º 2
0
        public static string Gravar(TRegistro_CadHistorico val, BancoDados.TObjetoBanco banco)
        {
            bool             st_transacao = false;
            TCD_CadHistorico qtb_hist     = new TCD_CadHistorico();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_hist.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_hist.Banco_Dados = banco;
                }
                val.Cd_historico = CamadaDados.TDataQuery.getPubVariavel(qtb_hist.Gravar(val), "@P_CD_HISTORICO");
                if (st_transacao)
                {
                    qtb_hist.Banco_Dados.Commit_Tran();
                }
                return(val.Cd_historico);
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_hist.Banco_Dados.RollBack_Tran();
                }
                throw new Exception("Erro gravar historico: " + ex.Message.Trim());
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_hist.deletarBanco_Dados();
                }
            }
        }
Ejemplo n.º 3
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();
                }
            }
        }