public static string Excluir(TRegistro_Retirada val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_Retirada qtb_loc = new TCD_Retirada();
try
{
if (banco == null)
{
st_transacao = qtb_loc.CriarBanco_Dados(true);
}
else
{
qtb_loc.Banco_Dados = banco;
}
//Estornar lancamento caixa
Financeiro.Caixa.TCN_LanCaixa.EstornarSomenteCaixa(
Financeiro.Caixa.TCN_LanCaixa.Busca(val.Cd_contager,
val.Cd_lanctocaixastr,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
decimal.Zero,
string.Empty,
string.Empty,
string.Empty,
false,
string.Empty,
decimal.Zero,
false,
qtb_loc.Banco_Dados)[0], qtb_loc.Banco_Dados);
qtb_loc.Excluir(val);
if (st_transacao)
{
qtb_loc.Banco_Dados.Commit_Tran();
}
return("OK");
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_loc.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro excluir Retirada: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_loc.deletarBanco_Dados();
}
}
}
public static string ReceberFin(TRegistro_Retirada val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_Retirada qtb_locacao = new TCD_Retirada();
try
{
if (banco == null)
{
st_transacao = qtb_locacao.CriarBanco_Dados(true);
}
else
{
qtb_locacao.Banco_Dados = banco;
}
//Buscar Historico
object obj = new CamadaDados.Diversos.TCD_CfgEmpresa().BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + val.Cd_empresa.Trim() + "'"
}
}, "a.cd_historico");
if (obj == null ? true : string.IsNullOrEmpty(obj.ToString()))
{
throw new Exception("Configurar Histórico na CF.Empresa!");
}
val.Login = Utils.Parametros.pubLogin;
val.Dt_Retirada = CamadaDados.UtilData.Data_Servidor();
val.Id_retiradastr = CamadaDados.TDataQuery.getPubVariavel(qtb_locacao.Gravar(val), "@P_ID_RETIRADA");
if (st_transacao)
{
qtb_locacao.Banco_Dados.Commit_Tran();
}
return(val.Id_retiradastr);
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_locacao.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro gravar locacao: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_locacao.deletarBanco_Dados();
}
}
}
private void cbEmpresa_SelectedIndexChanged(object sender, EventArgs e)
{
if (cbEmpresa.SelectedItem != null)
{
//Buscar Ultima retirada
object obj = new TCD_Retirada().BuscarEscalar(
new TpBusca[]
{
new TpBusca {
vNM_Campo = "a.cd_empresa", vOperador = "=", vVL_Busca = "'" + (cbEmpresa.SelectedItem as CamadaDados.Diversos.TRegistro_CadEmpresa).Cd_empresa.Trim() + "'"
}
}, "a.dt_retirada", string.Empty, "a.dt_retirada desc", null);
try
{
dtUltimaRetirada.Text = DateTime.Parse(obj.ToString()).ToString("dd/MM/yyyy");
}catch { dtUltimaRetirada.Text = string.Empty; }
BuscarAbastecidas();
}
}
public static string Gravar(TRegistro_Retirada val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_Retirada qtb_locacao = new TCD_Retirada();
try
{
if (banco == null)
{
st_transacao = qtb_locacao.CriarBanco_Dados(true);
}
else
{
qtb_locacao.Banco_Dados = banco;
}
//Gravar Caixa
object obj = new CamadaDados.Diversos.TCD_CfgEmpresa(qtb_locacao.Banco_Dados).BuscarEscalar(
new TpBusca[] { new TpBusca {
vNM_Campo = "a.cd_empresa", vOperador = "=", vVL_Busca = "'" + val.Cd_empresa.Trim() + "'"
} }, "a.cd_historico");
if (obj == null)
{
throw new Exception("Obrigatório configurar historico <Parametros-Diversos-Configuração Parâmetros Empresa>.");
}
string ret = Financeiro.Caixa.TCN_LanCaixa.GravaLanCaixa(
new CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa
{
Cd_ContaGer = val.Cd_contager,
Cd_Empresa = val.Cd_empresa,
Nr_Docto = "RETIRADA",
Cd_Historico = obj.ToString(),
Login = Parametros.pubLogin,
ComplHistorico = val.Obs.Trim(),
Dt_lancto = val.Dt_Retirada,
Vl_PAGAR = decimal.Zero,
Vl_RECEBER = val.Vl_retirada,
St_Titulo = "N",
St_Estorno = "N",
St_avulso = "N"
}, qtb_locacao.Banco_Dados);
val.Cd_lanctocaixa = Convert.ToDecimal(CamadaDados.TDataQuery.getPubVariavel(ret, "@P_CD_LANCTOCAIXA"));
qtb_locacao.Gravar(val);
if (st_transacao)
{
qtb_locacao.Banco_Dados.Commit_Tran();
}
return("OK");
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_locacao.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro gravar Retirada: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_locacao.deletarBanco_Dados();
}
}
}
