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();
}
}
}
private void afterGrava()
{
if (bsPlanoReferencial.Current != null)
{
if ((bsPlanoReferencial.Current as TRegistro_PlanoReferencial).Tp_conta.ToUpper().Equals("S"))
{
MessageBox.Show("Não é permitido selecionar conta SINTÉTICA.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
rConta = bsPlanoReferencial.Current as TRegistro_PlanoReferencial;
this.DialogResult = DialogResult.OK;
}
}
public static string Gravar(TRegistro_PlanoReferencial val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_PlanoReferencial qtb_plano = new TCD_PlanoReferencial();
try
{
if (banco == null)
{
st_transacao = qtb_plano.CriarBanco_Dados(true);
}
else
{
qtb_plano.Banco_Dados = banco;
}
string retorno = qtb_plano.Gravar(val);
if (st_transacao)
{
qtb_plano.Banco_Dados.Commit_Tran();
}
return(retorno);
}
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();
}
}
}
