Exemplo n.º 1
0
 public TRegistro_LoteBloqueto()
 {
     id_lote             = null;
     id_lotestr          = string.Empty;
     Ds_lote             = string.Empty;
     dt_lote             = null;
     dt_lotestr          = string.Empty;
     dt_processamento    = null;
     dt_processamentostr = string.Empty;
     Vl_taxa             = decimal.Zero;
     Cd_empresa          = string.Empty;
     Nm_empresa          = string.Empty;
     id_config           = null;
     id_configstr        = string.Empty;
     Ds_config           = string.Empty;
     Cd_contager         = string.Empty;
     Ds_contager         = string.Empty;
     St_registro         = "A";
     status            = "ABERTO";
     lBloquetos        = new TList_Lote_X_Titulo();
     lBloquetosExcluir = new blListaTitulo();
     lCaixa            = new TList_Lote_X_Caixa();
     ListaBloqueto     = new blListaTitulo();
     ListaCaixa        = new Caixa.TList_LanCaixa();
 }
Exemplo n.º 2
0
        public TList_Lote_X_Titulo Select(TpBusca[] vBusca, Int32 vTop, string vNM_Campo)
        {
            bool podeFecharBco        = false;
            TList_Lote_X_Titulo lista = new TList_Lote_X_Titulo();

            if (Banco_Dados == null)
            {
                CriarBanco_Dados(false);
                podeFecharBco = true;
            }
            System.Data.SqlClient.SqlDataReader reader = ExecutarBusca(SqlCodeBusca(vBusca, vTop, vNM_Campo));
            try
            {
                while (reader.Read())
                {
                    TRegistro_Lote_X_Titulo reg = new TRegistro_Lote_X_Titulo();
                    if (!(reader.IsDBNull(reader.GetOrdinal("ID_Lote"))))
                    {
                        reg.Id_lote = reader.GetDecimal(reader.GetOrdinal("ID_Lote"));
                    }
                    if (!(reader.IsDBNull(reader.GetOrdinal("CD_Empresa"))))
                    {
                        reg.Cd_empresa = reader.GetString(reader.GetOrdinal("CD_Empresa"));
                    }
                    if (!(reader.IsDBNull(reader.GetOrdinal("NR_Lancto"))))
                    {
                        reg.Nr_lancto = reader.GetDecimal(reader.GetOrdinal("NR_Lancto"));
                    }
                    if (!(reader.IsDBNull(reader.GetOrdinal("CD_Parcela"))))
                    {
                        reg.Cd_parcela = reader.GetDecimal(reader.GetOrdinal("CD_Parcela"));
                    }
                    if (!(reader.IsDBNull(reader.GetOrdinal("ID_Cobranca"))))
                    {
                        reg.Id_cobranca = reader.GetDecimal(reader.GetOrdinal("ID_Cobranca"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("Vl_taxa")))
                    {
                        reg.Vl_taxa = reader.GetDecimal(reader.GetOrdinal("Vl_Taxa"));
                    }

                    lista.Add(reg);
                }
            }
            finally
            {
                reader.Close();
                reader.Dispose();
                if (podeFecharBco)
                {
                    deletarBanco_Dados();
                }
            }
            return(lista);
        }
Exemplo n.º 3
0
 private void localizarBloquetos()
 {
     if (bsLote.Current != null)
     {
         if ((bsLote.Current as TRegistro_LoteBloqueto).St_registro.Trim().ToUpper().Equals("P"))
         {
             MessageBox.Show("Não é permitido incluir bloquetos em lote PROCESSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
             return;
         }
         using (TFLocalizarBloquetos fLocalizar = new TFLocalizarBloquetos())
         {
             fLocalizar.pCd_empresa = (bsLote.Current as TRegistro_LoteBloqueto).Cd_empresa;
             fLocalizar.pNm_empresa = (bsLote.Current as TRegistro_LoteBloqueto).Nm_empresa;
             fLocalizar.pId_Config  = (bsLote.Current as TRegistro_LoteBloqueto).Id_configstr;
             fLocalizar.pDs_config  = (bsLote.Current as TRegistro_LoteBloqueto).Ds_config;
             if (fLocalizar.ShowDialog() == DialogResult.OK)
             {
                 TList_Lote_X_Titulo lTitulo = new TList_Lote_X_Titulo();
                 foreach (var v in fLocalizar.lBloquetos)
                 {
                     if ((bsLote.Current as TRegistro_LoteBloqueto).ListaBloqueto.Exists(p => p.Cd_empresa.Trim().Equals(v.Cd_empresa) &&
                                                                                         p.Nr_lancto.Equals(v.Nr_lancto) &&
                                                                                         p.Cd_parcela.Equals(v.Cd_parcela) &&
                                                                                         p.Id_cobranca.Equals(v.Id_cobranca)))
                     {
                         continue;
                     }
                     lTitulo.Add(new TRegistro_Lote_X_Titulo()
                     {
                         Cd_empresa  = v.Cd_empresa,
                         Cd_parcela  = v.Cd_parcela,
                         Id_cobranca = v.Id_cobranca,
                         Id_lote     = (bsLote.Current as TRegistro_LoteBloqueto).Id_lote,
                         Nr_lancto   = v.Nr_lancto
                     });
                 }
                 if (lTitulo.Count > 0)
                 {
                     try
                     {
                         CamadaNegocio.Financeiro.Bloqueto.TCN_Lote_X_Titulo.GravarTitulosLote(lTitulo, null);
                         MessageBox.Show("Titulos gravados com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                         bsLote_PositionChanged(this, new EventArgs());
                     }
                     catch (Exception ex)
                     { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
                 }
             }
         }
     }
     else
     {
         MessageBox.Show("Não existe lote para amarrar bloquetos.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
     }
 }
Exemplo n.º 4
0
        public static void GravarTitulosLote(TList_Lote_X_Titulo lTitulos, BancoDados.TObjetoBanco banco)
        {
            bool st_transacao          = false;
            TCD_Lote_X_Titulo qtb_lote = new TCD_Lote_X_Titulo();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_lote.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_lote.Banco_Dados = banco;
                }
                lTitulos.ForEach(p => qtb_lote.Gravar(p));
                if (st_transacao)
                {
                    qtb_lote.Banco_Dados.Commit_Tran();
                }
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_lote.Banco_Dados.RollBack_Tran();
                }
                throw new Exception("Erro incluir titulos: " + ex.Message.Trim());
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_lote.deletarBanco_Dados();
                }
            }
        }