Beispiel #1
0
 private void afterExclui()
 {
     if (bsLoteRemessa.Current != null)
     {
         if ((bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).lTitulos.Exists(p => p.Status_remessa.Trim().ToUpper().Equals("ACEITO")))
         {
             MessageBox.Show("Não é permitido excluir lote que contenha titulo com status ACEITO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
             return;
         }
         if (MessageBox.Show("Confirma exclusão do lote selecionado?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question,
                             MessageBoxDefaultButton.Button1) == DialogResult.Yes)
         {
             try
             {
                 TCN_LoteRemessa.Excluir(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa, null);
                 MessageBox.Show("Lote remessa excluido com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 LimparFiltros();
                 afterBusca();
             }
             catch (Exception ex)
             {
                 MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
             }
         }
     }
     else
     {
         MessageBox.Show("Obrigatorio selecionar lote remessa para excluir.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
     }
 }
Beispiel #2
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);
     }
 }
Beispiel #3
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);
     }
 }
Beispiel #4
0
 private void bb_atualizaseq_Click(object sender, EventArgs e)
 {
     if (bsLoteRemessa.Current != null)
     {
         using (TFAtualizaSeqRemessa fAtualiza = new TFAtualizaSeqRemessa())
         {
             fAtualiza.pId_config   = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Id_configstr;
             fAtualiza.pDs_config   = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Ds_config;
             fAtualiza.pNr_seqatual = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Nr_arqRemessa;
             if (fAtualiza.ShowDialog() == DialogResult.OK)
             {
                 try
                 {
                     TCN_LoteRemessa.AlterarSeqRemessa(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa, fAtualiza.Nr_seqremessa, null);
                     MessageBox.Show("Sequencial alterado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                     afterBusca();
                 }
                 catch (Exception ex)
                 { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
             }
         }
     }
 }
Beispiel #5
0
        private void afterBusca()
        {
            string cond = string.Empty;
            string virg = string.Empty;

            if (cbAberto.Checked)
            {
                cond = "'A'";
                virg = ",";
            }
            if (cbFaturado.Checked)
            {
                cond += virg + "'P'";
            }
            bsLoteRemessa.DataSource = TCN_LoteRemessa.Buscar(id_lote.Text,
                                                              cbConfig.SelectedValue != null ? cbConfig.SelectedValue.ToString() : string.Empty,
                                                              nosso_numero.Text,
                                                              cond,
                                                              DT_Inicial.Text,
                                                              DT_Final.Text,
                                                              st_rejeitados.Checked,
                                                              null);
            bsLoteRemessa_PositionChanged(this, new EventArgs());
        }
Beispiel #6
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);
                 }
             }
         }
     }
 }
Beispiel #7
0
        private void ProcessarLote()
        {
            if (bsLoteRemessa.Current != null)
            {
                //Validar CEP
                if (!ValidacaoCEP())
                {
                    return;
                }
                //Validar Dt. Vencimento
                if ((bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa)
                    .lTitulos
                    .Exists(x => x.Dt_vencimento < CamadaDados.UtilData.Data_Servidor()))
                {
                    MessageBox.Show("O lote selecionado possui títulos vencidos, não será possivel processar a remessa.", "Messagem", MessageBoxButtons.OK, MessageBoxIcon.Error);
                    return;
                }

                if ((bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).St_registro.Trim().ToUpper().Equals("P"))
                {
                    if (MessageBox.Show("Lote PROCESSADO. Deseja gerar novo arquivo deste lote?", "Pergunta",
                                        MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) != DialogResult.Yes)
                    {
                        return;
                    }
                }
                using (FolderBrowserDialog fbd = new FolderBrowserDialog())
                {
                    fbd.Description         = "Salvar Arquivo Remessa";
                    fbd.ShowNewFolderButton = true;
                    if (!string.IsNullOrEmpty(SettingsUtils.Default.PATH_REMESSA))
                    {
                        fbd.SelectedPath = SettingsUtils.Default.PATH_REMESSA;
                    }
                    if (fbd.ShowDialog() == DialogResult.OK)
                    {
                        try
                        {
                            (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Path_remessa = fbd.SelectedPath;
                            TCN_LoteRemessa.ProcessarRemessa(bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa, null);
                            MessageBox.Show("Lote Remessa  processado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                            //Buscar configuracao
                            CamadaDados.Financeiro.Cadastros.TList_CadCFGBanco lCfg =
                                CamadaNegocio.Financeiro.Cadastros.TCN_CadCFGBanco.Buscar(string.Empty,
                                                                                          string.Empty,
                                                                                          (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Cd_empresa,
                                                                                          string.Empty,
                                                                                          "CR",
                                                                                          (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Cd_contager,
                                                                                          "A",
                                                                                          string.Empty,
                                                                                          1,
                                                                                          null);
                            LimparFiltros();
                            id_lote.Text = (bsLoteRemessa.Current as CamadaDados.Financeiro.Bloqueto.TRegistro_LoteRemessa).Id_lotestr;
                            afterBusca();
                        }
                        catch (Exception ex)
                        {
                            MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
                        }
                        finally
                        {
                            SettingsUtils.Default.PATH_REMESSA = fbd.SelectedPath;
                            SettingsUtils.Default.Save();
                        }
                    }
                    else
                    {
                        MessageBox.Show("Obrigatorio informar PATH para salvar arquivo REMESSA.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                    }
                }
            }
            else
            {
                MessageBox.Show("Obrigatorio selecionar lote para processar remessa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
            }
        }