public static List<Model.DocCompra> VGR_List()
{
string query = "SELECT PRISINF.dbo.CabecCompras.TipoDoc, PRISINF.dbo.CabecCompras.id, PRISINF.dbo.CabecCompras.CondPag, PRISINF.dbo.CabecCompras.DataVencimento, PRISINF.dbo.CabecCompras.NumDoc, PRISINF.dbo.CabecCompras.Entidade, PRISINF.dbo.CabecCompras.DataDoc,PRISINF.dbo.CabecCompras.NumDocExterno, PRISINF.dbo.CabecCompras.TotalMerc,PRISINF.dbo.CabecCompras.Serie, PRISINF.dbo.LinhasCompras.NumLinha, PRISINF.dbo.LinhasCompras.Artigo, PRISINF.dbo.LinhasCompras.Quantidade, PRISINF.dbo.LinhasCompras.Desconto1, PRISINF.dbo.LinhasCompras.PrecUnit, PRISINF.dbo.LinhasCompras.Armazem, PRISINF.dbo.LinhasComprasStatus.EstadoTrans, PRISINF.dbo.LinhasComprasStatus.QuantTrans FROM PRISINF.dbo.CabecCompras INNER JOIN PRISINF.dbo.LinhasCompras ON PRISINF.dbo.CabecCompras.Id = PRISINF.dbo.LinhasCompras.IdCabecCompras INNER JOIN PRISINF.dbo.LinhasComprasStatus ON PRISINF.dbo.LinhasCompras.Id = PRISINF.dbo.LinhasComprasStatus.IdLinhasCompras WHERE (PRISINF.dbo.CabecCompras.TipoDoc = N'ECF' AND PRISINF.dbo.LinhasComprasStatus.EstadoTrans = 'P') ORDER BY PRISINF.dbo.CabecCompras.NumDoc";
ErpBS objMotor = new ErpBS();
StdBELista objList;
List<Model.DocCompra> listDocCompra = new List<Model.DocCompra>();
Model.DocCompra docCompra;
List<Model.LinhaDocCompra> listLinhasCompras;
Model.LinhaDocCompra linhaDocCompra;
Model.LinhaDocCompraStatus statusLinhaCompra;
if (PriEngine.InitializeCompany(NomeEmpresa, UtilizadorEmpresa, PasswordEmpresa) == true)
{
objList = PriEngine.Engine.Consulta(query);
if (!objList.NoFim()) //tem pelo menos 1 elemento
{
docCompra = new Model.DocCompra();
docCompra.TipoDoc = objList.Valor("TipoDoc");
docCompra.id = objList.Valor("id");
docCompra.Entidade = objList.Valor("Entidade");
docCompra.NumDoc = objList.Valor("NumDoc");
docCompra.DataEmissao = objList.Valor("DataDoc");
docCompra.DataVencimento = objList.Valor("DataVencimento");
docCompra.NumDocExterno = objList.Valor("NumDocExterno");
docCompra.TotalMerc = objList.Valor("TotalMerc");
docCompra.CondPag = objList.Valor("CondPag");
docCompra.Serie = objList.Valor("Serie");
listLinhasCompras = new List<Model.LinhaDocCompra>();
//sacar linhaDoc associado + status
linhaDocCompra = new Model.LinhaDocCompra();
linhaDocCompra.NumLinha = objList.Valor("NumLinha");
linhaDocCompra.CodArtigo = objList.Valor("Artigo");
linhaDocCompra.Quantidade = objList.Valor("Quantidade");
linhaDocCompra.Armazem = objList.Valor("Armazem");
statusLinhaCompra = new Model.LinhaDocCompraStatus();
statusLinhaCompra.EstadoTrans = objList.Valor("EstadoTrans");
statusLinhaCompra.QuantTrans = objList.Valor("QuantTrans");
linhaDocCompra.Status = statusLinhaCompra;
listLinhasCompras.Add(linhaDocCompra);
objList.Seguinte();
while (!objList.NoFim()) //restantes elementos
{
if (docCompra.id != objList.Valor("id"))
{
docCompra.LinhasDoc = listLinhasCompras;
listDocCompra.Add(docCompra);
docCompra = new Model.DocCompra();
docCompra.TipoDoc = objList.Valor("TipoDoc");
docCompra.id = objList.Valor("id");
docCompra.Entidade = objList.Valor("Entidade");
docCompra.NumDoc = objList.Valor("NumDoc");
docCompra.DataEmissao = objList.Valor("DataDoc");
listLinhasCompras = new List<Model.LinhaDocCompra>();
}
//sacar linhas e status
linhaDocCompra = new Model.LinhaDocCompra();
linhaDocCompra.NumLinha = objList.Valor("NumLinha");
linhaDocCompra.CodArtigo = objList.Valor("Artigo");
linhaDocCompra.Quantidade = objList.Valor("Quantidade");
linhaDocCompra.Armazem = objList.Valor("Armazem");
statusLinhaCompra = new Model.LinhaDocCompraStatus();
statusLinhaCompra.EstadoTrans = objList.Valor("EstadoTrans");
statusLinhaCompra.QuantTrans = objList.Valor("QuantTrans");
linhaDocCompra.Status = statusLinhaCompra;
listLinhasCompras.Add(linhaDocCompra);
objList.Seguinte();
}
docCompra.LinhasDoc = listLinhasCompras;
listDocCompra.Add(docCompra);
}
}
return listDocCompra;
}
public static Model.DocCompra getEncomenda(string codBarValue)
{
string[] substrings = Regex.Split(codBarValue, "ECF-");
string query = "SELECT PRISINF.dbo.CabecCompras.TipoDoc, PRISINF.dbo.CabecCompras.DataVencimento, PRISINF.dbo.CabecCompras.CondPag, PRISINF.dbo.CabecCompras.id, PRISINF.dbo.CabecCompras.NumDoc, PRISINF.dbo.CabecCompras.Entidade, PRISINF.dbo.CabecCompras.DataDoc,PRISINF.dbo.CabecCompras.NumDocExterno, PRISINF.dbo.CabecCompras.TotalMerc,PRISINF.dbo.CabecCompras.Serie, PRISINF.dbo.LinhasCompras.NumLinha, PRISINF.dbo.LinhasCompras.Artigo, PRISINF.dbo.LinhasCompras.Quantidade, PRISINF.dbo.LinhasCompras.Desconto1, PRISINF.dbo.LinhasCompras.PrecUnit, PRISINF.dbo.LinhasCompras.Armazem, PRISINF.dbo.LinhasComprasStatus.EstadoTrans, PRISINF.dbo.LinhasComprasStatus.QuantTrans FROM PRISINF.dbo.CabecCompras INNER JOIN PRISINF.dbo.LinhasCompras ON PRISINF.dbo.CabecCompras.Id = PRISINF.dbo.LinhasCompras.IdCabecCompras INNER JOIN PRISINF.dbo.LinhasComprasStatus ON PRISINF.dbo.LinhasCompras.Id = PRISINF.dbo.LinhasComprasStatus.IdLinhasCompras WHERE (PRISINF.dbo.CabecCompras.TipoDoc = N'ECF' AND PRISINF.dbo.LinhasComprasStatus.EstadoTrans = 'P' AND dbo.CabecCompras.NumDoc like '" + substrings[substrings.Length - 1] + "') ORDER BY PRISINF.dbo.CabecCompras.NumDoc";
ErpBS objMotor = new ErpBS();
StdBELista objList;
Model.DocCompra result = new Model.DocCompra();
Model.LinhaDocCompra linhaDocCompra;
Model.LinhaDocCompraStatus statusLinhaCompra;
if (PriEngine.InitializeCompany(NomeEmpresa, UtilizadorEmpresa, PasswordEmpresa) == true)
{
objList = PriEngine.Engine.Consulta(query);
if (!objList.NoFim()) //tem pelo menos 1 elemento
{
result.TipoDoc = objList.Valor("TipoDoc");
result.id = objList.Valor("id");
result.Entidade = objList.Valor("Entidade");
result.NumDoc = objList.Valor("NumDoc");
result.DataEmissao = objList.Valor("DataDoc");
result.DataVencimento = objList.Valor("DataVencimento");
result.NumDocExterno = objList.Valor("NumDocExterno");
result.CondPag = objList.Valor("CondPag");
result.TotalMerc = objList.Valor("TotalMerc");
result.Serie = objList.Valor("Serie");
result.LinhasDoc = new List<Model.LinhaDocCompra>();
linhaDocCompra = new Model.LinhaDocCompra();
linhaDocCompra.NumLinha = objList.Valor("NumLinha");
linhaDocCompra.CodArtigo = objList.Valor("Artigo");
linhaDocCompra.Quantidade = objList.Valor("Quantidade");
linhaDocCompra.Armazem = objList.Valor("Armazem");
linhaDocCompra.Desconto = objList.Valor("Desconto1");
linhaDocCompra.PrecoUnitario = objList.Valor("PrecUnit");
statusLinhaCompra = new Model.LinhaDocCompraStatus();
statusLinhaCompra.EstadoTrans = objList.Valor("EstadoTrans");
statusLinhaCompra.QuantTrans = objList.Valor("QuantTrans");
linhaDocCompra.Status = statusLinhaCompra;
result.LinhasDoc.Add(linhaDocCompra);
objList.Seguinte();
while (!objList.NoFim()) //restantes elementos
{
linhaDocCompra = new Model.LinhaDocCompra();
linhaDocCompra.NumLinha = objList.Valor("NumLinha");
linhaDocCompra.CodArtigo = objList.Valor("Artigo");
linhaDocCompra.Quantidade = objList.Valor("Quantidade");
linhaDocCompra.Armazem = objList.Valor("Armazem");
linhaDocCompra.Desconto = objList.Valor("Desconto1");
linhaDocCompra.PrecoUnitario = objList.Valor("PrecUnit");
statusLinhaCompra = new Model.LinhaDocCompraStatus();
statusLinhaCompra.EstadoTrans = objList.Valor("EstadoTrans");
statusLinhaCompra.QuantTrans = objList.Valor("QuantTrans");
linhaDocCompra.Status = statusLinhaCompra;
result.LinhasDoc.Add(linhaDocCompra);
objList.Seguinte();
}
}
}
return result;
}
