ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Помогите составить запрос.
11 сообщений из 11, страница 1 из 1
Помогите составить запрос.
    #32387577
paxer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paxer
Гость
Не силен в SQL. Помогите пож. решить задачку, если есть у кого время. Есть две таблички:

1. rTrans - таблица движений:
r1: Integer; - код товара
s: Decimal - кво товара
tp: char(1); - '+' - приход, '-' - расход
d: Date - дата движения

2. rTotal - таблица итогов:
r1: Integer;
s: Decimal
d: Date - дата итогов, всегда первое число месяца, для которого эти итоги являются начальными

Первая таблица хранит движения (приходы/расходы) товара за месяц. Вторая - остатки товара на складе на конец месяца.

Задача: получить отчет об остатках на складе в произвольный день месяца.
Проблемы:
- на конец месяца товара может не быть, а на произвольный день - есть.
- обортов по товару может и не быть, но нач. и кон. остатки есть.
...
Рейтинг: 0 / 0
26.01.2004, 12:24
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32387729
Denis Uskov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis Uskov
Участник
Вероятно лучше написать ХП.
DateItog - дата, на которую получаем итоги
по идее еще должен быть справочник товаров
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
returns (
ID integer,
Kolvo double precision
)
declare TmpKolvo double precision;
declare TmpDate Date;
declare TmpCh Char( 1 );
for select IDTOV from SprTov into :ID do 
begin
  select max(date) from rTotal where (r1 = :ID) and (d < DateItog) into :TmpDate;
  select s from rTotal where (r1 = :ID) and (d = TmpDate) into :TmpKolvo;
  if (TmpKolvo is null) then Kolvo =  0  else Kolvo = TmpKolvo;
  for select tp, sum(s) from rTrans where (r1 = :ID) and (d between TmpDate and DateItog) group by tp into :TmpCh, :TmpKolvo do 
    if (TmpCh = '+') then Kolvo = Kolvo + TmpKolvo else Kolvo = Kolvo - TmpKolvo;
  suspend;
end;

Не претендую на хорошую скорость, потому как можно сильно поправить процедуру в сторону улучшения!
------------------------
С уважением, Denis Uskov
...
Рейтинг: 0 / 0
26.01.2004, 13:49
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32387771
paxer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paxer
Гость
К сожалению это не подойдет. Структура таблиц - упрощенная. rTrans и rTotal содержат еще Id склада и Id валюты.
Мне виделся такой подход: создать временную таблицу rVew, в которую переместить rTotal. Дальше ХП проходить по rTrans и изменять/добавлять значения в rVew. После этого обычный запрос по rVew вернет нужную информацию.
Но создавать / удалять в IB временные таблицы нерекомендуется. Может есть какая-то другая замена?
...
Рейтинг: 0 / 0
26.01.2004, 14:08
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32388542
Denis Uskov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis Uskov
Участник
Какая была инфа, по той и сделал. Если "Структура таблиц - упрощенная" , а в реале намного сложнее, то как раз ХП будет более легкий и гибкий вариант, чем доп. таблицы и т.д. Просто добавляй в where и group by что тебе нужно. Когда получишь окончательный результат, проанализируй все планы запросов и логику, может другой вариант будет более удачным!
------------------------
С уважением, Denis Uskov
...
Рейтинг: 0 / 0
27.01.2004, 08:56
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32388700
paxer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paxer
Гость
А возникнут ли какие-нибудь проблемы, если програмно создавать/удалять View?
С помощью View мне видится такое решение задачи (проблему с датой остатка не рассматриваем для простоты):
CREATE VIEW v11 (r1,s,tpTable) AS
SELECT r1, SUM(s),'l' FROM rTotal
GROUP BY r1
UNION
SELECT r1, SUM(s*CAST(tp||'1' AS INT)),'r' FROM rTrans
GROUP BY r1
WHERE d<EndDate
//s*CAST(tp||'1' AS INT) даст сумму приходы минус расходы.
//поле tpTable для того, чтобы одинаковые строки при объединении запросов
//не игнорировались

Запрос по View даст результат:
SELECT r1, SUM(s) FROM v11
GROUP BY r1

А после - удалить View.
Проблема - обеспечить уникальность имени View. Использовать, например, в имени время создания.
...
Рейтинг: 0 / 0
27.01.2004, 10:44
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32388948
hyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
hyh
Участник
Код: plaintext
SELECT  1  as res FROM RDB$PROCEDURES WHERE RDB$PROCEDURE_NAME = 'имя_проц'


Для процедур уникальность проверяется так
Viewы.. Используй если хочется, но они вообще никак не работают с параметрами
...
Рейтинг: 0 / 0
27.01.2004, 13:04
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32389097
Denis Uskov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis Uskov
Участник
>А возникнут ли какие-нибудь проблемы, если програмно создавать/удалять View?

Если пару раз, то нет :) но вот лучше этого не делать. Есть такое понятие как счетчик изменений метаданных, так вот когда он достигнет 255, то базе надо будет делать backup/restore иначе к ней не доступишься :(
------------------------
С уважением, Denis Uskov
...
Рейтинг: 0 / 0
27.01.2004, 14:05
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32390164
paxer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paxer
Гость
Делал проверку: создавал и удалял View 2 раза по 1000 раз подряд. Каждая 1000 созданий/удалений увеличивала объем базы где-то на 140кб. Никаких жалоб сервер не выдал. Пробовал на Firebird embedded 1.5 RC 6.
...
Рейтинг: 0 / 0
28.01.2004, 10:29
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32390615
hyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
hyh
Участник
авторно вот лучше этого не делать. Есть такое понятие как счетчик изменений метаданных, так вот когда он достигнет 255, то базе надо будет делать backup/restore иначе к ней не доступишься :(
Тааак)) И для каких версий ИБ это справедливо? Можно ли в ИБЕхперте посмотреть этот счетчик?
Мой текущий отчетик каждый раз создает, а в конце работы дропает процедуру,
пускался он уже несколько десятков раз - никаких проблем с базой пока нет :)
...
Рейтинг: 0 / 0
28.01.2004, 13:26
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32390806
paxer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paxer
Гость
>hyh
Было такое ограничение. Только если я правильно помню, 255 изменений какой-либо таблицы, а не на базу в целом. И, если не ошибаюсь, в Интребейзе <=6.х.
Т.е. это ограничение зависит от версии.
...
Рейтинг: 0 / 0
28.01.2004, 14:28
| Ответить | Цитировать | Написать  
Помогите составить запрос.
    #32391824
Denis Uskov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis Uskov
Участник
Да уж, что-то я перегнул :)

Выдержка из Release Notes для FB

(1.0) Alter Trigger no longer increments the change count on table
When the count of metadata changes on any single table reaches the maximum of 255, the database
becomes unavailable. Backup and restore are required in order to reset the change count and make
the database once again available. The intention of this feature is to enforce a database cleanup when
table structures have undergone a lot of changes, not to inhibit useful capabilities in the engine.

(1.0) это версия сервера!
------------------------
С уважением, Denis Uskov
...
Рейтинг: 0 / 0
29.01.2004, 10:11
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Помогите составить запрос.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=40&msg=32391824&tid=1579307]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 152ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 52ms
get tp. blocked users:
 1ms
others: 212ms
total:  456ms
созд. / загр.: 456ms
x
x
Закрыть


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