Ejemplo n.º 1
0
        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;
        }
Ejemplo n.º 2
0
        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;
        }