public static List<Model.DocVenda> Encomendas_List(string typeDoc, string dateBegin, string dateEnd)
{
ErpBS objMotor = new ErpBS();
StdBELista objListCab;
StdBELista objListLin;
Model.DocVenda dv = new Model.DocVenda();
List<Model.DocVenda> listdv = new List<Model.DocVenda>();
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
List<Model.LinhaDocVenda> listlindv = new
List<Model.LinhaDocVenda>();
if (PriEngine.InitializeCompany(COMPANYNAME, USERNAME, PASSWORD) == true)
{
objListCab = PriEngine.Engine.Consulta("SELECT id, Entidade, Data, NumDoc, TotalMerc, Serie, ModoPag, CondPag From CabecDoc where TipoDoc LIKE '"+typeDoc+"' and Data>='"+dateBegin+"' and Data<='"+dateEnd+"'");
while (!objListCab.NoFim())
{
dv = new Model.DocVenda();
dv.id = objListCab.Valor("id");
dv.Entidade = objListCab.Valor("Entidade");
dv.NumDoc = objListCab.Valor("NumDoc");
dv.Data = objListCab.Valor("Data");
dv.TotalMerc = objListCab.Valor("TotalMerc");
dv.Serie = objListCab.Valor("Serie");
dv.ModoPag = objListCab.Valor("ModoPag");
dv.CondPag = objListCab.Valor("CondPag");
objListLin = PriEngine.Engine.Consulta("SELECT idCabecDoc, Artigo, Descricao, Quantidade, Unidade, PrecUnit, Desconto1, TotalILiquido, PrecoLiquido from LinhasDoc where IdCabecDoc='" + dv.id + "' order By NumLinha");
listlindv = new List<Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.IdCabecDoc = objListLin.Valor("idCabecDoc");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.Quantidade = objListLin.Valor("Quantidade");
lindv.Unidade = objListLin.Valor("Unidade");
lindv.Desconto = objListLin.Valor("Desconto1");
lindv.PrecoUnitario = objListLin.Valor("PrecUnit");
lindv.TotalILiquido = objListLin.Valor("TotalILiquido");
lindv.TotalLiquido = objListLin.Valor("PrecoLiquido");
listlindv.Add(lindv);
objListLin.Seguinte();
}
dv.LinhasDoc = listlindv;
listdv.Add(dv);
objListCab.Seguinte();
}
}
return listdv;
}
public static List<Model.DocVenda> Encomendas_List()
{
ErpBS objMotor = new ErpBS();
StdBELista objListCab;
StdBELista objListLin;
Model.DocVenda dv = new Model.DocVenda();
List<Model.DocVenda> listdv = new List<Model.DocVenda>();
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
List<Model.LinhaDocVenda> listlindv = new
List<Model.LinhaDocVenda>();
if (PriEngine.InitializeCompany(NomeEmpresa, UtilizadorEmpresa, PasswordEmpresa) == true)
{
objListCab = PriEngine.Engine.Consulta("SELECT id, Entidade, Data, NumDoc, TotalMerc, Serie From CabecDoc where TipoDoc='ECL'");
while (!objListCab.NoFim())
{
dv = new Model.DocVenda();
dv.id = objListCab.Valor("id");
dv.Entidade = objListCab.Valor("Entidade");
dv.NumDoc = objListCab.Valor("NumDoc");
dv.Data = objListCab.Valor("Data");
dv.TotalMerc = objListCab.Valor("TotalMerc");
dv.Serie = objListCab.Valor("Serie");
objListLin = PriEngine.Engine.Consulta("SELECT idCabecDoc, Artigo, Descricao, Quantidade, Unidade, PrecUnit, Desconto1, TotalILiquido, PrecoLiquido from LinhasDoc where IdCabecDoc='" + dv.id + "' order By NumLinha");
listlindv = new List<Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.IdCabecDoc = objListLin.Valor("idCabecDoc");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.Quantidade = objListLin.Valor("Quantidade");
lindv.Unidade = objListLin.Valor("Unidade");
lindv.Desconto = objListLin.Valor("Desconto1");
lindv.PrecoUnitario = objListLin.Valor("PrecUnit");
lindv.TotalILiquido = objListLin.Valor("TotalILiquido");
lindv.TotalLiquido = objListLin.Valor("PrecoLiquido");
listlindv.Add(lindv);
objListLin.Seguinte();
}
dv.LinhasDoc = listlindv;
listdv.Add(dv);
objListCab.Seguinte();
}
}
return listdv;
}
public static List <Model.DocVenda> Encomendas_List()
{
StdBELista objListCab;
StdBELista objListLin;
Model.DocVenda dv = new Model.DocVenda();
List <Model.DocVenda> listdv = new List <Model.DocVenda>();
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
List <Model.LinhaDocVenda> listlindv = new
List <Model.LinhaDocVenda>();
if (PriEngine.InitializeCompany(FirstREST.Properties.Settings.Default.Company.Trim(), FirstREST.Properties.Settings.Default.User.Trim(), FirstREST.Properties.Settings.Default.Password.Trim()) == true)
{
objListCab = PriEngine.Engine.Consulta("SELECT id, Entidade, Data, NumDoc, TotalMerc, Serie From CabecDoc where TipoDoc='ECL'");
while (!objListCab.NoFim())
{
dv = new Model.DocVenda();
dv.id = objListCab.Valor("id");
dv.Entidade = objListCab.Valor("Entidade");
dv.NumDoc = objListCab.Valor("NumDoc");
dv.Data = objListCab.Valor("Data");
dv.TotalMerc = objListCab.Valor("TotalMerc");
dv.Serie = objListCab.Valor("Serie");
objListLin = PriEngine.Engine.Consulta("SELECT idCabecDoc, Artigo, Descricao, Quantidade, Unidade, PrecUnit, Desconto1, TotalILiquido, PrecoLiquido from LinhasDoc where IdCabecDoc='" + dv.id + "' order By NumLinha");
listlindv = new List <Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.IdCabecDoc = objListLin.Valor("idCabecDoc");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.Quantidade = objListLin.Valor("Quantidade");
lindv.Unidade = objListLin.Valor("Unidade");
lindv.Desconto = objListLin.Valor("Desconto1");
lindv.PrecoUnitario = objListLin.Valor("PrecUnit");
lindv.TotalILiquido = objListLin.Valor("TotalILiquido");
lindv.TotalLiquido = objListLin.Valor("PrecoLiquido");
listlindv.Add(lindv);
objListLin.Seguinte();
}
dv.LinhasDoc = listlindv;
listdv.Add(dv);
objListCab.Seguinte();
}
}
return(listdv);
}
public static IEnumerable <Model.VendasDTO> EncomendasPorData()
{
StdBELista datas;
StdBELista orders;
List <Model.VendasDTO> listaDTOs = new List <Model.VendasDTO>();
if (PriEngine.InitializeCompany(FirstREST.Properties.Settings.Default.Company.Trim(), FirstREST.Properties.Settings.Default.User.Trim(), FirstREST.Properties.Settings.Default.Password.Trim()) == true)
{
datas = PriEngine.Engine.Consulta(@"select Data
from CabecDoc
where TipoDoc = 'ECL'
group by Data
order by Data desc ;");
while (!datas.NoFim())
{
Model.VendasDTO dto = new Model.VendasDTO();
dto.Data = datas.Valor("Data");
string output = dto.Data.Year.ToString() + "-" + dto.Data.Month.ToString() + "-" + dto.Data.Day.ToString();
orders = PriEngine.Engine.Consulta(@"select Nome, Data, TotalMerc
from CabecDoc
where TipoDoc = 'ECL' AND Data ='" + output + "';");
List <Model.DocVenda> docs = new List <Model.DocVenda>();
while (!orders.NoFim())
{
Model.DocVenda doc = new Model.DocVenda();
doc.TotalMerc = orders.Valor("TotalMerc");
doc.Entidade = orders.Valor("Nome");
docs.Add(doc);
orders.Seguinte();
}
dto.Vendas = docs;
listaDTOs.Add(dto);
datas.Seguinte();
}
return(listaDTOs);
}
return(null);
}
public static List<Model.DocVenda> GET_Pedidos(string idCliente)
{
StdBELista objList, objListLin, objDataLiq;
List<Model.DocVenda> listdv = new List<Model.DocVenda>();
List<Model.LinhaDocVenda> listlindv = new List<Model.LinhaDocVenda>();
Model.LinhaDocVenda lindv;
if (PriEngine.InitializeCompany(FirstREST.Properties.Settings.Default.Company.Trim(), FirstREST.Properties.Settings.Default.User.Trim(), FirstREST.Properties.Settings.Default.Password.Trim()) == true)
{
objList = PriEngine.Engine.Consulta("select Id,Data,TotalMerc, TotalIva, Estado from CabecDoc JOIN CabecDocStatus ON CabecDoc.Id = CabecDocStatus.IdCabecDoc where TipoDoc = 'FA' and Entidade = '" + idCliente + "' order By NumDoc DESC");
while (!objList.NoFim())
{
Model.DocVenda dv = new Model.DocVenda();
dv.id = objList.Valor("Id");
dv.Data = objList.Valor("Data");
dv.PrecoFinal = (double.Parse(objList.Valor("TotalMerc").ToString()) + double.Parse((objList.Valor("TotalIva").ToString())));
//dv.PrecoFinal = objList.Valor("TotalMerc") + "€ + IVA";
if (objList.Valor("Estado") == "T")
{
dv.estado = "Pronto";
}
else if (objList.Valor("Estado") == "P")
{
dv.estado = "Pendente";
}
else dv.estado = "Anulado";
objListLin = PriEngine.Engine.Consulta("SELECT Artigo,Descricao,Quantidade from LinhasDoc where IdCabecDoc='" + dv.id + "'");
listlindv = new List<Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.Quantidade = objListLin.Valor("Quantidade");
listlindv.Add(lindv);
objListLin.Seguinte();
}
objDataLiq = PriEngine.Engine.Consulta("SELECT DataLiq from Historico where idDoc='" + dv.id + "'");
try {
dv.DataLiq = objDataLiq.Valor("DataLiq").ToString();
if (dv.DataLiq != "")
dv.DataLiq = "Pago";
else
dv.DataLiq = "Por Pagar";
}
catch (Exception e)
{
dv.DataLiq = "Por Pagar";
}
dv.LinhasDoc = listlindv;
listdv.Add(dv);
objList.Seguinte();
}
}
return listdv;
}
public static List<Model.DocVenda> Encomenda_GetByCliente(string cliente)
{
ErpBS objMotor = new ErpBS();
StdBELista objListCab;
StdBELista objListLin;
Model.DocVenda dv = new Model.DocVenda();
List<Model.DocVenda> listdv = new List<Model.DocVenda>();
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
List<Model.LinhaDocVenda> listlindv = new
List<Model.LinhaDocVenda>();
if (PriEngine.InitializeCompany(FirstREST.Properties.Settings.Default.Company.Trim(), FirstREST.Properties.Settings.Default.User.Trim(), FirstREST.Properties.Settings.Default.Password.Trim()) == true)
{
objListCab = PriEngine.Engine.Consulta("SELECT id, Entidade, Data, NumDoc, TotalMerc, TotalIva, TotalDesc, Serie From CabecDoc where TipoDoc='FA' AND Entidade='" + cliente + "'");
while (!objListCab.NoFim())
{
dv = new Model.DocVenda();
dv.id = objListCab.Valor("id");
dv.Entidade = objListCab.Valor("Entidade");
dv.NumDoc = objListCab.Valor("NumDoc");
dv.Data = objListCab.Valor("Data");
dv.Serie = objListCab.Valor("Serie");
double preço = 0;
objListLin = PriEngine.Engine.Consulta("SELECT idCabecDoc, Artigo, Descricao, Quantidade, Unidade, PrecUnit, Desconto1, TotalILiquido, PrecoLiquido from LinhasDoc where IdCabecDoc='" + dv.id + "' order By NumLinha");
listlindv = new List<Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.IdCabecDoc = objListLin.Valor("idCabecDoc");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.Quantidade = objListLin.Valor("Quantidade");
lindv.Unidade = objListLin.Valor("Unidade");
lindv.Desconto = objListLin.Valor("Desconto1");
lindv.PrecoUnitario = objListLin.Valor("PrecUnit");
lindv.TotalILiquido = objListLin.Valor("TotalILiquido");
lindv.TotalLiquido = objListLin.Valor("PrecoLiquido");
preço += lindv.TotalILiquido - lindv.Desconto;
listlindv.Add(lindv);
objListLin.Seguinte();
}
dv.PrecoFinal = preço;
dv.LinhasDoc = listlindv;
listdv.Add(dv);
objListCab.Seguinte();
}
}
return listdv;
}
public static Model.DocVenda Encomenda_Get(string numdoc)
{
StdBELista objListCab;
StdBELista objListLin;
Model.DocVenda dv = new Model.DocVenda();
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
List<Model.LinhaDocVenda> listlindv = new List<Model.LinhaDocVenda>();
if (PriEngine.InitializeCompany(FirstREST.Properties.Settings.Default.Company.Trim(), FirstREST.Properties.Settings.Default.User.Trim(), FirstREST.Properties.Settings.Default.Password.Trim()) == true)
{
string st = "SELECT id, Entidade, Data, NumDoc, TotalMerc, Serie From CabecDoc where TipoDoc='ECL' and NumDoc='" + numdoc + "'";
objListCab = PriEngine.Engine.Consulta(st);
dv = new Model.DocVenda();
dv.id = objListCab.Valor("id");
dv.Entidade = objListCab.Valor("Entidade");
dv.NumDoc = objListCab.Valor("NumDoc");
dv.Data = objListCab.Valor("Data");
dv.TotalMerc = objListCab.Valor("TotalMerc");
dv.Serie = objListCab.Valor("Serie");
objListLin = PriEngine.Engine.Consulta("SELECT idCabecDoc, Artigo, Descricao, Quantidade, Unidade, PrecUnit, Desconto1, TotalILiquido, PrecoLiquido from LinhasDoc where IdCabecDoc='" + dv.id + "' order By NumLinha");
listlindv = new List<Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.IdCabecDoc = objListLin.Valor("idCabecDoc");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.Quantidade = objListLin.Valor("Quantidade");
lindv.Unidade = objListLin.Valor("Unidade");
lindv.Desconto = objListLin.Valor("Desconto1");
lindv.PrecoUnitario = objListLin.Valor("PrecUnit");
lindv.TotalILiquido = objListLin.Valor("TotalILiquido");
lindv.TotalLiquido = objListLin.Valor("PrecoLiquido");
listlindv.Add(lindv);
objListLin.Seguinte();
}
dv.LinhasDoc = listlindv;
return dv;
}
return null;
}
public static Model.DocVenda Encomenda_Get(string numdoc)
{
ErpBS objMotor = new ErpBS();
MotorPrimavera mp = new MotorPrimavera();
StdBELista objListCab;
StdBELista objListLin;
Model.DocVenda dv = new Model.DocVenda();
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
List<Model.LinhaDocVenda> listlindv = new List<Model.LinhaDocVenda>();
if (PriEngine.InitializeCompany("BELAFLOR", "sa", "1234567") == true)
{
//objMotor = mp.AbreEmpresa("BELAFLOR", "sa", "123456", "Default");
string st = "SELECT id, Entidade, Data, NumDoc, TotalMerc, Serie From CabecDoc where TipoDoc='ECL' and NumDoc='" + numdoc + "'";
objListCab = PriEngine.Engine.Consulta(st);
dv = new Model.DocVenda();
dv.id = objListCab.Valor("id");
dv.Entidade = objListCab.Valor("Entidade");
dv.NumDoc = objListCab.Valor("NumDoc");
dv.Data = objListCab.Valor("Data");
dv.TotalMerc = objListCab.Valor("TotalMerc");
dv.Serie = objListCab.Valor("Serie");
objListLin = PriEngine.Engine.Consulta("SELECT idCabecDoc, Artigo, Descricao, Quantidade, Unidade, PrecUnit, Desconto1, TotalILiquido, PrecoLiquido from LinhasDoc where IdCabecDoc='" + dv.id + "' order By NumLinha");
listlindv = new List<Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.IdCabecDoc = objListLin.Valor("idCabecDoc");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.Quantidade = objListLin.Valor("Quantidade");
lindv.Unidade = objListLin.Valor("Unidade");
lindv.Desconto = objListLin.Valor("Desconto1");
lindv.PrecoUnitario = objListLin.Valor("PrecUnit");
lindv.TotalILiquido = objListLin.Valor("TotalILiquido");
lindv.TotalLiquido = objListLin.Valor("PrecoLiquido");
listlindv.Add(lindv);
objListLin.Seguinte();
}
dv.LinhasDoc = listlindv;
return dv;
}
return null;
}
public static Model.RespostaErro Encomendas_New(Model.DocVenda dv)
{
Lib_Primavera.Model.RespostaErro erro = new Model.RespostaErro();
GcpBEDocumentoVenda myEnc = new GcpBEDocumentoVenda();
GcpBELinhaDocumentoVenda myLin = new GcpBELinhaDocumentoVenda();
GcpBELinhasDocumentoVenda myLinhas = new GcpBELinhasDocumentoVenda();
//PreencheRelacaoVendas rl = new PreencheRelacaoVendas();
List <Model.LinhaDocVenda> lstlindv = new List <Model.LinhaDocVenda>();
try
{
if (PriEngine.InitializeCompany(FirstREST.Properties.Settings.Default.Company.Trim(), FirstREST.Properties.Settings.Default.User.Trim(), FirstREST.Properties.Settings.Default.Password.Trim()) == true)
{
// Linhas do documento para a lista de linhas
lstlindv = dv.LinhasDoc;
if (lstlindv == null || lstlindv.Count == 0)
{
erro.Erro = 1;
erro.Descricao = "Cannot make an order from an empty proposal.";
return(erro);
}
//A designação fiscal não se encontra atribuída
// Atribui valores ao cabecalho do doc
//myEnc.set_DataDoc(dv.Data);
myEnc.set_Entidade(dv.Entidade);
myEnc.set_Serie("A");
myEnc.set_Tipodoc("ECL");
myEnc.set_TipoEntidade("C");
//PriEngine.Engine.Comercial.Vendas.PreencheDadosRelacionados(myEnc, rl);
PriEngine.Engine.Comercial.Vendas.PreencheDadosRelacionados(myEnc);
foreach (Model.LinhaDocVenda lin in lstlindv)
{
PriEngine.Engine.Comercial.Vendas.AdicionaLinha(myEnc, lin.CodArtigo, lin.Quantidade, "", "", lin.PrecoUnitario, lin.Desconto);
}
// PriEngine.Engine.Comercial.Compras.TransformaDocumento(
PriEngine.Engine.IniciaTransaccao();
//PriEngine.Engine.Comercial.Vendas.Edita Actualiza(myEnc, "Teste");
PriEngine.Engine.Comercial.Vendas.Actualiza(myEnc);
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 List<Model.DocVenda> Encomendas_List()
{
StdBELista objListCab;
StdBELista objListLin;
Model.DocVenda dv = new Model.DocVenda();
List<Model.DocVenda> listdv = new List<Model.DocVenda>();
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
List<Model.LinhaDocVenda> listlindv = new
List<Model.LinhaDocVenda>();
if (PriEngine.InitializeCompany(FirstREST.Properties.Settings.Default.Company.Trim(), FirstREST.Properties.Settings.Default.User.Trim(), FirstREST.Properties.Settings.Default.Password.Trim()) == true)
{
objListCab = PriEngine.Engine.Consulta("SELECT id, Entidade, Data, NumDoc, TotalMerc, Serie From CabecDoc where TipoDoc='FA'");
while (!objListCab.NoFim())
{
dv = new Model.DocVenda();
dv.Aprovados = 0;
dv.Pendentes = 0;
dv.id = objListCab.Valor("id");
dv.Entidade = objListCab.Valor("Entidade");
dv.NumDoc = objListCab.Valor("NumDoc");
dv.Data = objListCab.Valor("Data");
dv.TotalMerc = objListCab.Valor("TotalMerc");
dv.Serie = objListCab.Valor("Serie");
objListLin = PriEngine.Engine.Consulta("SELECT idCabecDoc, Artigo, Descricao, Quantidade, Unidade, PrecUnit, Desconto1, TotalILiquido, PrecoLiquido, CDU_Status from LinhasDoc where IdCabecDoc='" + dv.id + "' order By NumLinha");
listlindv = new List<Model.LinhaDocVenda>();
while (!objListLin.NoFim())
{
lindv = new Model.LinhaDocVenda();
lindv.IdCabecDoc = objListLin.Valor("idCabecDoc");
lindv.CodArtigo = objListLin.Valor("Artigo");
lindv.DescArtigo = objListLin.Valor("Descricao");
lindv.Quantidade = objListLin.Valor("Quantidade");
lindv.Unidade = objListLin.Valor("Unidade");
lindv.Desconto = objListLin.Valor("Desconto1");
lindv.PrecoUnitario = objListLin.Valor("PrecUnit");
lindv.TotalILiquido = objListLin.Valor("TotalILiquido");
lindv.TotalLiquido = objListLin.Valor("PrecoLiquido");
lindv.Status = objListLin.Valor("CDU_Status");
if (lindv.Status == "0")
dv.Aprovados++;
else
dv.Pendentes++;
StdBELista objArtList;
objArtList = PriEngine.Engine.Consulta("SELECT CDU_Cor, CDU_Tamanho FROM Artigo WHERE Artigo=" + objListLin.Valor("Artigo"));
lindv.Cor = objArtList.Valor("CDU_Cor"); ;
lindv.Tamanho = objArtList.Valor("CDU_Tamanho");
StdBELista objArmazLista;
objArmazLista = PriEngine.Engine.Consulta("SELECT Fila, Slot, Nivel FROM ArtigoArmazem WHERE Artigo=" + objListLin.Valor("Artigo"));
lindv.Fila = objArmazLista.Valor("Fila");
lindv.Slot = objArmazLista.Valor("Slot");
lindv.Nivel = objArmazLista.Valor("Nivel");
listlindv.Add(lindv);
objListLin.Seguinte();
}
dv.LinhasDoc = listlindv;
listdv.Add(dv);
objListCab.Seguinte();
}
}
return listdv;
}
