public static Lib_Primavera.Model.RespostaErro DelCliente(string codCliente)
{
Lib_Primavera.Model.RespostaErro erro = new Model.RespostaErro();
GcpBECliente objCli = new GcpBECliente();
try
{
if (PriEngine.InitializeCompany(project.Properties.Settings.Default.Company.Trim(), project.Properties.Settings.Default.User.Trim(), project.Properties.Settings.Default.Password.Trim()) == true)
{
if (PriEngine.Engine.Comercial.Clientes.Existe(codCliente) == false)
{
erro.Erro = 1;
erro.Descricao = "O cliente não existe";
return erro;
}
else
{
PriEngine.Engine.Comercial.Clientes.Remove(codCliente);
erro.Erro = 0;
erro.Descricao = "Sucesso";
return erro;
}
}
else
{
erro.Erro = 1;
erro.Descricao = "Erro ao abrir a empresa";
return erro;
}
}
catch (Exception ex)
{
erro.Erro = 1;
erro.Descricao = ex.Message;
return erro;
}
}
public static Lib_Primavera.Model.RespostaErro UpdCliente(Lib_Primavera.Model.Cliente cliente)
{
Lib_Primavera.Model.RespostaErro erro = new Model.RespostaErro();
GcpBECliente objCli = new GcpBECliente();
try
{
if (PriEngine.InitializeCompany(project.Properties.Settings.Default.Company.Trim(), project.Properties.Settings.Default.User.Trim(), project.Properties.Settings.Default.Password.Trim()) == true)
{
if (PriEngine.Engine.Comercial.Clientes.Existe(cliente.CodCliente) == false)
{
erro.Erro = 1;
erro.Descricao = "O cliente não existe";
return erro;
}
else
{
objCli = PriEngine.Engine.Comercial.Clientes.Edita(cliente.CodCliente);
objCli.set_EmModoEdicao(true);
objCli.set_Nome(cliente.NomeCliente);
objCli.set_NumContribuinte(cliente.NumContribuinte);
objCli.set_Moeda(cliente.Moeda);
objCli.set_Morada(cliente.Morada);
PriEngine.Engine.Comercial.Clientes.Actualiza(objCli);
erro.Erro = 0;
erro.Descricao = "Sucesso";
return erro;
}
}
else
{
erro.Erro = 1;
erro.Descricao = "Erro ao abrir a empresa";
return erro;
}
}
catch (Exception ex)
{
erro.Erro = 1;
erro.Descricao = ex.Message;
return erro;
}
}
public static Model.RespostaErro VGR_New(Model.DocCompra dc)
{
Lib_Primavera.Model.RespostaErro erro = new Model.RespostaErro();
GcpBEDocumentoCompra myGR = new GcpBEDocumentoCompra();
GcpBELinhaDocumentoCompra myLin = new GcpBELinhaDocumentoCompra();
GcpBELinhasDocumentoCompra myLinhas = new GcpBELinhasDocumentoCompra();
PreencheRelacaoCompras rl = new PreencheRelacaoCompras();
List<Model.LinhaDocCompra> lstlindv = new List<Model.LinhaDocCompra>();
try
{
if (PriEngine.InitializeCompany(project.Properties.Settings.Default.Company.Trim(), project.Properties.Settings.Default.User.Trim(), project.Properties.Settings.Default.Password.Trim()) == true)
{
// Atribui valores ao cabecalho do doc
//myEnc.set_DataDoc(dv.Data);
myGR.set_Entidade(dc.Entidade);
myGR.set_NumDocExterno(dc.NumDocExterno);
myGR.set_Serie(dc.Serie);
myGR.set_Tipodoc("VGR");
myGR.set_TipoEntidade("F");
// Linhas do documento para a lista de linhas
lstlindv = dc.LinhasCompras;
PriEngine.Engine.Comercial.Compras.PreencheDadosRelacionados(myGR, rl);
foreach (Model.LinhaDocCompra lin in lstlindv)
{
PriEngine.Engine.Comercial.Compras.AdicionaLinha(myGR, lin.Artigo, lin.Quantidade, lin.Armazem, "", lin.PrecoUnitario, lin.Desconto);
}
PriEngine.Engine.IniciaTransaccao();
PriEngine.Engine.Comercial.Compras.Actualiza(myGR, "Teste");
PriEngine.Engine.TerminaTransaccao();
erro.Erro = 0;
erro.Descricao = "Sucesso";
return erro;
}
else
{
erro.Erro = 1;
erro.Descricao = "Erro ao abrir empresa";
return erro;
}
}
catch (Exception ex)
{
PriEngine.Engine.DesfazTransaccao();
erro.Erro = 1;
erro.Descricao = ex.Message;
return erro;
}
}
public static Lib_Primavera.Model.RespostaErro InsereClienteObj(Model.Cliente cli)
{
Lib_Primavera.Model.RespostaErro erro = new Model.RespostaErro();
GcpBECliente myCli = new GcpBECliente();
try
{
if (PriEngine.InitializeCompany(project.Properties.Settings.Default.Company.Trim(), project.Properties.Settings.Default.User.Trim(), project.Properties.Settings.Default.Password.Trim()) == true)
{
myCli.set_Cliente(cli.CodCliente);
myCli.set_Nome(cli.NomeCliente);
myCli.set_NumContribuinte(cli.NumContribuinte);
myCli.set_Moeda(cli.Moeda);
myCli.set_Morada(cli.Morada);
PriEngine.Engine.Comercial.Clientes.Actualiza(myCli);
erro.Erro = 0;
erro.Descricao = "Sucesso";
return erro;
}
else
{
erro.Erro = 1;
erro.Descricao = "Erro ao abrir empresa";
return erro;
}
}
catch (Exception ex)
{
erro.Erro = 1;
erro.Descricao = ex.Message;
return erro;
}
}
