public static string Excluir(TRegistro_ExecDespesas val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_ExecDespesas qtb_orc = new TCD_ExecDespesas();
try
{
if (banco == null)
{
st_transacao = qtb_orc.CriarBanco_Dados(true);
}
else
{
qtb_orc.Banco_Dados = banco;
}
qtb_orc.Excluir(val);
if (st_transacao)
{
qtb_orc.Banco_Dados.Commit_Tran();
}
return("OK");
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_orc.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro excluir orçamento: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_orc.deletarBanco_Dados();
}
}
}
public static string Gravar(TRegistro_ExecDespesas val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_ExecDespesas qtb_orc = new TCD_ExecDespesas();
try
{
if (banco == null)
{
st_transacao = qtb_orc.CriarBanco_Dados(true);
}
else
{
qtb_orc.Banco_Dados = banco;
}
string retorno = CamadaNegocio.Financeiro.Duplicata.TCN_LanDuplicata.GravarDuplicata(val.rDuplicata, false, qtb_orc.Banco_Dados);
val.nr_lancto = decimal.Parse(CamadaDados.TDataQuery.getPubVariavel(retorno, "@P_NR_LANCTO"));
string ret = qtb_orc.Gravar(val);
val.id_execucao = Convert.ToDecimal(CamadaDados.TDataQuery.getPubVariavel(ret, "@P_ID_EXECUCAO"));
if (val.lCCusto != null)
{
val.lCCusto.ForEach(p =>
{
p.Nr_lancto = val.nr_lancto;
p.Cd_empresa = val.Cd_empresa;
p.Cd_clifor = val.Tp_pagamento.Trim().ToUpper().Equals("E") ? val.Cd_fornecedor : val.Cd_funcionario;
p.Nr_docto = val.rDuplicata.Nr_docto;
CamadaNegocio.Financeiro.CCustoLan.TCN_LanCCustoLancto.Gravar(p, qtb_orc.Banco_Dados);
TCN_DespViagem_X_CCusto.Gravar(new TRegistro_DespViagem_X_CCusto()
{
cd_empresa = val.Cd_empresa,
Id_despesa = val.Id_RegDesp,
Id_execucao = val.id_execucao,
Id_orcamento = val.Id_orcamento,
Nr_versao = val.Nr_versao,
nr_lancto = val.nr_lancto,
Id_CCustoLan = p.Id_ccustolan
}, qtb_orc.Banco_Dados);
});
}
// val.Nr_versaostr = CamadaDados.TDataQuery.getPubVariavel(ret, "@P_NR_VERSAO");
if (st_transacao)
{
qtb_orc.Banco_Dados.Commit_Tran();
}
return(val.id_execucao.ToString());
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_orc.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro gravar Despesa: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_orc.deletarBanco_Dados();
}
}
}