public static void AplicarContaReferencial(TRegistro_CadPlanoContas rConta,
TRegistro_PlanoReferencial rRef,
BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_CadPlanoContas qtb_plano = new TCD_CadPlanoContas();
try
{
if (banco == null)
{
st_transacao = qtb_plano.CriarBanco_Dados(true);
}
else
{
qtb_plano.Banco_Dados = banco;
}
//Buscar Contas Contabeis
qtb_plano.Select(new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.cd_classificacao",
vOperador = "like",
vVL_Busca = "'" + rConta.Cd_classificacao.Trim() + "%'"
},
new TpBusca()
{
vNM_Campo = "a.tp_conta",
vOperador = "=",
vVL_Busca = "'A'"
}
}, 0, string.Empty, string.Empty).ForEach(p =>
{
p.Tp_contasped = rRef.Natureza.FormatStringEsquerda(2, '0');
p.Cd_referencia = rRef.Cd_referencia;
qtb_plano.Grava(p);
});
if (st_transacao)
{
qtb_plano.Banco_Dados.Commit_Tran();
}
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_plano.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro gravar registro: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_plano.deletarBanco_Dados();
}
}
}
public static string Excluir(TRegistro_CadPlanoContas val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_CadPlanoContas qtb_plan = new TCD_CadPlanoContas();
try
{
if (banco == null)
{
st_transacao = qtb_plan.CriarBanco_Dados(true);
}
else
{
qtb_plan.Banco_Dados = banco;
}
//Verificar se conta possui movimentação
if (new CamadaDados.Contabil.TCD_LanctosCTB(qtb_plan.Banco_Dados).BuscarEscalar(
new TpBusca[]
{
new TpBusca
{
vNM_Campo = "a.cd_conta_ctb",
vOperador = "like",
vVL_Busca = "'" + val.Cd_conta_ctbstr + "%'"
}
}, "1") != null)
{
throw new Exception("Não é permitido excluir conta contabil com movimento.");
}
qtb_plan.Deleta(val);
if (st_transacao)
{
qtb_plan.Banco_Dados.Commit_Tran();
}
return("OK");
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_plan.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro excluir registro: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_plan.deletarBanco_Dados();
}
}
}
public static void MoverRegistros(TRegistro_CadPlanoContas rOrig, TRegistro_CadPlanoContas rDest, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_CadPlanoContas qtb_itens = new TCD_CadPlanoContas();
try
{
if (banco == null)
{
st_transacao = qtb_itens.CriarBanco_Dados(true);
}
else
{
qtb_itens.Banco_Dados = banco;
}
qtb_itens.executarSql("update tb_ctb_planocontas set cd_classificacao = '" + rDest.Cd_classificacao.Trim() + "' " +
",dt_alt = getdate() where cd_conta_ctb = " + rOrig.Cd_conta_ctbstr + "\r\n" +
"update tb_ctb_planocontas set cd_classificacao = '" + rOrig.Cd_classificacao.Trim() + "' " +
",dt_alt = getdate() where cd_conta_ctb = " + rDest.Cd_conta_ctbstr, null);
if (st_transacao)
{
qtb_itens.Banco_Dados.Commit_Tran();
}
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_itens.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro mover registros: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_itens.deletarBanco_Dados();
}
}
}
public static string Gravar(TRegistro_CadPlanoContas val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_CadPlanoContas qtb_plan = new TCD_CadPlanoContas();
try
{
if (banco == null)
{
st_transacao = qtb_plan.CriarBanco_Dados(true);
}
else
{
qtb_plan.Banco_Dados = banco;
}
string retorno = qtb_plan.Grava(val);
if (st_transacao)
{
qtb_plan.Banco_Dados.Commit_Tran();
}
return(retorno);
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_plan.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro gravar registro: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_plan.deletarBanco_Dados();
}
}
}
