Esempio n. 1
0
 private void bb_corrigir_Click(object sender, EventArgs e)
 {
     if (cbContaGer.SelectedItem == null)
     {
         MessageBox.Show("Obrigatório informar conta gerencial.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         cbContaGer.Focus();
         return;
     }
     if (bsSaldoAplic.Current == null)
     {
         MessageBox.Show("Obrigatório selecionar conta aplicação.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         return;
     }
     if ((bsSaldoAplic.Current as TRegistro_SaldoContaGer).Vl_saldo.Equals(decimal.Zero))
     {
         MessageBox.Show("Aplicação não possui saldo para resgatar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         return;
     }
     using (TFAplicarResgatar fAplic = new TFAplicarResgatar())
     {
         if (fAplic.ShowDialog() == DialogResult.OK)
         {
             try
             {
                 TCN_LanCaixa.GravaLanCaixa(new TRegistro_LanCaixa()
                 {
                     Cd_ContaGer  = (bsSaldoAplic.Current as TRegistro_SaldoContaGer).Cd_contager,
                     Cd_Empresa   = fAplic.pCd_empresa,
                     Cd_Historico = fAplic.pCd_historico,
                     Dt_lancto    = fAplic.pDt_lancto,
                     Login        = Utils.Parametros.pubLogin,
                     Nr_Docto     = "CORRECAO",
                     St_avulso    = "S",
                     Vl_RECEBER   = fAplic.pValor - (bsSaldoAplic.Current as TRegistro_SaldoContaGer).Vl_saldo
                 }, null);
                 MessageBox.Show("Correção aplicação realizada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 afterBusca();
             }
             catch (Exception ex)
             { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
         }
     }
 }
Esempio n. 2
0
 private void bb_resgatar_Click(object sender, EventArgs e)
 {
     if (cbContaGer.SelectedItem == null)
     {
         MessageBox.Show("Obrigatório informar conta gerencial.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         cbContaGer.Focus();
         return;
     }
     if (bsSaldoAplic.Current == null)
     {
         MessageBox.Show("Obrigatório selecionar conta aplicação.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         return;
     }
     if ((bsSaldoAplic.Current as TRegistro_SaldoContaGer).Vl_saldo.Equals(decimal.Zero))
     {
         MessageBox.Show("Aplicação não possui saldo para resgatar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
         return;
     }
     using (TFAplicarResgatar fAplic = new TFAplicarResgatar())
     {
         fAplic.Tp_lancamento = "T";
         if (fAplic.ShowDialog() == DialogResult.OK)
         {
             try
             {
                 TCN_Lan_Transfere_Caixa.Transfere_Caixa(new TRegistro_Lan_Transfere_Caixa()
                 {
                     CD_Empresa          = fAplic.pCd_empresa,
                     CD_ContaGer_Entrada = cbContaGer.SelectedValue.ToString(),
                     CD_ContaGer_Saida   = (bsSaldoAplic.Current as TRegistro_SaldoContaGer).Cd_contager,
                     CD_Historico        = fAplic.pCd_historico,
                     DT_Lancto           = fAplic.pDt_lancto,
                     NR_Docto            = "RESGATE",
                     Valor_Transferencia = fAplic.pValor
                 }, null);
                 MessageBox.Show("Resgate aplicação realizado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 afterBusca();
             }
             catch (Exception ex)
             { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
         }
     }
 }