Ejemplo n.º 1
0
        private void afterNovo()
        {
            using (TFCreditoClifor fCred = new TFCreditoClifor())
            {
                if (fCred.ShowDialog() == DialogResult.OK)
                {
                    if (fCred.rCred != null)
                    {
                        using (Financeiro.TFLanCaixa fCaixa = new Financeiro.TFLanCaixa())
                        {
                            fCaixa.dsLanCaixa.AddNew();

                            (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_Empresa     = fCred.rCred.Cd_empresa;
                            (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).NM_Clifor      = fCred.rCred.Nm_clifor;
                            (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Dt_lancto      = fCred.rCred.Dt_credito;
                            (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).ComplHistorico = fCred.rCred.Ds_observacao;
                            fCaixa.RB_Receber.Checked = true;

                            fCaixa.CD_Empresa.Enabled = false;
                            fCaixa.NM_Clifor.Enabled  = false;
                            fCaixa.DT_Lancto.Enabled  = false;
                            fCaixa.RB_Pagar.Enabled   = false;
                            fCaixa.RB_Receber.Enabled = false;

                            fCaixa.dsLanCaixa.ResetCurrentItem();

                            if (fCaixa.ShowDialog() == DialogResult.OK)
                            {
                                if (fCaixa.dsLanCaixa.Current != null)
                                {
                                    try
                                    {
                                        TCN_CreditoClifor.Gravar(fCred.rCred, fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa, null);
                                        MessageBox.Show("Credito gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                                        this.LimparFiltros();
                                        id_credito.Text = fCred.rCred.Id_creditostr;
                                        this.afterBusca();
                                    }
                                    catch (Exception ex)
                                    { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
                                }
                                else
                                {
                                    MessageBox.Show("Obrigatorio informar caixa para gravar credito cliente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                                }
                            }
                            else
                            {
                                MessageBox.Show("Obrigatorio informar caixa para gravar credito cliente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                            }
                        }
                    }
                }
            }
        }
Ejemplo n.º 2
0
 private void afterBusca()
 {
     bsCreditoClifor.DataSource = TCN_CreditoClifor.Buscar(id_credito.Text,
                                                           cd_empresa.Text,
                                                           cd_clifor.Text,
                                                           string.Empty,
                                                           DT_Inicial.Text,
                                                           DT_Final.Text,
                                                           st_comsaldo.Checked,
                                                           null);
     bsCreditoClifor_PositionChanged(this, new EventArgs());
 }