Ejemplo n.º 1
0
 private void ExcluirTitulo()
 {
     if (dsBloqueto.Current != null)
     {
         if ((dsBloqueto.Current as CamadaDados.Financeiro.Bloqueto.blTitulo).Status_remessa.Trim().ToUpper().Equals("ACEITO"))
         {
             MessageBox.Show("Não é permitido excluir titulo aceito em um lote de remessa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
             return;
         }
         if (MessageBox.Show("Confirma exclusão do titulo?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question,
                             MessageBoxDefaultButton.Button1) == DialogResult.Yes)
         {
             try
             {
                 (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulosDel.Add(
                     dsBloqueto.Current as CamadaDados.Financeiro.Bloqueto.blTitulo);
                 dsBloqueto.RemoveCurrent();
                 TCN_LoteRemessa.Gravar(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa, null);
                 MessageBox.Show("Titulo excluido com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 vl_total_bloqueto.Value = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Sum(p => p.Vl_documento);
             }
             catch (Exception ex)
             {
                 MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
             }
         }
     }
     else
     {
         MessageBox.Show("Obrigatorio selecionar titulo para excluir.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
     }
 }
Ejemplo n.º 2
0
 private void InserirTitulo()
 {
     if (bsLoteRemessa.Current != null)
     {
         if ((bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).St_registro.Trim().ToUpper().Equals("P"))
         {
             MessageBox.Show("Não é permitido inserir titulo em lote PROCESSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
             return;
         }
         using (TFLocalizarBloquetos fLocalizar = new TFLocalizarBloquetos())
         {
             fLocalizar.Text         = "Localizar Bloquetos Gerar Remessa";
             fLocalizar.pCd_empresa  = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Cd_empresa;
             fLocalizar.pNm_empresa  = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Nm_empresa;
             fLocalizar.St_remessa   = true;
             fLocalizar.pId_Config   = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Id_configstr;
             fLocalizar.pDs_config   = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Ds_config;
             fLocalizar.Tp_instrucao = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Tp_instrucao;
             if (fLocalizar.ShowDialog() == DialogResult.OK)
             {
                 if (fLocalizar.lBloquetos != null)
                 {
                     fLocalizar.lBloquetos.ForEach(p =>
                     {
                         if (!(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Exists(v => v.Nosso_numero.Trim().Equals(p.Nosso_numero.Trim())))
                         {
                             (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Add(p);
                         }
                     });
                     try
                     {
                         TCN_LoteRemessa.Gravar(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa, null);
                         MessageBox.Show("Titulos incluidos com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                         bsLoteRemessa.ResetCurrentItem();
                         vl_total_bloqueto.Value = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Sum(p => p.Vl_documento);
                     }
                     catch (Exception ex)
                     {
                         MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
                     }
                 }
             }
         }
     }
     else
     {
         MessageBox.Show("Obrigatorio selecionar lote para inserir titulo.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
     }
 }
Ejemplo n.º 3
0
 private void afterNovo()
 {
     using (TFLoteRemessa fLote = new TFLoteRemessa())
     {
         if (fLote.ShowDialog() == DialogResult.OK)
         {
             if (fLote.rLote != null)
             {
                 try
                 {
                     TCN_LoteRemessa.Gravar(fLote.rLote, null);
                     MessageBox.Show("Lote remessa gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                     LimparFiltros();
                     id_lote.Text = fLote.rLote.Id_lotestr;
                     afterBusca();
                 }
                 catch (Exception ex)
                 {
                     MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
                 }
             }
         }
     }
 }