Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

составление отчетов для печати из зависимых таблиц [D6, WinXP]

ka © (2004-12-25 23:06:00)
Здрасте. Подскажите пожалуйста как работать с отчетами QReport, то есть как сформировать отчет из двух таблиц, одна из которых подчиненная.

Есть таблица goodsmain.db, она содержит поля
psysno,pname,pcompany,pseries,psex

Есть таблица goodssecond.db, она содержит поля
sSysNo, sSizes, sBat

Связаны эти таблицы pSysNo -> sSysNo.

Дак вот мне нужно в отчете сформировать строку из таблицы goodsmain.db, а затем для нее вывести значения из таблицы goodssecond.db.

То есть примерно так

psysno1, pname1, pcompany1, pseries1, psex1
sSysNo, sSizes, sBat
sSysNo, sSizes, sBat
sSysNo, sSizes, sBat

psysno2, pname2, pcompany2, pseries2, psex2
sSysNo, sSizes, sBat
sSysNo, sSizes, sBat

и т.д. (тольк вместо psysno1, pname1 и т.д. соответсвующие значения)

Вот и с этим проблемы. Вроде все понятно, что в полосу Detail нужно главную таблицу, а в полосу SubDetail подчиненную. Но вопрос что писать в наборе данных для SubDetail. В делфийском примере в demos написано

SELECT *
FROM items
WHERE OrderNo = :OrderNo
ORDER BY OrderNo, ItemNo

что значит "OrderNo = :OrderNo" я вообще не понимаю.
Вообщем подскажите пожалуйста дураку что делать :) .(надеюсь понятно объяснил)
Спасибо.

Fay (2004-12-27 04:12:00) [1]
:pSysNo - параметр

ka (2004-12-26 20:09:00) [2]
Вообщем не работает. И все же что такое "sSysNo = :pSysNo".

ka (2004-12-26 19:45:00) [3]
А что такое "sSysNo = :pSysNo", я так и не знаю.

ka (2004-12-26 11:18:00) [4]
Безумный студенческий юмор? Но я вчера сессию закрыл. :) Спутали. А за ответ спасибо. Попробою.

Fay (2004-12-26 04:26:00) [5]
2 Johnmen © (26.12.04 2:13) [1]
Это твой студент? 8)

Fay (2004-12-26 04:25:00) [6]
Пусть в Query1
select * from goodsmain
,тогда в Query2
select * from goodssecond where sSysNo = :pSysNo

и
DataSource1.DataSet := Query1; Query2.DataSource := DataSource1;

Типа этого.

Johnmen (2004-12-26 02:13:00) [7]
Перед смертью не надышишься.
Будь ты дурак или умный...

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »