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 List <Model.LinhaDocVenda> QuantidadeProdutosVendidosPorCategoria_Vendedor(int vendedor)
{
StdBELista objList;
List <Model.LinhaDocVenda> lista = 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)
{
objList = PriEngine.Engine.Consulta("SELECT Familias.Descricao AS Categoria, sum(LinhasDoc.Quantidade) AS Quantidade FROM CabecDoc JOIN LinhasDoc ON CabecDoc.Id = LinhasDoc.IdCabecDoc JOIN Artigo ON LinhasDoc.Artigo = Artigo.Artigo Join Familias ON Familias.Familia = Artigo.Familia where CabecDoc.TipoDoc='FA' AND Vendedor = " + vendedor + "group by Familias.Descricao order by Familias.Descricao");
while (!objList.NoFim())
{
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
lindv.FamiliaNome = objList.Valor("Categoria");
lindv.Quantidade = objList.Valor("Quantidade");
lista.Add(lindv);
objList.Seguinte();
}
}
return(lista);
}
public static List <Model.LinhaDocVenda> Top5ProdutosMaisVendidosPorVendedor(int vendedor)
{
StdBELista objList;
List <Model.LinhaDocVenda> listaProdutos = 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)
{
objList = PriEngine.Engine.Consulta("SELECT TOP 5 LinhasDoc.Artigo AS Artigo, Artigo.Descricao AS Descricao, sum(LinhasDoc.Quantidade) AS Quantidade FROM CabecDoc INNER JOIN LinhasDoc ON CabecDoc.Id = LinhasDoc.IdCabecDoc INNER JOIN Artigo ON LinhasDoc.Artigo = Artigo.Artigo where LinhasDoc.Vendedor = " + vendedor + " AND CabecDoc.TipoDoc='FA' GROUP by LinhasDoc.Artigo, Artigo.Descricao order by Quantidade DESC");
while (!objList.NoFim())
{
Model.LinhaDocVenda lindv = new Model.LinhaDocVenda();
lindv.CodArtigo = objList.Valor("Artigo");
lindv.DescArtigo = objList.Valor("Descricao");
lindv.Quantidade = objList.Valor("Quantidade");
listaProdutos.Add(lindv);
objList.Seguinte();
}
}
return(listaProdutos);
}
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 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;
}
