ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите с запросом
25 сообщений из 25, страница 1 из 1
Помогите с запросом
    #34190233
rebroff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rebroff
Участник
Добрый день.Есть dbf-таблица движения материалов. Поля sklad(цех), nom (номенклатурный номер),sum (сумма прихода или расхода), vid (определяет, чем явл. сумма:приходом или расходом. 40-расход, остальные значения-приход). Задача: выбрать только те записи, сгруппировав по номенклатурному номеру и по цехам, для которых остаток (приход-расход) >1000.

Запрос "sql40" (выбираем с видом 40):

Код: plaintext
1.
2.
3.
4.
SELECT nomer,sklad,
SUM(mtb60."sum") Summ
FROM mtb60
WHERE vid = "40"
GROUP BY nomer,sklad

Запрос "sqlnot40" (с видом не равным 40, т. е. приход):

Код: plaintext
1.
2.
3.
4.
SELECT nomer,sklad,
SUM(mtb60."sum") Summ, sum(kol) skol
FROM mtb60
WHERE vid<>"40"
GROUP BY nomer,sklad

Общий запрос:

Код: plaintext
1.
2.
3.
4.
5.
6.
SELECT
a.nomer, b.nomer,a.sklad,b.sklad,a.Summ SummA, b.Summ SummB, a.Summ - b.Summ SummAB,
FROM
"sumNot40.sql" a
JOIN "sum40.sql" b ON (a.nomer = b.nomer and a.sklad=b.sklad and a.sklad=:nomskl)
WHERE
a.Summ - b.Summ >  1000

Проблема в том, что, если по определённому номенк. номеру расхода не было, значит и нет соотв. записи для такого номера с видом "40", а значит a.Summ - b.Summ не имеет смысла. Но этом случае нужно считать расход равным 0 и в остаток попадает весь приход. Помогите реализовать. Заранее премного благодарен.
...
Рейтинг: 0 / 0
11.12.2006, 14:07
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190429
LeKo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LeKo
Гость
А если так попробовать:
Код: plaintext
1.
2.
3.
4.
5.
6.
SELECT
a.nomer, b.nomer,a.sklad,b.sklad,a.Summ SummA, b.Summ SummB, a.Summ - b.Summ SummAB,
FROM
"sumNot40.sql" a
LEFT JOIN "sum40.sql" b ON (a.nomer = b.nomer and a.sklad=b.sklad and a.sklad=:nomskl)
WHERE
(a.Summ - b.Summ >  1000 ) OR (a.Summ> 1000  AND ISNULL(b.Summ))
...
Рейтинг: 0 / 0
11.12.2006, 14:57
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190437
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Код: plaintext
1.
2.
3.
4.
SELECT nomer,sklad,
SUM(iif(vid = "40",-mtb60."sum",mtb60."sum")) Summ
FROM mtb60
GROUP BY nomer,sklad
...
Рейтинг: 0 / 0
11.12.2006, 15:00
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190439
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Код: plaintext
1.
2.
3.
4.
5.
SELECT nomer,sklad,
SUM(iif(vid = "40",-mtb60."sum",mtb60."sum")) Summ
FROM mtb60
GROUP BY nomer,sklad
HAVING Summ> 1000
...
Рейтинг: 0 / 0
11.12.2006, 15:01
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190479
rebroff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rebroff
Участник
Работаю через BDE. IIF отпадает.
...
Рейтинг: 0 / 0
11.12.2006, 15:09
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190494
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
rebroffРаботаю через BDE. IIF отпадает.
И что, в BDE нет аналога?
...
Рейтинг: 0 / 0
11.12.2006, 15:13
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190497
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
CASE то он должен понимать
...
Рейтинг: 0 / 0
11.12.2006, 15:14
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190508
rebroff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rebroff
Участник
Загвоздка в том, что для некоторых номенклатурных номеров не существует записи для данного номера с видом = "40". Т.е. расхода не было. Логически расход =0.
...
Рейтинг: 0 / 0
11.12.2006, 15:18
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190557
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
SELECT nomer,sklad,
SUM(case vid = "40" then  0  else mtb60."sum" end) Prixod,
SUM(case vid = "40" then mtb60."sum" else  0  end) Rasxod,
SUM(case vid = "40" then -mtb60."sum" else mtb60."sum" end) Summ
FROM mtb60
GROUP BY nomer,sklad
HAVING Summ> 1000
...
Рейтинг: 0 / 0
11.12.2006, 15:27
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190585
rebroff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rebroff
Участник
case ему (BDE) тоже невдомёк:(
...
Рейтинг: 0 / 0
11.12.2006, 15:35
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190699
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-=AlexiS=-
Участник
а Full Join понимает ?
...
Рейтинг: 0 / 0
11.12.2006, 16:01
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190795
rebroff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rebroff
Участник
Обязательно!
...
Рейтинг: 0 / 0
11.12.2006, 16:18
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190814
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-=AlexiS=-
Участник
Может поймет что-то типа такого


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
SELECT
nvl(a.nomer, b.nomer) as nomer ,
nvl(a.sklad,b.sklad) as sklad ,
,nvl(a.Summ, 0 ) - nvl(b.Summ, 0 ) as  SummAB,
FROM
"sumNot40.sql" a
FULL JOIN "sum40.sql" b ON (a.nomer = b.nomer and a.sklad=b.sklad and a.sklad=:nomskl)
WHERE
nvl(a.Summ, 0 ) - nvl(b.Summ, 0 )  >  1000

или даже такого

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
SELECT
nomer,sklad,sum(Sum) as  SummAB,
FROM
( SELECT nomer,sklad,
     mtb60.sum
FROM mtb60
WHERE vid = "40"
union all
SELECT nomer,sklad,
     mtb60.sum
FROM mtb60
WHERE vid <> "40"
)
where SummAB> 1000

PS Не проверял , поэтому не знаю работает ли , но думаю направление указал
...
Рейтинг: 0 / 0
11.12.2006, 16:21
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190821
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-=AlexiS=-
Участник
Вай , копи пасте ....

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
SELECT
nomer,sklad,sum(Sum) as  SummAB,
FROM
( SELECT nomer,sklad,
     mtb60.sum
FROM mtb60
WHERE vid = "40"
union all
SELECT nomer,sklad,
     - mtb60.sum
FROM mtb60
WHERE vid <> "40"
)
where SummAB> 1000
...
Рейтинг: 0 / 0
11.12.2006, 16:22
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190827
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-=AlexiS=-
Участник
тху , опят поспешил

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
SELECT
nomer,sklad,sum(Sum) as  SummAB,
FROM
( SELECT nomer,sklad,
     mtb60.sum
FROM mtb60
WHERE vid = "40"
union all
SELECT nomer,sklad,
     mtb60.sum
FROM mtb60
WHERE vid <> "40"
)
group by nomer,sklad
where SummAB> 1000
...
Рейтинг: 0 / 0
11.12.2006, 16:23
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34190831
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-=AlexiS=-
Участник
не , ну что ты сделаешь - блин туплю после обеда

2 последних варианта соедени - короче в 1 гроуп бай добавь
...
Рейтинг: 0 / 0
11.12.2006, 16:25
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34194783
Jevgeniy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jevgeniy
Гость
Добрый вечер.
Есть база. Опишу подробнее. В таблице реализована древовидное подчинение клиентов, т.е. есть id клиента, который имеет id_parent, а этот в свою очередь может быть равен одному из id клиентов. Поле level создано для индификации уровня данного клиента в иерархической структуре.

Талица __client: id (уникальный ключ), name (имя клиента), id_parent (ключ родителя, может быть равен id другой записи), level (уровень в иерархической структуре), id_status

Таблица __buy: id_client, __idzakaz

Таблица __zakaz: id (номер заказа), summ (сумаа заказа), overball (каждый товар имеет свой балл, это сумма всех баллов товаров входящих в заказ), data (дата заказа)

Таблица __status: id, name - статусы клиентов, зависят и изменяются от количества набраных баллов за 1 месяц.

Беда в следующем: нужно построить отчет, который выводил бы для определенного клиента все его дерево подчиненных с указанием статуса и количества набранных баллов в данном месяце.

Подскажите пожалуйста как вывести хотябы дерево подчиненных для определенного клиента.

Заранее спасибо.
...
Рейтинг: 0 / 0
12.12.2006, 21:32
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34195673
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-=AlexiS=-
Участник
Сходите на форум MS SQL - там в факах и поиском по слову TREE - есть масса решений.
...
Рейтинг: 0 / 0
13.12.2006, 11:03
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34195981
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
JevgeniyДобрый вечер.
Есть база. Опишу подробнее. В таблице реализована древовидное подчинение клиентов, т.е. есть id клиента, который имеет id_parent, а этот в свою очередь может быть равен одному из id клиентов. Поле level создано для индификации уровня данного клиента в иерархической структуре.

Талица __client: id (уникальный ключ), name (имя клиента), id_parent (ключ родителя, может быть равен id другой записи), level (уровень в иерархической структуре), id_status

Таблица __buy: id_client, __idzakaz

Таблица __zakaz: id (номер заказа), summ (сумаа заказа), overball (каждый товар имеет свой балл, это сумма всех баллов товаров входящих в заказ), data (дата заказа)

Таблица __status: id, name - статусы клиентов, зависят и изменяются от количества набраных баллов за 1 месяц.

Беда в следующем: нужно построить отчет, который выводил бы для определенного клиента все его дерево подчиненных с указанием статуса и количества набранных баллов в данном месяце.

Подскажите пожалуйста как вывести хотябы дерево подчиненных для определенного клиента.

Заранее спасибо.
Проблема неоднократно обсуждалась. Я такие вещи делаю через серверную функцию, возвращающую таблицу:
Пусть есть таблица клиентов CLIENT вида:
CLENT_ID INT
Parent_ID INT
NAME CHAR(40)
Level TINYINT
Возможно есть и другие поля, но для данного примера они не важны.

Определяем на сервере такую функцию:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
CREATE   FUNCTION dbo._CLENT_Tree (@CLIENT_ID INT)
RETURNS @ListC TABLE (CLIENT_ID INT, NAME CHAR( 40 ), Parent_ID  INT, Level  TINYINT)
AS  
BEGIN 
	DECLARE @LEVEL  TINYINT
	IF ISNULL(@CLIENT_ID,  0 )  =  0 
	BEGIN
		SET @LEVEL =  0 
		INSERT INTO @ListC (CLIENT_ID, NAME, Parent_ID, Level)
		SELECT CLIENT_ID, Name, ISNULL(Parent_ID,  0 ),  Level
		FROM CLIENT WHERE Level = @LEVEL
	END
	ELSE
	BEGIN
		INSERT INTO @ListC (CLIENT_ID, NAME, Parent_ID, Level)
		SELECT CLIENT_ID, Name, ISNULL(Parent_ID,  0 ),  Level
		FROM CLIENT WHERE CLIENT_ID = @CLIENT_ID
		SELECT @LEVEL = Level FROM @ListC
	END
	WHILE @@ROWCOUNT >  0 
	BEGIN
		SET @LEVEL = @LEVEL +  1 
		INSERT INTO @ListC (CLIENT_ID, NAME, Parent_ID, Level)
		SELECT p.CLIENT_ID, p.Name, ISNULL(p.Parent_ID,  0 ),  p.Level
		FROM CLIENT p INNER JOIN @ListC t ON p.Parent_ID = t.CLIENT_ID 
			AND t.Level = @LEVEL -  1 
	END
	RETURN
END
Эта функция по переданному CLIENT_ID возвращает всех его "потомков"
А далее, во всех запросах используете эту функцию в виде ...FROM dbo._CLENT_Tree(@CLIENT_ID)
Например, надо в каком-то подзапросе выбрать только данного клиента (@MY_CLIENT_ID) и всех его потомков. Тогда можно, напрмиер, так:
Код: plaintext
1.
SELECT ... FROM...
WHERE CLIENT_ID IN (SELECT CLIENT_ID FROM dbo._CLENT_Tree((@MY_CLIENT_ID ))
С уважением, Алексей.
...
Рейтинг: 0 / 0
13.12.2006, 11:59
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34197760
Jevgeniy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jevgeniy
Гость
Огромное спасибо, Aleksey, подскажите пожалуйста как эту серверную функцию впихнуть в fox pro?
...
Рейтинг: 0 / 0
13.12.2006, 18:28
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34198035
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
JevgeniyОгромное спасибо, Aleksey, подскажите пожалуйста как эту серверную функцию впихнуть в fox pro?
В каком смысле "впихнуть в fox pro" !? Это функция СЕРВЕРА!
Вы должны ее создать на MS SQL Server через EM (Enterprise Manager) или QA (Query Analyser) и использовать и при вызове или из клиента (SQLEXEC) или с сервера (Хранимые процедуры, которые тоже можно вызывать из клиента через SQLEXEC).
С уважением, Алексей.
...
Рейтинг: 0 / 0
13.12.2006, 20:11
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34198240
Jevgeniy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jevgeniy
Гость
Вот что я делаю:
Работа делается на фокс про 6.0 поэтому сторонних программ я не использую.

1. Добавляю предварительно отредактированую процедуру в Stored Procedure. При закрытии система орет благим матом о синтаксических ошбках, не дает закрыть окно.

2. Создаю New Query, пихаю фукцию туда, запускаю на выполнение - не работает. Никакие исправления не помогают.

Какие мысли посещают: Для этого дела необходимо чтобы база хранилась на sql сервере и данная процеду добавляется в файл с хранимыми процедурами на сервер, потом при помощи запросов оно выдает список нужных мне данных. Если это так скажите пожалуйста я не буду мучаться и буду искать другой метод решения поставленой здачи.

_http://www.sql.ru/forum/actualthread.aspx?tid=363425&pg=-1&hl=%e4%e5%f0%e5%e2%ee
Тут описание как можно сделать что-то приближенное при помощи select, но ограниченая глубина - явный минус. Причем глубина и ширина дерева переменна. Так что этот метод явно не подходит.

Пошу помощи
...
Рейтинг: 0 / 0
13.12.2006, 22:49
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34198274
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
О.. тогда извините, я прочитал только предыдущий пост -=AlexiS=- , который отправлял вас на форум по SQL Server и подумал, что вы разрабатываете приложение клиент-сервер. Тогда все отменяется. Я вам привел код функции на Transact-SQL (T-SQL) - это язык MS Server.
Для VFP он не годится.
С уважением, Алексей
...
Рейтинг: 0 / 0
13.12.2006, 23:20
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34199203
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
-=AlexiS=-
Участник
Отправлял на MS SQL форум именно за алгоритмами , за идеями как можно решить задачу
Но некак не за готовым кодом.
Там есть масса красивых решений - через рекурсию , через циклы , через функции ...

НО даже готовый код - переделать под фокс - не проблема.
В том числе и код приведенный выше ...
...
Рейтинг: 0 / 0
14.12.2006, 11:40
| Ответить | Цитировать | Написать  
Помогите с запросом
    #34201415
Jevgeniy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jevgeniy
Гость
Всем спасибо за участие и помощи в решении проблемы.
...
Рейтинг: 0 / 0
14.12.2006, 22:06
| Ответить | Цитировать | Написать  
25 сообщений из 25, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите с запросом
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&fpage=219&tid=1590157]:
 0ms
get settings:
 6ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 23ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 33ms
get tp. blocked users:
 1ms
others: 208ms
total:  291ms
созд. / загр.: 291ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]