public static string DeletarRequisicao_X_Negociacao(TRegistro_Requisicao_X_Negociacao val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_Requisicao_X_Negociacao qtb_neg = new TCD_Requisicao_X_Negociacao();
try
{
if (banco == null)
{
st_transacao = qtb_neg.CriarBanco_Dados(true);
}
else
{
qtb_neg.Banco_Dados = banco;
}
qtb_neg.DeletarRequisicao_X_Negociacao(val);
if (st_transacao)
{
qtb_neg.Banco_Dados.Commit_Tran();
}
return("OK");
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_neg.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro excluir registro: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_neg.deletarBanco_Dados();
}
}
}
public static void ProcessarOrdemCompra(List <TRegistro_Requisicao> val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_Requisicao qtb_requisicao = new TCD_Requisicao();
try
{
if (banco == null)
{
st_transacao = qtb_requisicao.CriarBanco_Dados(true);
}
else
{
qtb_requisicao.Banco_Dados = banco;
}
//Verificar se existe usuario de compra para o login corrente
CamadaDados.Compra.TList_CadUsuarioCompra lUser =
TCN_CadUsuarioCompra.Busca(string.Empty,
Utils.Parametros.pubLogin,
false,
false,
false,
true,
1,
string.Empty,
qtb_requisicao.Banco_Dados);
if (lUser.Count < 1)
{
throw new Exception("Não existe usuario de compra configurado para o login " + Utils.Parametros.pubLogin.Trim());
}
val.ForEach(p =>
{
//Para cada requisicao criar um objeto ordem compra
TRegistro_OrdemCompra rOc = new TRegistro_OrdemCompra();
rOc.Id_oc = null;
rOc.Id_requisicao = p.Id_requisicao;
if (p.lCotacoes.Count > 0)
{
TRegistro_Cotacao rCot = p.lCotacoes.Find(v => v.St_registro.Trim().ToUpper().Equals("P"));
if (rCot != null)
{
rOc.Cd_empresa = rCot.Cd_empresa;
rOc.Cd_fornecedor = rCot.Cd_fornecedor;
rOc.Cd_endfornecedor = rCot.Cd_endfornecedor;
rOc.Cd_condpgto = rCot.Cd_condpgto;
rOc.Cd_moeda = rCot.Cd_moeda;
rOc.Cd_portador = rCot.Cd_portador;
rOc.Cd_transportadora = rCot.Cd_transportadora;
rOc.Cd_endtransportadora = rCot.Cd_endtransportadora;
rOc.Tp_frete = rCot.Tp_frete;
rOc.Vl_frete = rCot.Vl_frete;
rOc.Prazo_entrega = rCot.Prazo_entrega;
rOc.Quantidade = p.Qtd_aprovada;
rOc.Vl_unitario = rCot.Vl_unitario_cotado;
rOc.Dt_oc = DateTime.Now;
rOc.St_registro = "A";
}
}
else if (p.lReqneg.Count > 0)
{
TRegistro_Requisicao_X_Negociacao rReqNeg = p.lReqneg.Find(v => v.St_registro.Trim().ToUpper().Equals("A"));
if (rReqNeg != null)
{
rOc.Cd_empresa = rReqNeg.Cd_empresa;
rOc.Cd_fornecedor = rReqNeg.Cd_fornecedor;
rOc.Cd_endfornecedor = rReqNeg.Cd_endfornecedor;
rOc.Cd_condpgto = rReqNeg.Cd_condpgto;
rOc.Cd_moeda = rReqNeg.Cd_moeda;
rOc.Cd_portador = rReqNeg.Cd_portador;
TRegistro_PrazoEntrega rEntrega = rReqNeg.lPrazoEntrega.Find(x => x.Cd_empresa.Trim().Equals(p.Cd_empresa.Trim()));
if (rEntrega != null)
{
rOc.Cd_transportadora = rEntrega.Cd_transportadora;
rOc.Cd_endtransportadora = rEntrega.Cd_endtransportadora;
rOc.Tp_frete = rEntrega.Tp_frete;
rOc.Prazo_entrega = rEntrega.Prazo_entrega;
}
rOc.Quantidade = p.Qtd_aprovada;
rOc.Vl_unitario = rReqNeg.Vl_unitario_negociado;
rOc.Dt_oc = DateTime.Now;
rOc.St_registro = "A";
}
}
TCN_OrdemCompra.Gravar(rOc, qtb_requisicao.Banco_Dados);
//Alterar status da requisicao para ordem compra
p.St_requisicao = "OC";
p.Cd_clifor_comprador = lUser[0].Cd_clifor_cmp;
AlterarRequisicao(p, qtb_requisicao.Banco_Dados);
});
if (st_transacao)
{
qtb_requisicao.Banco_Dados.Commit_Tran();
}
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_requisicao.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro processar ordem compra: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_requisicao.deletarBanco_Dados();
}
}
}
